![]() |
|
#10
|
||||
|
||||
|
You can create & update any custom document properties you might require with code like:
Code:
Dim StrClient As String, StrAddr As String
StrClient = "Client Name": StrAddr = "Client Address"
With ActiveDocument
With .CustomDocumentProperties
On Error Resume Next
.Add Name:="Client Name", Type:=msoPropertyTypeString, LinkToContent:=False, Value:=StrClient
.Item("Client Name").Value = StrClient
.Add Name:="Client Address", Type:=msoPropertyTypeString, LinkToContent:=False, Value:=StrAddr
.Item("Client Address").Value = StrAddr
End With
End With
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| User Form - Close Paragraphs | SonyaEnz | Word VBA | 4 | 06-05-2015 06:16 AM |
| User form | abdulgani | Excel | 0 | 12-15-2014 05:54 AM |
| how to save contents in textbox in VB2013 form into a Word document? | saltlakebuffalo | Word VBA | 6 | 12-10-2014 06:12 PM |
Force User to Save As
|
lgillespie | Word | 6 | 09-09-2013 03:13 PM |
User Form
|
placasse47 | Excel Programming | 3 | 08-01-2012 05:57 AM |