Freigeben über


Document.Company-Eigenschaft (Visio)

Ruft den Namen der Firma ab, der das Dokument gehört (eine der Dokumenteigenschaften), oder legt den Namen fest. Lese-/Schreibzugriff.

Syntax

Ausdruck. Firma

Ausdruck Eine Variable, die ein Document-Objekt darstellt.

Rückgabewert

String

Hinweise

Das Festlegen der Company-Eigenschaft entspricht der Eingabe von Informationen in das Feld Unternehmen im Dialogfeld Eigenschaften (klicken Sie auf die Registerkarte Datei , klicken Sie auf Info, klicken Sie auf Eigenschaften und dann auf Erweiterte Eigenschaften).

Beispiel

Dieses Microsoft Visual Basic-Makro veranschaulicht, wie Sie mit der Company-Eigenschaft die Firma dokumentieren, für die die Zeichnung erstellt wird. Es fügt der Documents-Auflistung ein Document-Objekt hinzu und legt die Company-Eigenschaft und weitere Eigenschaften des Document-Objekts fest.

Ersetzen Sie im folgenden Code die kursiven Elemente durch eigene Werte, bevor Sie dieses Makro ausführen. Öffnen Sie das Dialogfeld Eigenschaften, um zu überprüfen, ob diese Eigenschaften festgelegt wurden.

 
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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.