I have a voucher I created in an excel spreadsheet (not a form or
anything but on the worksheet itself). I need to be able to have the
users click on a command button to add a new line. I tried doing it
myself but I need the line added in the middle of the document using
the same format as the line above. However, when I did it, it would
delete the line underneath. How do I have it insert a line in the
middle? And is it possible to have them insert more than one line?
Thanks.

Signature
umuckatie
Allllen - 12 Sep 2006 14:43 GMT
To insert a new line under line 7 with the same formatting as line 7, use
this code
Rows("8:8").Insert Shift:=xlDown
To insert 3 lines, you could do it like this
Rows("8:10").Insert Shift:=xlDown
or you might want to try something like this
For x = 1 to 3
Rows("8:8").Insert Shift:=xlDown
Next x
replacing the 3 with however many lines you want to add.

Signature
Allllen
> I have a voucher I created in an excel spreadsheet (not a form or
> anything but on the worksheet itself). I need to be able to have the
[quoted text clipped - 4 lines]
> middle? And is it possible to have them insert more than one line?
> Thanks.
umuckatie - 12 Sep 2006 23:16 GMT
Allen-
Thanks it worked great! Only thing it didn't do is copy the merged
cells. Is that even possible? Thanks!
Katie
umuckatie Wrote:
> I have a voucher I created in an excel spreadsheet (not a form or
> anything but on the worksheet itself). I need to be able to have the
[quoted text clipped - 4 lines]
> middle? And is it possible to have them insert more than one line?
> Thanks.

Signature
umuckatie