Thread: [Solved] Acronym Finder
View Single Post
 
Old 09-22-2014, 11:42 PM
macropod's Avatar
macropod macropod is online now 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 Acronym Finder

Where does currDoc come from? In any event, it has nothing to do with how you're closing the documents, since you're not actually using it for anything. Thus:
Code:
With DocSrc
currDoc = .FullName
.Close SaveChanges:=wdDoNotSaveChanges
End With
With DocAcro
currDoc = .FullName
.Close SaveChanges:=wdDoNotSaveChanges
End With
is functionally equivalent to:
Code:
With DocSrc
.Close SaveChanges:=wdDoNotSaveChanges
End With
With DocAcro
.Close SaveChanges:=wdDoNotSaveChanges
End With
which is functionally equivalent to:
Code:
DocSrc.Close SaveChanges:=wdDoNotSaveChanges
DocAcro.Close SaveChanges:=wdDoNotSaveChanges
which is functionally equivalent to:
Code:
DocAcro.Close False: DocSrc.Close False
which is what I suggested in post #13...
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote