RowHeight Macro

  • Thread starter Thread starter cdegar01
  • Start date Start date
C

cdegar01

Hello all, I am trying to write a macro that would set the row heigh
for every 66th row to 18.75. Any help would be appreciated, thanks
 
Try something like


Dim RowNdx As Long
Dim LastRow As Long
LastRow = Cells(Rows.Count, "A").End(xlUp).Row
For RowNdx = 1 To LastRow Step 66
Rows(RowNdx).RowHeight = 18.75
Next RowNdx


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
 
Back
Top