![]() |
#3
|
|||
|
|||
![]()
Hi,
Let us focus on my real issue and not my variables and so on. If we focus on this piece of code. Code:
Public WithEvents oApp As Word.Application SystemManager.oApp = Word.Application Private Sub oApp_DocumentBeforeSave(ByVal Doc As Document, _ SaveAsUI As Boolean, Cancel As Boolean) With Dialogs(wdDialogFileSaveAs) .name = "SomeSpecificFileName" .Show End With End Sub If I instead put the following in to the code, it will open the save as dialog in the rigth folder. Code:
Public WithEvents oApp As Word.Application SystemManager.oApp = Word.Application Private Sub oApp_DocumentBeforeSave(ByVal Doc As Document, _ SaveAsUI As Boolean, Cancel As Boolean) With Dialogs(wdDialogFileSaveAs) .name = "C:\Temp\SomeSpecificFileName" .Show End With End Sub |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
EweWho | Word | 17 | 06-05-2017 09:40 AM |
![]() |
wordhasfailedmetwice | Word | 3 | 11-17-2016 04:09 PM |
How to use a "Save As" button without causing digital signatures to become "Invalid"? | jferg | Word VBA | 0 | 02-16-2016 03:04 PM |
"Open Recent" and "More..." in Excel and Word | BudVitoff | Office | 0 | 04-03-2015 09:17 PM |
Disable "Save" & "Save As" & "Print" ribbon | Villalobos | Word VBA | 3 | 07-14-2014 11:37 PM |