Thread: Loop true all opned word document
View Single Post
 
Old 06-12-2017, 05:27 PM
Guessed's Avatar
Guessed Guessed is offline Windows 10 Office 2013
Expert
  
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 4,158
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default
That code is only looping Words, not documents. Try nesting your loops like the following aircode
Code:
Dim aDoc as Document, wd as Range
For each aDoc in Application.Documents
  For each wd in aDoc.Words
    'do stuff
  Next wd
Next aDoc
__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia
Reply With Quote