Свойство Document.Company (Visio)

Статья
04/07/2023

Возвращает или задает имя компании, к которой принадлежит документ, одно из свойств документа. Для чтения и записи.

Синтаксис

expression. Компании

Выражение Переменная, представляющая объект Document .

Возвращаемое значение

Строка

Замечания

Задание свойства Company эквивалентно вводу сведений в поле "Компания " в диалоговом окне Свойства (перейдите на вкладку Файл , щелкните Сведения, щелкните Свойства, а затем — Дополнительные свойства).

Пример

В этом макросе Microsoft Visual Basic показано, как использовать свойство Company для документирования компании, для которой создан документ. Он добавляет объект Document в коллекцию Documents и задает свойство Company объекта Document, а также другие свойства.

Перед выполнением этого макроса замените собственные значения для элементов курсивом в следующем коде. Чтобы убедиться, что эти свойства заданы, откройте диалоговое окно Свойства .

 
Public Sub Company_Example() 
  
    Dim vsoDocument As Visio.Document  
 
    Set vsoDocument = Documents.Add("")  
 
    'Set the properties of the document.  
    vsoDocument.Title = "document title "  
    vsoDocument.Creator = "author name "  
    vsoDocument.Description = "document description "  
    vsoDocument.Keywords = "keyword1, keyword2, keyword3 "  
    vsoDocument.Subject = "document subject "  
    vsoDocument.Manager = "manager name "  
    vsoDocument.Company = "company name "  
 
End Sub

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

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

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