Macro
To Count No.Of Rows And Columns Selected
In A Active Sheet
Sub Count_Rows_Columns()
Dim Count1, Count2 As Variant
Count1 = Selection.Rows.COUNT
Count2 = Selection.Columns.COUNT
MsgBox ("No.of Rows = ") & Count1 & vbCrLf & ("No.of Coloumns = ") & Count2 & vbCrLf & ("Existed In The Current Selection ")
End Sub
Thanks,Tamatam
Thanks,Tamatam
No comments:
Post a Comment
Hi User, Thank You for visiting My Blog. Please post your genuine Feedback or comments only related to this Blog Posts. Please do not post any Spam comments or Advertising kind of comments which will be Ignored.