Прочитать на английском

Поделиться через


Объект CustomLabel (Word)

Представляет пользовательскую метку рассылки. Объект CustomLabel является членом коллекции CustomLabels . Коллекция CustomLabels содержит все настраиваемые метки рассылки, перечисленные в диалоговом окне Параметры метки .

Замечания

Используйте CustomLabels (Index), где Index — это имя пользовательской метки или номер индекса, чтобы вернуть один объект CustomLabel . В следующем примере создается документ с существующим пользовательским макетом меток с именем "Мои метки".

Set ML = Application.MailingLabel 
If ML.CustomLabels("My Labels").Valid = True Then 
 ML.CreateNewDocument Name:="My Labels" 
Else 
 MsgBox "The My Labels custom label is not available" 
End If

Номер индекса представляет позицию настраиваемой метки рассылки в коллекции CustomLabels . В следующем примере отображается имя первой пользовательской метки рассылки.

If Application.MailingLabel.CustomLabels.Count >= 1 Then 
 MsgBox Application.MailingLabel.CustomLabels(1).Name 
End If

Примечание

Объекты CustomLabel сортируются в алфавитном порядке в коллекции CustomLabels, а их номера индексов динамически переназначаются по мере изменения содержимого коллекции. По этой причине безопаснее ссылаться на конкретный объект CustomLabel по имени, а не по номеру индекса.

Используйте метод Add для создания настраиваемой метки. В следующем примере добавляется пользовательская метка с именем "Моя метка" и устанавливается размер страницы.

Set ML = _ 
 Application.MailingLabel.CustomLabels.Add(Name:="My Labels", _ 
 DotMatrix:=False) 
ML.PageSize = wdCustomLabelA4

См. также

Справочник по объектной модели Word

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.