Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte Word a stlačte " Alt - F11 " zadať Visual Basic integrované vývojové prostredie ( IDE ) .
2
Kliknite " Vložiť " menu hlavičky, kliknite na tlačidlo " modul " pridať nový modul , v ktorom sa vstúpiť programový kód pre vytvorenie novej vlastnosti .
3
Zadajte nasledujúci kód do nového okno modulu :
Public Sub AddProperty ( )
ActiveDocument.CustomDocumentProperties.Add _
Name : = " newproperty " , LinkToContent : = False , Value : = " SomeValue " , _
Type : = msoPropertyTypeString
End Sub
Tento programový kód volá metódu " Pridať " zhromažďovanie existujúcich vlastností dokumentu pridať novú vlastnosť , " newproperty , " k tejto kolekcii .
4
Kliknite na ľubovoľné miesto vnútri AddProperty podprogram , potom stlačte " F5 " pre spustenie programu .
5
Stlačte tlačidlo " Alt - F11 " na návrat do aplikácie Word . Kliknite na tlačidlo Microsoft Office v ľavom hornom rohu obrazovky , umiestnite kurzor myši nad " Pripravte sa . "
6
Kliknite na tlačidlo " Vlastnosti " kliknite na kartu " Vlastné " , zobrazí sa zoznam vlastných vlastnosti dokumentu . " Properties " panel zobrazuje " newproperty " majetok a jeho pridružené hodnoty , " SomeValue " , ktorý ste pridali v kroku 3 a 4.
Vyzvať užívateľa na zadanie mena objektu
7
Stlačte tlačidlo " Alt - F8 " sa zobrazí zoznam makier ( tj programy VBA ) . Kliknite na " AddProperty " položku, kliknite na tlačidlo " Upraviť " . Táto akcia vás vráti do podprogramu , ktorý pridáva vlastné majetok .
8
Vyberte príkazy medzi " Public Sub " a " End Sub " vyhlásenie , potom stlačte tlačidlo " Delete " na ich odstránenie .
9
Zadajte nasledujúce nové príkazy v medzi " Public Sub " a " End Sub " vyhlásenie :
dim propertyName , propertyvalue ako reťazec
propertyName = InputBox ( " prosím , zadajte názov pre novú vlastnosť . " )
PropertyValue = InputBox ( " Zadajte hodnotu pre novú vlastnosť . " )
ActiveDocument.CustomDocumentProperties.Add _
Name : = PropertyName , LinkToContent : = False , _
Hodnota : = PropertyValue , Type : = msoPropertyTypeString
Tieto výkazy vyzve užívateľa na zadanie nového majetku a jeho hodnoty , potom vytvorte nový majetok od vstupu užívateľa .
10
tlačidlo " Alt - F8 " sa vrátite do dokumentu programu Word , kliknite na tlačidlo " Alt - F8 " sa zobrazí zoznam VBA podprogramov .
11
Double - kliknite na " AddProperty " položku , ktorú chcete spustiť svoje revidované podprogram , ktorý vás vyzve na zadanie názvu a hodnoty novej nehnuteľnosti dokumente . Zadajte ľubovoľný text na oboch položiek .
12
Overte vytvorenie nového majetku , pri pohľade na ňu v okne Vlastnosti dokumentu , rovnako ako v bode 1 , krok 6.