'Su un modello word ho creato una macro associata ad un pulsante che premuto salva il documento nel percorso da me indicato. Finchè sono sul modello funziona. nel momento in cui apro un documetno nuovo derivante da quel modello e premendo sul pulsante per salvare mi si apre la finestra del file\salva con nome dando la possibilità all'utente di scegliere il percorso e ingorando la macro. Come posso far si che aprendo un documento derivante dal modello poi esagua la macro e mi salvi nel percorso da me indicato. Di seguito vi è lo script da me utilizato:
Sub Salva_con_nome()
'
' Salva_con_nome Macro
' Macro registrata il 01/02/2006 da .....
'
Documento1 = ActiveDocument.Name
pos = InStr(Documento1, ".")
If pos > 0 Then
Documento1 = Left(Documento1, pos - 1)
Documento1 = Documento1 & ".doc"
ActiveDocument.SaveAs "C:\note.doc"
End If
MsgBox ("Documento salvato")
ActiveDocument.Close
Application.Quit
End Sub
Grazie mille
Rispondi quotando