We help IT Professionals succeed at work.

Insert multiple rows in Excel?

OAC Technology
on
Medium Priority
873 Views
Last Modified: 2010-05-18
There used to be an option in the Insert menu of Excel that said "Rows..." which would prompt you for how many rows you wanted to insert.

Now it is just Insert > Rows, which inserts a single row with no prompt.

We are currently on Exel 2k3 with SP 2 installed.

Am I missing something? Did the option move or am I looking in the wrong spot?

Thanks!
Comment
Watch Question

Commented:
Hi DataDudes,

To insert multiple rows, select the rows above which you want to insert rows. Select the same number of rows as you want to insert. For example, to insert three new rows, you need to select three rows.

cheers,
frankco

Not the solution you were looking for? Getting a personalized solution is easy.

Ask the Experts

Commented:
I know it, would be nice to have an input box or something like before. I guess MS thought this was an improvement.

cheers,
frankco
OAC TechnologyProfessional Nerds

Author

Commented:
seriously, that feature is gone now?

i knew it was there at one point :-)
Anne TroyManager
CERTIFIED EXPERT
Commented:
Gone. I don't remember when it was there before. :(
I use the F4 key. I'll insert my first row, then hit F4 for each additional row I want.
Commented:
here is a macro i wrote for you that will accomplish the same task.  highlight any cell in the row at which you want to insert more rows then run this macro.  you can add a button to your toolbar and link it to this macro, use a key combination or run from the macro menu (Alt+F8).  save this code in your personal macro workbook and it will be available to any worksheet you are working with.  if you need help doing any of the aforementioned, let me know..

HTH

AR

_____________________________________________
Sub InsertRows()
Dim RowCount As Integer
Dim count As Integer

On Error GoTo TheEnd

RowCount = InputBox("How many rows shall I insert here?")

count = 0
Do Until count = RowCount
Rows(ActiveCell.Row & ":" & ActiveCell.Row).Select
Selection.Insert Shift:=xlDown
count = count + 1
Loop

TheEnd:
End Sub
________________________________________________________

Commented:
Thank you for the assist DataDudes!

cheers,
frankco
Access more of Experts Exchange with a free account
Thanks for using Experts Exchange.

Create a free account to continue.

Limited access with a free account allows you to:

  • View three pieces of content (articles, solutions, posts, and videos)
  • Ask the experts questions (counted toward content limit)
  • Customize your dashboard and profile

*This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

OR

Please enter a first name

Please enter a last name

8+ characters (letters, numbers, and a symbol)

By clicking, you agree to the Terms of Use and Privacy Policy.