View Single Post
 
Old 06-09-2017, 03:24 PM
macropod's Avatar
macropod macropod is offline Windows 7 64bit Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 21,963
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default

All you should need to change is:
strFile = Dir(strFolder & "\*.doc")
to:
strFile = Dir(strFolder & "\*.htm")
The saved files should retain the original format and no new files should be created.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote