如果在自定义视图中包含打印设置,则该值为 True。Boolean 类型,只读。
本示例创建一个包括活动工作簿中的自定义视图、对应打印设置和行列设置的清单。
With Worksheets(1)
.Cells(1,1).Value = "Name"
.Cells(1,2).Value = "Print Settings"
.Cells(1,3).Value = "RowColSettings"
rw = 0
For Each v In ActiveWorkbook.CustomViews
rw = rw + 1
.Cells(rw, 1).Value = v.Name
.Cells(rw, 2).Value = v.PrintSettings
.Cells(rw, 3).Value = v.RowColSettings
Next
End With