Insert Multi Rows Between Existing Data
Solved/Closed
Related:
- Excel macro to insert rows between data
- Transfer data from one excel worksheet to another automatically - Guide
- Insert gif in excel - Guide
- How to reset safe folder password without losing data âś“ - Android Forum
- Spell number in excel without macro - Guide
- How to insert photo in word for resume - Guide
5 responses
venkat1926
Posts
1863
Registration date
Sunday June 14, 2009
Status
Contributor
Last seen
August 7, 2021
811
Mar 6, 2010 at 09:47 PM
Mar 6, 2010 at 09:47 PM
A1 is having headings.
then try this macro
KEEP YOUR ORIGINAL FILE SAFELY SOMEWHERE
FIRST DO THE TESTING OF MACRO IN THE EXPERIMENTAL DATA YOU HAVE SENT
then try this macro
KEEP YOUR ORIGINAL FILE SAFELY SOMEWHERE
FIRST DO THE TESTING OF MACRO IN THE EXPERIMENTAL DATA YOU HAVE SENT
Sub test() Dim j As Long, r As Range j = InputBox("type the number of rows to be insered") Set r = Range("A2") Do Range(r.Offset(1, 0), r.Offset(j, 0)).EntireRow.Insert Set r = Cells(r.Row + j + 1, 1) MsgBox r.Address If r.Offset(1, 0) = "" Then Exit Do Loop End Sub
Mar 7, 2010 at 09:13 AM
Thanks again,
Matt
Dec 10, 2010 at 02:30 PM