Il giorno giovedì 14 febbraio 2013 21:41:48 UTC+1, T_A_O ha scritto:
> Devo purtroppo chiedere ancora assistenza in quanto, pur funzionando
> perfettamente su word2010, la formula risulta indigesta a word03, sui
> pc che ho in ufficio, ed il documento, alla chiusura, mi chiede
> comunque di salvare e se si risponde affermativamente, le modifiche
> apportate vengono salvate.
> In word 2010 invece il documento si chiude senza nessuna richiesta, le
> modifiche vengono annullate e questo è esattamente ciò che vorrei
> ottenere.
> Devo modificare in qualche modo la il codice?
Ciao T_A_O,
prova cosi':
' ThisDocument - (Word Document - Visual Basic Public Class Module)
'
Option Explicit
Private WithEvents wdApp As Word.Application
Private Sub Document_Close()
Set wdApp = Nothing
End Sub
Private Sub Document_Open()
Set wdApp = Me.Application
End Sub
Private Sub wdApp_DocumentBeforeClose(ByVal Doc As Document _
, ByRef Cancel As Boolean)
If Doc Is Me Then Me.Saved = True
End Sub
--
Ciao!
Maurizio