Thread: Any option to configure spacing between rows?
View Single Post
 
Old 09-19-2011, 04:54 AM
Catalin.B Catalin.B is offline Windows Vista Office 2007
Expert
  
Join Date: May 2011
Location: Iaşi, Romānia
Posts: 386
Catalin.B is on a distinguished road
Default
try this:
Code:
Sub rowHeight()
Dim i As Integer
Application.ScreenUpdating = False
For i = 1 To 100 Step 2
Range("A" & i).rowHeight = 15
Next i
Application.ScreenUpdating = True
End Sub
Reply With Quote