枠線を非表示にすると、図形等を使って操作手順書を作成する時に、再度キャプチャする場合に非表示にしておいて使う事が多いです。
※ 余談ですが、フォントを 24ポイント以上にすると Excel 内で綺麗に表示されます。
2007 〜 2010
表示タブ
※ 画像は 2010
ページレイアウトタブ
2000 〜 2003
[ツール] メニューの [オプション] をクリックし、[表示] タブをクリック。
[ウィンドウ オプション] の [枠線] チェック ボックスをオフ。
マクロ
Sub Macro1()
'
' Macro1 Macro
'
'
ActiveWindow.DisplayGridlines = False
End Sub
Window.DisplayGridlines Property (Excel 2010)
Window.DisplayGridlines Property (Excel 2007)
VBScript でのコントロール
' スクリプトの存在するディレクトリのパス
Set Fso = CreateObject( "Scripting.FileSystemObject" )
strCurPath = WScript.ScriptFullName
Set obj = Fso.GetFile( strCurPath )
Set obj = obj.ParentFolder
strCurPath = obj.Path
Set App = CreateObject("Excel.Application")
' ユーザーに入力を促すメッセージを表示させないようにする
App.DisplayAlerts = False
' 表示状態にする
App.Visible = True
' 開く
on error resume next
Set Workbook = App.Workbooks.Open( strCurPath & "\経費.xlsx" )
if Err.Number <> 0 then
MsgBox( Err.Description )
App.Quit
Wscript.Quit
end if
on error goto 0
if Workbook is Nothing then
MsgBox( Err.Description )
App.Quit
Wscript.Quit
end if
MsgBox( "待機" )
' 罫線を非表示にする
App.ActiveWindow.DisplayGridlines = False
MsgBox( "確認" )
For Each Workbook In App.Workbooks
' 全てのブックを保存した事にする
WorkBook.Saved = True
Next
App.Quit
関連するページ
Excel の処理 ( VBScript のクラス )