copy multiple ranges, find next empty cell in first column and paste values as text

hello, first take a look at picture
Capture.JPG
I'd like to: copy multiple ranges from Sheet"" A1:G1, J1:Q1, S1:AP1
find next empty row (it shoul be A8) than paste values
but be aware that columns H,I,Q,R must stay intact cause having formulas...

How to...

In attached Excel file try not to use:

• merged cells
• password protection
• unnecessary formatting like: colours, borders, aligning another than default, etc...
• unnecessary zooming/grouping/freezeing

You have words to logically describe the problem

To attach an Excel file to your post,

• desensitize data
• remeber that your example should reflect structure and type of data
• click Go Advanced,
• scroll down until you see Manage Attachments,
• click that and select Browse,
• select your file and click Open,
• click Upload and you will see your attachment below Upload Files from a website
• click Close this window,
• click Submit reply

After that you should see attachment in your post

and IMHO this, desensitized file KL-ALPHACAN.xlsm should be attached also (both without zipping)

Originally Posted by Zlatko.Pan

... copy multiple ranges from Sheet"" A1:G1, J1:Q1, S1:AP1
find next empty row ... paste values
... be aware that columns H,I,Q,R ... having formulas...

Try this, but in 'Q' column are formulas (above, red), there the macro will not copy anything.
Check it on the copy of the workbook, not on the original.
"Ponuda" - Sheet name, change according to your needs.

Please Login or Register  to view this content.