Come aggiungere una proprietà ad 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 le paste in esso. Le informazioni supplementari appare nella proprietà del documento , che sono una serie di campi che indicano la creazione del documento e le date di modifica , titolo , commenti degli utenti e dati amministrativi . Gli utenti di Word possono aggiungere nuove proprietà del documento con il menu standard di Word . In alternativa, si può 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 . Per esempio , il codice VBA potrebbe distillare il contenuto del documento in un elenco di parole tag , per rendere trovare il documento successivamente più facile .
Istruzioni Aggiungere una nuova proprietà
1

Aprire Word e premere il tasto "Alt - F11 " per entrare nell'ambiente di sviluppo integrato di Visual Basic ( IDE ) .
2

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

digitare il seguente codice nel nuovo finestra del modulo :

Public Sub AddProperty ( ) per

ActiveDocument.CustomDocumentProperties.Add _

Nome : = " newproperty " , LinkToContent : = False , valore: = " SomeValue " , _

Type : = msoPropertyTypeString

End Sub

Questo codice programma chiama la "Add" metodo della raccolta delle proprietà del documento esistente per aggiungere una nuova proprietà , " newproperty , "per quella collezione .
4

cliccare ovunque all'interno della subroutine AddProperty , quindi premere " F5 " per eseguire il programma .
5

premere" Alt- F11 "per tornare a Word . Fare clic sul pulsante Microsoft Office in alto a sinistra dello schermo, quindi posizionare il mouse su " Preparazione ".
6

Fare clic su " Proprietà ", quindi fare clic sulla scheda " Custom" per visualizzare l'elenco di costume proprietà del documento . Il riquadro "Proprietà" viene visualizzata la proprietà " newproperty " e il suo valore associato , " SomeValue ", che si è aggiunto ai punti 3 e 4 .
Richiedere all'utente un nome di proprietà

7

Premi " Alt-F8 " per visualizzare un elenco di macro ( ad esempio , i programmi di VBA ) . Fare clic sulla voce " AddProperty " , quindi fare clic sul pulsante "Modifica" . Questa azione consente di tornare alla subroutine che aggiunge la proprietà personalizzata .
8

Selezionare le istruzioni tra le " Public Sub " e le dichiarazioni "End Sub ", quindi premere "Delete" per cancellarli.
Pagina 9

Tipo le seguenti nuove dichiarazioni in tra le " Public Sub " e le dichiarazioni "End Sub " :

dim NomeProprietà , PropertyValue come stringa

NomeProprietà = InputBox ( " Si prega di inserire il nome di una nuova proprietà . " ) per

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

ActiveDocument.CustomDocumentProperties.Add _

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

valore: = PropertyValue , Type : = msoPropertyTypeString

Queste dichiarazioni richiedere all'utente una nuova proprietà e il suo valore , quindi creare il nuovo proprietà da l'input dell'utente .
10

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

doppio clic sulla voce " AddProperty " per eseguire la subroutine riveduta , che vi chiederà il nome e il valore di una nuova proprietà del documento . Digitare il 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.

• Come convalidare un indirizzo e-mail in VB 
• Come cambiare la password di amministratore locale in VBScript