Simply insert however much of the lower end of the ' This sub updates the template paths for files after a server

' Update the status bar is just to let us know where we areĪpplication.StatusBar = StrFolder & strFileĬall UpdateTemplateRefs(StrFolder & strFile) ' Call ourself to see if there are subfolders below Set oFolder = FSO.GetFolder(strStartPath) If FSO Is Nothing Then Set FSO = CreateObject('Scripting.FileSystemObject') Sub SearchSubFolders(strStartPath As String) If (Not oFolder Is Nothing) Then GetTopFolder = Set oFolder = CreateObject('Shell.Application').BrowseForFolder(0, 'Choose a folder', 0) MsgBox i & ' of ' & j & ' files updated.', vbOKOnly I uninstalled and reinstalled OPM, but it hasn't made a difference.Dim oSubFolder As Object 'the subfolders collection The only difference I can think of is that Word did an automatic update. I've figured out how to attach it again.Įverything was fine until about 2 weeks ago. Occasionally, Word loses the Add-ins list. Other times, the document compiles just fine with no problems with Word. I've learned to continue without compiling, otherwise Word will crash again. The compiled document is available through OPM, but it thinks the document needs to be compiled on a build. Usually, I can work in the document with no problems, but sometimes when I do the compile of the document that got this message, the compile and save works, but then Word crashes. The document usually opens ok, but OPM gives the error 'Oracle Policy Modeling was unable to open the document as an error occurred with MicroSoft Word: Could not change document template. I started getting an error when I open a rules document through OPM.

Microsoft word 2007 template