Enter a blank line every second line in Excel



Enter a blank line every second line in Excel. Quickly add a blank line every second line in your data with VBA.
Click this link to check out my one-on-one training

For more help visit my website www.easyexcelanswers.com or email me at easyexcelanswers@gmail.com.

Contact me regarding customizing this template for your needs.

Click for online Excel Consulting

I am able to provide online help on your computer at a reasonable rate.

I use a Blue condenser Microphone to record my videos, here is the link

Check out Crowdcast for creating your webinars

I use Tube Buddy to help promote my videos
Check them out

Follow me on Facebook

TWEET THIS VIDEO

Follow me on twitter
easyexcelanswers

IG @barbhendersonconsulting

You can help and generate a translation to you own language

*this description may contain affiliate links. When you click them, I may receive a small commission at no extra cost to you. I only recommend products and services that I’ve used or have experience with.

link for insert VBA code in Excel
Sub addspaces()
Dim add As Long
dim erow as long
erow= ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
add = 3
Do While add (is less than) erow
Sheet1.Rows(add).Insert
add = add + 2
Loop
End Sub

Watch more new videos about Excel Office | Synthesized by Mindovermetal English

Rate this post

Bài viết liên quan

Theo dõi
Thông báo của
guest
1 Comment
Cũ nhất
Mới nhất Được bỏ phiếu nhiều nhất
Phản hồi nội tuyến
Xem tất cả bình luận
dsoukeur

Sub addspaces()

Dim add As Long

Dim erow As Long

erow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row

add = 3

Do While add < erow + 1

Sheets("Sheet1").Rows(add).Insert

add = add + 2

erow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row

Loop

End Sub