Word: da campo modulo a file di testo con VBA script

Questo VBA script per Word consente di salvare il contenuto dei moduli di un file Word in un file di testo esterno.

Alcune premesse:

  • Il documento Word deve essere protetto (Strumenti – proteggi documento – Consenti compilazione moduli)
  • In questo esempio specifico i campi modulo devono avere come segnalibro rispettivamente “campo1”, “campo2”, “campo3”, “campo4”, ecc.
  • Nella macro devono essere impostati il numero di campi ed il nome/percorso del file di registro.

Di seguito è riportata la macro da abbinare ad un pulsante:

Private Sub CommandButton1_Click()

Dim file_ini, miariga As String
Dim i, num_campi As Integer

'----------------------------------------------------------------------
'Parametri da personalizzare
file_ini = "c:\registro.txt"
num_campi = 5
'-----------------------------------------------------------------------

Open file_ini For Append As #1
For i = 1 To num_campi
    miariga = miariga & ActiveDocument.FormFields("campo" & i).Result
    miariga = miariga & ";"
Next

Print #1, miariga 'scrive tutti i campi word (separati da ";" su una riga del file)
Close #1 'Chiusura File
End Sub

Ogni volta che si preme il pulsante viene aggiunta una riga al file di registro. Se il contenuto dei moduli nel file fosse così impostato:

campo_modulo1 = testo modulo 1
campo_modulo2 = mio testo modulo 2
campo_modulo3 = prova modulo 3
campo_modulo4 = testo modulo 4
campo_modulo5 = modulo numero 5

al file di registro verrebbe aggiunta la seguente riga:

testo modulo 1;mio testo modulo 2;prova modulo 3;testo modulo 4;modulo numero 5;

Quindi il contenuto dei moduli viene inserito su una stessa riga (record), con il valore di ogni campo modulo separato da “;”.

In allegato un esempio del file Word.

Lascia un commento

Inserisci i tuoi dati qui sotto o clicca su un'icona per effettuare l'accesso:

Logo WordPress.com

Stai commentando usando il tuo account WordPress.com. Chiudi sessione / Modifica )

Foto Twitter

Stai commentando usando il tuo account Twitter. Chiudi sessione / Modifica )

Foto di Facebook

Stai commentando usando il tuo account Facebook. Chiudi sessione / Modifica )

Google+ photo

Stai commentando usando il tuo account Google+. Chiudi sessione / Modifica )

Connessione a %s...

%d blogger cliccano Mi Piace per questo: