how do I double or triple an existing EXEL file

F

floatinghawk

If I have 100 entries, one under the other,...I want it every 3rd line so
I can write notes under each one.
 
F

floatinghawk

If I have 100 entries, one under the other,...I want it every 3rd line so
I can write notes under each one.
 
M

Marcelo

Are you looking for insert rows between data?
--
regards from Brazil
Thanks in advance for your feedback.
Marcelo



"floatinghawk" escreveu:
 
M

Marcelo

Are you looking for insert rows between data?
--
regards from Brazil
Thanks in advance for your feedback.
Marcelo



"floatinghawk" escreveu:
 
G

Gord Dibben

Sub InsertRows()
Application.ScreenUpdating = False
Dim NumRows As Integer
Dim Lrow As Long
Dim r As Long
Lrow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
NumRows = 2
For r = Lrow To 1 Step -1
ActiveSheet.Rows(r + 1).Resize(NumRows).EntireRow.Insert
Next r
Application.ScreenUpdating = True
End Sub


Gord Dibben MS Excel MVP
 
G

Gord Dibben

Sub InsertRows()
Application.ScreenUpdating = False
Dim NumRows As Integer
Dim Lrow As Long
Dim r As Long
Lrow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
NumRows = 2
For r = Lrow To 1 Step -1
ActiveSheet.Rows(r + 1).Resize(NumRows).EntireRow.Insert
Next r
Application.ScreenUpdating = True
End Sub


Gord Dibben MS Excel MVP
 
D

Dave Peterson

If it's for hand written notes, maybe you could just select the range and then
increase the rowheight by a factor of three.
 
D

Dave Peterson

If it's for hand written notes, maybe you could just select the range and then
increase the rowheight by a factor of three.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top