次の方法で共有


PictureFormat.FileSize プロパティ (Publisher)

長さ をバイト単位で指定された文書で図または OLE オブジェクトのサイズが表示されますが返されます。 読み取り専用です。

構文

ファイルサイズ

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

戻り値

Long

注釈

図または OLE オブジェクトがリンクしている場合、リンク先のファイル サイズを調べるには、 OriginalFileSize プロパティを使用します。

図形がリンクされた図を表すかどうかを判断するには、Shape オブジェクトの Type プロパティまたは PictureFormat オブジェクトの IsLinked プロパティを使用します。

次の使用例は、作業中の文書内の各図を調べて、リンクされた図に対して選択されているイメージのプロパティを出力します。

Dim pgLoop As Page 
Dim shpLoop As Shape 
 
For Each pgLoop In ActiveDocument.Pages 
 For Each shpLoop In pgLoop.Shapes 
 If shpLoop.Type = pbLinkedPicture Then 
 
 With shpLoop.PictureFormat 
 
 Debug.Print "File Name: " & .Filename 
 Debug.Print "Original File Size: " & .OriginalFileSize & " bytes" 
 Debug.Print "File size in publication: " & .FileSize & " bytes" 
 End With 
 End If 
 Next shpLoop 
Next pgLoop 

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。