• 
  

  Lägga till en fastighet till ett Word-dokument i VBA

  
  

Varje Microsoft Word-dokument innehåller mer information än vad en användare uttryckligen typer eller pastor i den . Den extra information visas i dokumentets egenskaper , som är en uppsättning fält som anger dokumentets skapande och datum ändringar , titel , kommentarer användare och administrativa uppgifter . Word -användare kan lägga till nya dokument fastigheter med Word standard menyer . Eller så kan de använda Word skriptspråk , Visual Basic for Applications (VBA ) . Med VBA för att lägga till en fastighet gör det möjligt att automatiskt lägga in uppgifter om dokumentets innehåll . Till exempel kan VBA -kod destillera dokumentets innehåll i en förteckning över brickornas ord, gör hitta dokumentet senare lättare

Lägg till ett Ny fastighet


1 .
Öppna Word och tryck på " Alt-F11 " för att öppna Visual Basic integrerad utvecklingsmiljö ( IDE ) .
2 .

Klicka på " Infoga " -menyn rubrik och klicka på " Module " för att lägga till en ny modul som du skriver programkod för att skapa en ny egenskap .
3 .
Skriv följande koden i den nya modulen : s fönster:



Public Sub AddProperty ( )

ActiveDocument . CustomDocumentProperties. Add _

Name :=" newproperty " , LinkToContent :=False , Värde :=" SomeValue " , _

Typ :=msoPropertyTypeString

End Sub



Denna programkod kallar den " Lägg till " metoden för insamling av existerande dokument fastigheter att lägga till en ny fastighet , " newproperty , " till samlingen .
4 .
Klicka inuti den AddProperty subrutin , tryck "F5 "för att köra programmet .
5 .
Tryck på " Alt-F11 "För att återgå till Word . Klicka på Microsoft Office -knappen längst upp till vänster på skärmen , sedan position musen över " Förbered . "
6 .
Klicka på "Egenskaper ", klicka sedan på fliken Anpassad för att visa listan med anpassade egenskaper för dokumentet . "Egenskaper " rutan visar " newproperty " egendom och dess associerade värde ", SomeValue , " där du har lagt i steg 3 och 4 .


uppmana användaren för en egenskap namn


1 .
Tryck på " Alt-F8 "För att visa en lista över makron ( dvs VBA program ) . Klicka på " AddProperty " objektet och klicka sedan på knappen "Redigera" . Denna åtgärd tar dig tillbaka till subrutin som lägger till anpassade egenskapen .
2 .
Välj uttalanden mellan " Public Sub " och " End Sub " uttalanden , tryck sedan " Delete "för att radera dem .
3 .

Skriv följande nya uttryck i mellan " Public Sub " och " End Sub " uttalanden :



dim PropertyName , PropertyValue som en sträng

PropertyName=InputBox ( " Ange namnet på en ny egenskap . " )

PropertyValue=InputBox ( " Ange ett värde för den nya fastigheten. " )

ActiveDocument. CustomDocumentProperties. Add _

Namn :=PropertyName , LinkToContent :=False , _

Värde :=PropertyValue , typ:=msoPropertyTypeString



Dessa uttalanden uppmana användaren till en ny fastighet och dess värde , sedan skapa den nya egenskapen från användarens input .
4 .
Tryck på " Alt-F8 "för att återgå till Word- dokumentet , tryck sedan " Alt-F8 "för att visa listan med VBA subrutiner .
5 .
Dubbelklicka på " AddProperty -punkt för att köra din ändrade subrutin , som kommer att fråga dig efter namn och värdet av ett nytt dokument egendom . Skriv in valfri text för båda posterna .
6 .
Kontrollera skapandet av den nya fastigheten genom att leta efter det i dokumentet fönstret som du gjorde i avsnitt 1 , steg 6 .

Previous：nothing Next：hur man ändrar ett heltal till en sträng i Java

Relaterade artiklar