aggiornamento automatico di un numero progressivo

[Andrea_BM]

Salve ragazzi,
premesso che non ho alcuna conoscenza relativa all'uso di visual basic, volevo sapere se esiste una macro per word che aggiorna il progressivo di un documento in automatico magari prendendo il numero dall'ultimo documento salvato.
Faccio un esempio compilo una fattura, l'ultima salvata è la numero 4, quando apro o salvo il documento il modulo nella fattura appena salvata si aggiorna automaticamente a 5.
Grazie.

[nicola75ss]

http://word.mvps.org/FAQs/MacrosVBA/NumberDocs.htm

[Andrea_BM]

Ciao grazie mille! Ora provo a farlo girare sul file!

[Andrea_BM]

Ciao il codice, che posto qua:

Sub AutoNew()

Order = System.PrivateProfileString("C:\Settings.Txt", _
"MacroSettings", "Order")

If Order = "" Then
Order = 1
Else
Order = Order + 1
End If

System.PrivateProfileString("C:\Settings.txt", "MacroSettings", _
"Order") = Order

ActiveDocument.Bookmarks("Order").Range.InsertBefo re Format(Order, "00#")
ActiveDocument.SaveAs FileName:="path" & Format(Order, "00#")

End Sub

funziona perfettamente, il fatto è che il segnalibro per esigenze da layout andrebbe messo nell'intestazione del modello, che però è protetto e quindi quando creo un documento mi da un errore di runtime perchè l'oggetto fa riferimento ad un area protetta.
Come si potrebbe fare per farlo girare anche nell'intestazione, senza togliere la protezione al file?

Grazie mille

[nicola75ss]

Bella domanda. Mi cogli impreparato.
Appena ho un attimo di tempo provo a documentarmi. Se trovo il modo ti faccio sapere.

[Andrea_BM]

Grazie mille! cmq ho risolto inserendo nella macro ActiveDocument.Unprotect e ActiveDocument.Protect (wdAllowOnlyFormFields)

Ciao! Grazie ancora per l'aiuto!