Identifying Beginning and Ending Rows in a Selected Range

J

JR_06062005

Is there a way in VB to identify the beginning and ending rows in a selected
range. The command below gives the address:

ActiveWindow.RangeSelection.Address

But what I want to do is to determine how many rows (and perhaps columns)
are in a selected range.
 
M

Mike H

Maybe

Sub Macro2()

x = Selection.Rows.Count
y = Selection.Columns.Count
MsgBox x & " Rows. " & y & " Columns."

End Sub

Mike
 
J

JR_06062005

Thanks. That did the trick.

Mike H said:
Maybe

Sub Macro2()

x = Selection.Rows.Count
y = Selection.Columns.Count
MsgBox x & " Rows. " & y & " Columns."

End Sub

Mike
Click to expand...
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Range Selection 17
Hiding Unused Rows 1
Delete Rows 6
Code to add comments to selected cells within a selected range 30
use ComboBox value to select range and then use selected range tocreate a chart 3
macro to increment/decrement values in selected cells 2
Identifying rows selected by filter 1
VBA set thick borders around non empty cells in range 0

Top