Past a range of cells with a specified row width

[Chris1976]

Hi,

I have a code below that I did a macro recording on to copy a range of cells in a row directly below the copied row. I linked the code to a command button so that every time I click the command button it adds a new row. I cannot seem to extend on the code so that when copied, it copies it to a row height of 140. Also when copying, it narrows the Legend row cutting of some of the text. My code I'm using is

Please Login or Register  to view this content.

[AliGW]

Administrative Note:

Welcome to the forum.

We would very much like to help you with your query, however you need to include code tags around your code.

Please take a moment to add the tags. Posting code between tags makes your code much easier to read and copy for testing, and it also maintains VBA formatting.

Please see Forum Rule #2 about code tags and adjust accordingly. Click on Edit to open your post, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

(Note: this change is not optional. As you are new, I'll do it for you this time.)

I have moved this thread to the appropriate forum section.

[Chris1976]

Thank you for doing the tags for me. I have noted your previous comment on this and included the tag/s # before and # after

I am not sure how this is done, apologies for that

[dangelor]

Possibly adding this line to the end of your code

Please Login or Register  to view this content.

[AliGW]

I am not sure how this is done, apologies for that

From the forum rule page:

[code]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/code] (or use the # button)

From my post above:

Click on Edit to open your post, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here: http://www.excelforum.com/misc.php?do=bbcode

[Chris1976]

Thanks Dangelor

I have placed that at the end however apologize, I should have mentioned that there are two rows from which i am copying, it is A 130 and A131

it is only A 131 that should paste to 140, A 130 can remain at its current size/height

[dangelor]

Try...

Please Login or Register  to view this content.

[Chris1976]

I have included a snippet of the column and row being copied below. All i basically want is that the code tells it to copy the rows at exactly the same height

Attachment 671723

[dangelor]

Your attachment isn't viewable. Post a workbook using the yellow highlighted instructions at the top of your original post.

[Chris1976]

I tried , it shuts down excel each time i make a copy to save of the workbook

But its basically just

A130 = 18 high
A131 = 18 high
A132 = 140 high

When i copy these row ranges I would like them to be the same size when pasted. In my workbook they are linked to a command button, each time I click the button it creates a new entry row/s which is the sizes above

[dangelor]

Unfortunatly, copy & pasted doesn't carry over the rows' height. Try

Please Login or Register  to view this content.

[Chris1976]

Thanks Dangelor

This works perfectly on the first button click however, when you and a second row (Copy of 13, 131, 132) it troughs a error message saying "there is already data in that range, do you want to replace it"

I ran a debug and it highlights " ActiveSheet.Paste "

Should that not change as it was not a normal copy paste function but rather specified heights ?

fro example

xlPasteFormats or a combination so that it copies the values and formulas as well ?

[dangelor]

Try assigning the range to a variable using Application.Inputbox or reading it from some cell in the worksheet. If you need some help with that, let me know, but I'm offline in a bit tonight.

[Chris1976]

Thanks , Yeah I have no clue how to do that , a bit of a newbe to this coding process, will appreciate your help with this

No worries when ever you have a moment or time, all good , thanks so far for everything

[Chris1976]

Hallo Dangelor

Thank you for al your help. I have managed to find the problem. The problem was not in the code it was the fact that Cell A130 and A131 was merged. Once I un-merged the two cells it work perfectly fine

Thank you once again !

[AliGW]

If that takes care of your original question, please select Thread Tools from the menu link above and mark this thread as SOLVED.

[dangelor]

Yeah, merged cells are a bane to good worksheets. Good luck!