Project) (Application.DocSize 方法
設定使用中視窗的寬度和高度。
語法
expression。 DocSize
( _Width_
, _Height_
, _Points_
)
expression 代表 Application 物件的變數。
參數
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
Width | 選用 | Long | 會指定使用中視窗新寬度的數字。 |
Height | 選用 | Long | 會指定使用中視窗新高度的數字。 |
Points | 選用 | Boolean | True 是表示 如果 Width 和 Height 以點為單位。 為 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 支援與意見反應。