Come aggiungere una proprietà a un documento di Word in VBA

September 19

Come aggiungere una proprietà a un documento di Word in VBA


Ogni documento di Microsoft Word contiene più informazioni rispetto a ciò che un utente in modo esplicito i tipi o paste in esso. Le informazioni in più appare nelle proprietà del documento, che sono una serie di campi che indicano di creazione e di modifica date del documento, il titolo, i commenti degli utenti e dei dati amministrativi. utenti di Word possono aggiungere nuove proprietà del documento con il menu standard di Word. Oppure, possono usare il linguaggio di scripting di Word, Visual Basic, Applications Edition (VBA). Utilizzando VBA per aggiungere una proprietà permette di aggiungere automaticamente i dati relativi al contenuto del documento. Ad esempio, il codice VBA potrebbe distillare il contenuto del documento in un elenco di parole tag, per rendere la ricerca del documento successivamente più facile.

istruzione

Aggiungere una nuova proprietà

1 Aprire Word e premere il tasto "Alt-F11" per accedere al Visual Basic Integrated Development Environment (IDE).

2 Fare clic su "Inserisci" intestazione del menu, quindi fare clic su "modulo" per aggiungere un nuovo modulo in cui inserire il codice di programma per la creazione di una nuova proprietà.

3 Digitare il seguente codice nella finestra del nuovo modulo:

Public Sub AddProperty ()

ActiveDocument.CustomDocumentProperties.Add _

Name: = "newproperty", LinkToContent: = False, Valore: = "SomeValue", _

Tipo: = msoPropertyTypeString

End Sub

Questo codice di programma chiama il metodo "Add" della collezione di proprietà del documento esistenti per aggiungere una nuova proprietà, "newproperty," a quella raccolta.

4 Fare clic in qualsiasi punto all'interno della subroutine AddProperty, quindi premere il tasto "F5" per eseguire il programma.

5 Premere il tasto "Alt-F11" per tornare a Word. Fare clic sul pulsante Microsoft Office in alto a sinistra dello schermo, quindi posizionare il mouse su "Prepara".

6 Fai clic su "Proprietà", quindi fare clic sulla scheda "Custom" per visualizzare l'elenco delle proprietà personalizzate per il documento. Il riquadro "Proprietà" visualizza la proprietà "newproperty" e il suo valore associato, "SomeValue", che si è aggiunto ai punti 3 e 4.

Richiedere all'utente per un nome di proprietà

7 Premere il tasto "Alt-F8" per visualizzare un elenco di macro (ad esempio, programmi VBA). Fare clic sulla voce "AddProperty", quindi fare clic sul pulsante "Modifica". Questa azione si ritorna alla subroutine che aggiunge la proprietà personalizzata.

8 Selezionare le istruzioni tra il "Public Sub" e "End Sub" dichiarazioni, quindi premere il tasto "Elimina" per eliminarli.

9 Digitare le seguenti nuove dichiarazioni tra il "Public Sub" e le dichiarazioni "End Sub":

dim PropertyName, PropertyValue come stringa

PropertyName = InputBox ( "Inserire il nome per una nuova proprietà.")

PropertyValue = InputBox ( "Inserire un valore per la nuova proprietà.")

ActiveDocument.CustomDocumentProperties.Add _

Nome: = NomeProprietà, LinkToContent: = False, _

Valore: = PropertyValue, Tipo: = msoPropertyTypeString

Queste dichiarazioni richiedere all'utente una nuova proprietà e il suo valore, quindi creare la nuova proprietà dall'input dell'utente.

10 Premere il tasto "Alt-F8" per tornare al documento di Word, quindi premere il tasto "Alt-F8" per visualizzare l'elenco di subroutine VBA.

11 Fare doppio clic sulla voce "AddProperty" per eseguire la subroutine rivisto, che vi chiederà il nome e il valore di una nuova proprietà del documento. Digitare qualsiasi testo per entrambe le voci.

12 Verificare la creazione della nuova proprietà, cercando per esso nella finestra delle proprietà del documento, come avete fatto nella sezione 1, punto 6.