Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Word / Programming / February 2008

Tip: Looking for answers? Try searching our database.

AutoCaptions for Graphics

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
Roderick O'Regan - 06 Feb 2008 20:01 GMT
I want to create a procedure in a Word 2002 template which adds a
caption below any graphic inserted via the Insert|Picture|From
File...command

At the moment I have the following procedure to do just this but for
Word tables:
    AutoCaptions.CancelAutoInsert
   With AutoCaptions("wfwTable")
       .AutoInsert = True
       .CaptionLabel = CaptionLabels("Table")
   End With
   CaptionLabels("Table").Position = wdCaptionPositionAbove
   With CaptionLabels("Table")
       .NumberStyle = wdCaptionNumberStyleArabic
       .IncludeChapterNumber = False
   End With

What I cannot fathom out is the string which should go where I've got
"wfwTable" above. I know I will have to replace "Table" with "Figure"
and change its position.

Can anyone suggest the correct string, please?

As an aside, I tried to do this manually using the
Insert|Caption|AutoCaption, selected what I thought was the right one
(Bitmap Picture) and then used the Insert|Picture|From File command
and nothing happened. The command refused to work from there on. I
couldn't even reset the selection. Had to create a new Normal.dot!
Stefan Blom - 12 Feb 2008 11:09 GMT
To specify a specific AutoCaption object, use a name listed in the
AutoCaption dialog box. For example, AutoCaptions("Microsoft Equation 3.0")
specifies an equation object.

What is not listed in the dialog box cannot be auto-captioned, as far as I
know.

Signature

Stefan Blom
Microsoft Word MVP

>I want to create a procedure in a Word 2002 template which adds a
> caption below any graphic inserted via the Insert|Picture|From
[quoted text clipped - 24 lines]
> and nothing happened. The command refused to work from there on. I
> couldn't even reset the selection. Had to create a new Normal.dot!
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.