My macro lags

My copy and paste macro sometimes take 15 to 20 seconds to run and bogs down it also gives me a clipboard error. It does work but is there a more efficient way to run this? I made this with recording the macro.

Range("A3:A85").Copy Range("CC3,CD3")
Range("E3:E85").Copy Range("CC169,CD169")
Range("I3:I85").Copy Range("CC252,CD252")
Range("M3:M85").Copy Range("CC335,CD335")
Range("Q3:Q85").Copy Range("CC418,CD418")
Range("U3:U85").Copy Range("CC501,CD501")
Range("Y3:Y85").Copy Range("CC584,CD584")
Range("AC3:AC85").Copy Range("CC667,CD667")
Range("AG3:AG85").Copy Range("CC750,CD750")
Range("AK3:AK85").Copy Range("CC833,CD833")
Range("AO3:AO85").Copy Range("CC916,CD916")
Range("AS3:AS85").Copy Range("CC999,CD999")
Range("AW3:AW85").Copy Range("CC1082,CD1082")
Range("BA3:BA85").Copy Range("CC1165,CD1165")
Range("BE3:BE85").Copy Range("CC1248,CD1248")
Range("BI3:BI85").Copy Range("CC1331,CD1331")
Range("BM3:BM85").Copy Range("CC1414,CD1414")
Range("BQ3:BQ85").Copy Range("CC1497,CD1497")
Range("BU3:BU85").Copy Range("CC1580,CD1580")
Range("BY3:BY85").Copy Range("CC1663,CD1663")
Range("B3:B85").Copy Range("CC1746")
Range("F3:F85").Copy Range("CC1829")
Range("J3:J85").Copy Range("CC1912")
Range("N3:N85").Copy Range("CC1995")
Range("R3:R85").Copy Range("CC2078")
Range("V3:V85").Copy Range("CC2161")
Range("Z3:Z85").Copy Range("CC2244")
Range("AD3:AD85").Copy Range("CC2327")
Range("AH3:AH85").Copy Range("CC2410")
Range("AL3:AL85").Copy Range("CC2493")
Range("AP3:AP85").Copy Range("CC2576")
Range("AT3:AT85").Copy Range("CC2659")
Range("AX3:AX85").Copy Range("CC2742")
Range("BB3:BB85").Copy Range("CC2825")
Range("BF3:BF85").Copy Range("CC2908")
Range("BJ3:BJ85").Copy Range("CC2991")
Range("BN3:BN85").Copy Range("CC3074")
Range("BR3:BR85").Copy Range("CC3157")
Range("BV3:BV85").Copy Range("CC3240")
Range("BZ3:BZ85").Copy Range("CC3323")
Range("C3:C85").Copy Range("CD1746")
Range("G3:G85").Copy Range("CD1829")
Range("K3:K85").Copy Range("CD1912")
Range("O3:O85").Copy Range("CD1995")
Range("S3:S85").Copy Range("CD2078")
Range("W3:W85").Copy Range("CD2161")
Range("AA3:AA85").Copy Range("CD2244")
Range("AE3:AE85").Copy Range("CD2327")
Range("AI3:AI85").Copy Range("CD2410")
Range("AM3:AM85").Copy Range("CD2493")
Range("AQ3:AQ85").Copy Range("CD2576")
Range("AU3:AU85").Copy Range("CD2659")
Range("AY3:AY85").Copy Range("CD2742")
Range("BC3:BC85").Copy Range("CD2825")
Range("BG3:BG85").Copy Range("CD2908")
Range("BK3:BK85").Copy Range("CD2991")
Range("BO3:BO85").Copy Range("CD3074")
Range("BS3:BS85").Copy Range("CD3157")
Range("BW3:BW85").Copy Range("CD3240")
Range("CA3:CA85").Copy Range("CD3323")
Range("D3:D85").Copy Range("CE3")
Range("H3:H85").Copy Range("CE86")
Range("L3:L85").Copy Range("CE169")
Range("P3:P85").Copy Range("CE252")
Range("T3:T85").Copy Range("CE335")
Range("X3:X85").Copy Range("CE418")
Range("AB3:AB85").Copy Range("CE501")
Range("AF3:AF85").Copy Range("CE584")
Range("AJ3:AJ85").Copy Range("CE667")
Range("AN3:AN85").Copy Range("CE750")
Range("AR3:AR85").Copy Range("CE833")
Range("AV3:AV85").Copy Range("CE916")
Range("AZ3:AZ85").Copy Range("CE999")
Range("BD3:BD85").Copy Range("CE1082")
Range("BH3:BH85").Copy Range("CE1165")
Range("BL3:BL85").Copy Range("CE1248")
Range("BP3:BP85").Copy Range("CE1331")
Range("BT3:BT85").Copy Range("CE1414")
Range("BX3:BX85").Copy Range("CE1497")
Range("CB3:CB85").Copy Range("CE1580")

Thanks in advance

Hi@POPSS! Can you attach a sample file to customize the code?

Use:

Please Login or Register  to view this content.

Edit: deleted. Misread the ranges.

Here is the full macro that copies all columns into the three columns and then highlights any matches left of the dash. It works but sometimes slow. I was wondering if there was a better way to copy and paste that would stop the clipboard error and speed up the process
Thanks in advance

Please Login or Register  to view this content.

[/CODE]

Originally Posted by POPSS

Here is the full macro

It is very difficult to read this code. Please edit your first and also most recent post to add code tags. I assume you have seen this done sometime in the last 6 years.

Administrative Note:

Welcome to the forum.

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

Please take a moment to add the tags. Posting code between [code]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/code] tags makes your code much easier to read and copy for testing, and it also maintains VBA formatting.

Please see Forum Guideline #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.

Hello @POPSS!
Optimized code for post #1:

Please Login or Register  to view this content.

Regarding your second code from post #5, I had problems with Conditional Formatting. Maybe another user can add to my code. Good luck.

Thanks for the rep.


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

... and don't understand code tags and how to insert them.

See post #6.

Originally Posted by POPSS

I am very much a newbie and don't understand code tags and how to insert them.

You joined the forum 6 years ago which isn't new. I suggest you review our rules and guidelines.

There are two ways to add code tags. One is to select the code part of the text so it is highlighted, then press the "#" button in the edit controls. The other is to simply type in the tags:

[code]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/code]


Why use code tags? Code tags:

1. Are recommended by our guidelines ()
2. Preserve spacing used to show code structure (otherwise leading spaces and repeated spaces are removed)
3. Add scroll bars to navigate code with long lines or a lot of lines

It might help to add:

Please Login or Register  to view this content.

to the start of your total macro.

You should add the code from Trevor's post #3 for starters. I'm also not sure there's any point there to turning printcommunication off then on then off then on all in the same routine. Just turn it off, do all the pagesetup work (which is notoriously slow), then turn it back on.