macro assigned to button to enter name range in row below cursor

[penfolda]

Hi,

I have a named range which is actually just a single row that includes specific formula and formatting (it is called AddiitionalRow and is on Sheet2 A1:A25)

Please can you kindly provide me with the vba that can be assigned to a button on Sheet1 that, when clicked, will insert the named range in a table on Sheet1 in the row below where the cursor is?

Thank you

[penfolda]

Please help!

[AlphaFrog]

The description is a bit confusing. You say the named range is a single row but A1:A25 is twenty-five rows and one column.

At any rate, try this...

Please Login or Register  to view this content.

[penfolda]

That works brilliantly thank you.

Please can you adapt the code for me so that it always enters the named range starting in columnA e.g. if my active cell is Sheet1 F5, it will enter the additional row in Sheet1 A6?

Thank you

[penfolda]

Hi,

The following code is inserting my named range (which is an entire row) perfectyly when my table in 'Details' is not filtered. However, when my table in Details is filtered I get the following error "Run time error 1004 Insert method of Range class failed" - please can you show me how to resolve this?

Please Login or Register  to view this content.

Thank you

[AlphaFrog]

Please Login or Register  to view this content.

[penfolda]

Thank you for your response.

The new code does enter a row but also returns the following error at the same time: run time error 1004 - The information cannot be pasted because the copy area and the paste area are not the same size and shape.

Any ideas?

Thank you

[AlphaFrog]

Thank you for your response.

The new code does enter a row but also returns the following error at the same time: run time error 1004 - The information cannot be pasted because the copy area and the paste area are not the same size and shape.

Any ideas?

Thank you

What's the address of AdditionalRow? You said it was only one row.

Please Login or Register  to view this content.

[penfolda]

Hi,

It is just one row. It is row2 on Sheet 'AdditionalRow'.

What is the code for that you posted?

Thank you

[penfolda]

Hi,

Please find my workbook attached.

If you click the add row button, you will get the error described.

Thank you for your help.

[AlphaFrog]

You have hidden columns F:N. That causes the error when you paste an entire row.

This will unhide the columns, paste the row, rehide the columns.

Please Login or Register  to view this content.