Hi Host
In Word 2003, all caption label definitions are saved in normal.dot. That's
just how Word is, and you can't change that.
If you want your colleague to use your document, your colleague will need to
set up a caption definition exactly as you have done. Or, you could run a
macro something like the following to do it. If you're not sure what to do
with the macro, see Graham Mayor's Idiots' Guide to Installing Macros at
http://www.gmayor.com/installing_macro.htm
Sub AddCaptionLabel()
'Change this line to use your label name
Const csLabelName As String = "MyLabel"
Dim oCaptionLabel As Word.CaptionLabel
With Word.Application
On Error Resume Next
Set oCaptionLabel = .CaptionLabels(csLabelName)
On Error GoTo 0
If oCaptionLabel Is Nothing Then
'We need to create a new label
Set oCaptionLabel = .CaptionLabels _
.Add(Name:=csLabelName)
With oCaptionLabel
'Change or delete any of these lines as appropriate
.IncludeChapterNumber = False
.ChapterStyleLevel = 1
.NumberStyle = wdCaptionNumberStyleArabic
.Separator = wdSeparatorPeriod
End With
End If
End With
End Sub
Hope this helps.
Shauna Kelly. Microsoft MVP.
http://www.shaunakelly.com/word
"hossbear" <hossbear[ at ]planet.ms> wrote in message
news:1159637394.530600.223550[ at ]i42g2000cwa.googlegroups.com...
[Quoted Text] > Hi,
> can any body tell me how i can move a caption definition to another
> template then normal.dot using Word 2003 ?
>
> I need this to generate a template for my colleges with some special
> captions.
>
> Thanx
> Horst
>
|