Thread: How do I insert alternating blank rows in a list of data?
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Don Guillett Don Guillett is offline
external usenet poster
  
Posts: 10,124
Default How do I insert alternating blank rows in a list of data?
From a post of mine very recently
Sub addrows()
For i = Cells(Rows.Count, "a").End(xlUp).Row To 2 Step -1
Rows(i).Insert
Next
End Sub


--
Don Guillett
SalesAid Software

"curiouscat" wrote in message
...



Reply With QuoteReply With Quote