Hi,

I was wondering if anyone might be able to help me here.

How do i insert a new row in a worksheet in excel using VB programming?


For example, in a worksheet called Data, the following is the data

A B C
1 Merchandise 500 600
2 02-000 200 200
3 02-001 300 600
4 Total 1000 1400
5 Grocery 200 80
6 03-001 200 200
7 ...

I'd like to be able to insert a new row after "Total" which is after
line no. 4, just to separate them between merchandise and grocery
(formatting issue).

I've got some codes but not working really yet (got some errors)

If insertnewline = True Then
Worksheets("Data").Range("A4").Select
Selection.Insert Shift:=xlDown
end if

The error message that i got is
run-time error '1004'
select method of range class failed

I don't know why it doesn't like the range.

Your help is greatly appreciated.

Thank you in advance


--
associates
------------------------------------------------------------------------
associates's Profile: http://www.excelforum.com/member.php...o&userid=35073
View this thread: http://www.excelforum.com/showthread...hreadid=548249