Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for multiple rows
Hi
How can I check the output from the following to ensure that only one row has been selected Dim rRange As Range Set rRange = Application.InputBox(Prompt:="Please select any entry within " _ & vbCrLf & "the row you would like to amend.", _ Title:="Select a row", Type:=8) Thanks Sandy |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for multiple rows
Sandy,
After the inputbox line, use If rRange.Rows.Count 1 Then Set rRange = rRange.Rows(1) MsgBox "I will work on only " & rRange.Address End If HTH, Bernie MS Excel MVP "Sandy" wrote in message ... Hi How can I check the output from the following to ensure that only one row has been selected Dim rRange As Range Set rRange = Application.InputBox(Prompt:="Please select any entry within " _ & vbCrLf & "the row you would like to amend.", _ Title:="Select a row", Type:=8) Thanks Sandy |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for multiple rows
This uses the first row of whatever was selected...
'-- Sub Uncertain() Dim rRange As Range On Error Resume Next Set rRange = Application.InputBox _ (Prompt:="Please select any entry within" & _ vbCrLf & "the row you would like to amend.", _ Title:="Select a row", Type:=8) On Error GoTo 0 If rRange Is Nothing Then Exit Sub Set rRange = rRange.EntireRow.Rows(1) MsgBox "You selected row " & rRange.Row & " ", vbInformation, "Sandy" End Sub -- Jim Cone Portland, Oregon USA "Sandy" wrote in message Hi How can I check the output from the following to ensure that only one row has been selected Dim rRange As Range Set rRange = Application.InputBox(Prompt:="Please select any entry within " _ & vbCrLf & "the row you would like to amend.", _ Title:="Select a row", Type:=8) Thanks Sandy |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for multiple rows
Jim,
Be careful with that EntireRow since it will extend the range beyond the initial rRange (possibly). HTH, Bernie MS Excel MVP "Jim Cone" wrote in message ... This uses the first row of whatever was selected... '-- Sub Uncertain() Dim rRange As Range On Error Resume Next Set rRange = Application.InputBox _ (Prompt:="Please select any entry within" & _ vbCrLf & "the row you would like to amend.", _ Title:="Select a row", Type:=8) On Error GoTo 0 If rRange Is Nothing Then Exit Sub Set rRange = rRange.EntireRow.Rows(1) MsgBox "You selected row " & rRange.Row & " ", vbInformation, "Sandy" End Sub -- Jim Cone Portland, Oregon USA "Sandy" wrote in message Hi How can I check the output from the following to ensure that only one row has been selected Dim rRange As Range Set rRange = Application.InputBox(Prompt:="Please select any entry within " _ & vbCrLf & "the row you would like to amend.", _ Title:="Select a row", Type:=8) Thanks Sandy |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for multiple rows
Bernie, Jim
Thank you very much - exactly what I needed. Sandy "Sandy" wrote in message ... Hi How can I check the output from the following to ensure that only one row has been selected Dim rRange As Range Set rRange = Application.InputBox(Prompt:="Please select any entry within " _ & vbCrLf & "the row you would like to amend.", _ Title:="Select a row", Type:=8) Thanks Sandy |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for multiple rows
Hi Bernie, That was my intent as Sandy said: "to ensure that only one row has been selected" But maybe the intent was... only cells in one row have been selected? There's a solution out there somewhere. <g Sincerely, Jim Cone Portland, Oregon USA "Bernie Deitrick" wrote in message Jim, Be careful with that EntireRow since it will extend the range beyond the initial rRange (possibly). HTH, Bernie MS Excel MVP |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
Test for multiple rows
My phraseology Jim
The intent was to ensure "only cells in one row have been selected" However I now know how to account for the whole row too :) Sandy "Jim Cone" wrote in message ... Hi Bernie, That was my intent as Sandy said: "to ensure that only one row has been selected" But maybe the intent was... only cells in one row have been selected? There's a solution out there somewhere. <g Sincerely, Jim Cone Portland, Oregon USA "Bernie Deitrick" wrote in message Jim, Be careful with that EntireRow since it will extend the range beyond the initial rRange (possibly). HTH, Bernie MS Excel MVP |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Calculate mean of test scores from rows of test answers | Excel Discussion (Misc queries) | |||
Crteating Multiple GIFS from Multiple Ranges -- need someone to test my code to see why it fails | Excel Programming | |||
Creating Multiple GIFs from Multiple Range selections -- I need a volunteer to test my code to see why it fails | Excel Programming | |||
Crteating Multiple GIFS from Multiple Ranges -- need someone to test my code to see why it fails | Excel Programming | |||
Looping thru all rows with instr() test | Excel Programming |