Count Columns and Rows

Count Columns

Activesheet.UsedRange.Select
LastCol=Selection.Columns.Count

Count Rows
Act
ivesheet.UsedRange.Select
Lastrow=Selection.Rows.Count

Leave a Reply