Trouble looping through content control blocks in MS Word to then export to Excel

Hello all,

I am attempting to write a macro that will allow me to type data in MS Word using content control blocks (ccblocks) in groups of 25. I then want to extract that data and import in into Excel in the next available or empty row. I then want to move to the next 25 cc blocks in the word document, etc.

I have partial success and I can accomplish my objective but the loop is not efficient and will not allow me automatically loop through groups of 25 blocks. I have to manually type in the number of blocks I want to loop through (using For i = 1 to 25, etc.) instead of just detecting the next 25 blocks. (these will always be in groups of 25 cc blocks). I at times might have hundreds or a thousand rows filled in the excel document so manually writing each set of blocks to loop through isn't efficient.

What I currently have, I map to and open a word document from excel, this is necessary when working off my excel template.

Please Login or Register  to view this content.

Any assistance would be greatly appreciated. P.S. Im working with Office 365 on a MacBook Pro.

Thank you

/r
mascon

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

I did it for you this time. Please read forum rules. Thanks