Macro to insert row and formulas.

[Matso]

Hi All

I seem not to get the “find the next empty row of a range” commands in my head, to even begin to right one out.

Could anyone know how to build a macro that will insert an extra row below the last range? Then copy down the formulas from the last cell range. It also needs to be done for each Category and its range of data.

Thanks

[rylo]

Hi

This is pretty specific to the format of your example so I hope your example is a good reflection of what you want to do.

Please Login or Register  to view this content.

rylo

[Matso]

Thanks for the Reply rylo.

However it is stopping at:
firstadd = findit.Address

I have read the help field when the debugger comes up and I still do not know what it means I need to do.

Is it setting up a condition?(don't know if thats the word)

Matso

PS Yes the format is the exact same format I intend to use.

[rylo]

Hi

Does it do it when run on the example file, or on your real file?

rylo

[Matso]

Hi

Does it do it when run on the example file, or on your real file?

rylo

I copied and pasted it in the real file.

[rylo]

Hi

Do you have the relevant sheet selected, and does it have the word Totals on that sheet?

When it errors, debug it and see if you can see if findit has been set. Do something like ?findit.address in the immediate window. If it hasn't then the find statement hasn't worked, so it can't find what it is searching for.

rylo

[Matso]

Hi

Do you have the relevant sheet selected, and does it have the word Totals on that sheet?

When it errors, debug it and see if you can see if findit has been set. Do something like ?findit.address in the immediate window. If it hasn't then the find statement hasn't worked, so it can't find what it is searching for.

rylo

Thanks rylo

I had a reference formula in the cells therefore did not recognise the macro command. Now fixed.

Thanks for your help.

Matso