Point :水平スクロールバー・垂直スクロールバーを非表示にしたい。 Sub Test()
MsgBox "水平スクロールバーを非表示にします。"
ActiveWindow.DisplayHorizontalScrollBar = False
MsgBox "次に垂直スクロールバーを非表示にします。"
ActiveWindow.DisplayVerticalScrollBar = False
MsgBox "スクロールバーを表示します。"
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
End Sub
|