Table of contents
TOC
Réduire la table des matières
Développer la table des matières

Document.Company, propriété (Visio)Document.Company Property (Visio)

office 365 dev account|Dernière mise à jour: 14/03/2018
|
2 Collaborateurs

Récupère ou définit le nom de la société à laquelle appartient le document, l’une des propriétés du document. En lecture-écriture.Gets or sets the name of the company the document belongs to, one of the document's properties. Read/write.

SyntaxeSyntax

expression . Sociétéexpression . Company

expression Variable qui représente un objet Document .expression A variable that represents a Document object.

Valeur renvoyéeReturn Value

StringString

RemarquesRemarks

Définir la propriété Company revient à entrer des informations dans la zone de la société dans la boîte de dialogue Propriétés (cliquez sur l’onglet fichier , cliquez sur Info, cliquez sur Propriétés, puis cliquez sur Avancé Propriétés de).Setting the Company property is equivalent to entering information in the Company box in the Properties dialog box (click the File tab, click Info, click Properties, and then click Advanced Properties).

de sécuritéSecurity Note**

ExempleExample

Cette macro Microsoft Visual Basic montre comment utiliser la propriété Company pour documenter la société à laquelle est destiné le dessin. Elle ajoute un objet Document à la collection Documents et définit la propriété Company de l’objet Document ainsi que d’autres propriétés.This Microsoft Visual Basic macro shows how to use the Company property to document the company for which the drawing is made. It adds a Document object to the Documents collection and sets the Document object's Company property as well as other properties.

Avant d’exécuter cette macro, remplacez par vos propres valeurs pour les éléments en italique dans le code suivant. Pour vérifier que ces propriétés ont été définies, ouvrez la boîte de dialogue Propriétés .Before running this macro, substitute your own values for the items in italic in the following code. To verify that these properties have been set, open the Properties dialog box.


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
© 2018 Microsoft