Looping & Off-setting Question

Hi!

I need help with looping/offsetting a single procedure to every sixth column.

Attached is a small-scale test macro that I made to help better represent what I want it to do – so ultimately I have a working macro, I think…
…but my life would be easier if I utilized looping and off-sets in Module 2, rather than manually Copying and Pasting each column in Module 1, hundreds of times.

• Running Module 1:”Updates1” will complete the action I want (so it’s essentially just an example to show the actions needed).
• Running Module 2: “looptest1” is what I need help with. It will prevent me from typing in each column hundreds of times over.

Thank-you to whomever can help me with this. I hope I explained it clearly!

PS - if there is a way to shorten the coding, I will not be offended. I am a novice.

Nothing attached. No upload present.

Hi BrooksN123

Welcome to the forum...Play around with this...

Please Login or Register  to view this content.

Thanks for the quick response!

Everything seems to be working like a charm, apart from one line:

Please Login or Register  to view this content.

This line draws an Automation error:
"Run-Time error '-24147...'
The object invoked has disconnected from its clients"

Is there something I have to do to avoid this?

Thanks again!

Code Tags Added
Your post does not comply with Rule 2 of our Forum RULES. Use code tags around code.

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, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found at http://www.excelforum.com/forum-rule...rum-rules.html



(I have added them for you today. Please take a few minutes to read all Forum Rules and comply in the future.)

Not able to recreate your error...Try this...

Please Login or Register  to view this content.

........................................
Thanks.gif