|
|
#3
03-03-2016, 05:27 AM
|
|||
|
|||
Code:
Sub Document_Open()
Dim oCC As ContentControl
Set oCC = ActiveDocument.SelectContentControlsByTitle("Name").Item(1)
oCC.Type = wdContentControlText
oCC.Range.Text = Application.UserName
oCC.Type = wdContentControlDropdownList
Document_ContentControlOnExit oCC, False
lbl_Exit:
Exit Sub
End Sub
|
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Newbie question on Word 2010 | sunalta | Word | 7 | 09-06-2012 12:49 PM |
 Newbie Question
|
thistlebarrow | PowerPoint | 4 | 04-06-2012 01:46 PM |
|
newbie question
|
DanSandbergUCONN | Word | 5 | 03-06-2011 04:27 PM |
|
Newbie to Powerpoint question
|
Phil66 | PowerPoint | 9 | 06-01-2010 10:51 AM |
| Perhaps a newbie question I know but | as1947 | Excel | 0 | 02-05-2009 08:01 AM |
Windows 7 32bit 
Office 2010 (Version 14.0)
Threaded Mode