次の方法で共有


Document.Company プロパティ (Visio)

ドキュメントのプロパティの 1 つである、ドキュメントが属する会社の名前を取得または設定します。 値の取得と設定が可能です。

構文

会社

Document オブジェクトを表す変数。

戻り値

文字列

注釈

Company プロパティの設定は、[プロパティ] ダイアログ ボックスの [会社] ボックスに情報を入力することと同じです ([ファイル] タブをクリックし、[情報]、[プロパティ] の順にクリックし、[詳細プロパティ] をクリックします)。

この Microsoft Visual Basic マクロは、Company プロパティを使用して図面を作成した会社名を記録します。 このマクロは、Document オブジェクトを Documents コレクションに追加し、Document オブジェクトの Company プロパティおよび他のプロパティを設定します。

このマクロを実行する前に、次のコードに斜体で表示された項目を、実際に使用する値に変更してください。 これらのプロパティが設定されていることを確認するには、[プロパティ] ダイアログ ボックスを開きます。

 
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 のサポートおよびフィードバックを参照してください。