Insert a new row of blank formulas after clicking in current blank row

[kateyr]

Hi,

I'm just wanting to insert a new row of blank formulas when I click in
(or change or whatever) the current blank row.
Column A is a list box based on a different work sheet, and columns B&C
are Vlookups also referencing that different work sheet.

Have tried a couple of modules in VBA, but I end up with a loop which
keeps adding or does vague inserting of random data!

Any help would be appreciated.

Cheers

[CLR]

I usually set up Row 1 the way I want it with formulas, Validation boxes,
formats, etc and then give it the RangeName "RowFormat" and then hide
it..............then use this code to GOTO and Format a new row for data
entry........

Application.Goto Reference:="RowFormat"
Selection.Copy
Application.Goto Reference:="R8C1"
Selection.End(xlDown).Offset(1, 0).Select
ActiveSheet.Paste

hth
Vaya con Dios,
Chuck, CABGx3



"kateyr" wrote:

> Hi,
>
> I'm just wanting to insert a new row of blank formulas when I click in
> (or change or whatever) the current blank row.
> Column A is a list box based on a different work sheet, and columns B&C
> are Vlookups also referencing that different work sheet.
>
> Have tried a couple of modules in VBA, but I end up with a loop which
> keeps adding or does vague inserting of random data!
>
> Any help would be appreciated.
>
> Cheers
>
>