共用方式為


Project) (Application.DocSize 方法

設定使用中視窗的寬度和高度。

語法

expressionDocSize( _Width_, _Height_, _Points_ )

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Width 選用 Long 會指定使用中視窗新寬度的數字。
Height 選用 Long 會指定使用中視窗新高度的數字。
Points 選用 Boolean True 是表示 如果 WidthHeight 以點為單位。 為 false ,則它們會以像素為單位。 預設值為 False

傳回值

布林值

範例

下列範例會並排顯示垂直專案的主視窗內開啟專案。

Sub TileProjectWindowsVertically() 
 
    Dim I As Long   ' Index used in For...Next loop 
     
    For I = 1 To Application.Windows.Count 
        Windows(I).Activate 
        DocSize Width:=UsableWidth / Windows.Count, Height:=UsableHeight, Points:=True 
        DocMove XPosition:=(I - 1) * UsableWidth / Windows.Count, YPosition:=0, Points:=True 
    Next I 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應