午後わてんのブログ

ベランダ菜園とWindows用アプリ作成(WPFとC#)

エクセル2007で印刷のページ区切りの点線をすべてのシートから消したいマクロ

エクセルExcel2007 #Windows
エクセル2007
印刷のページ区切りの点線をすべてのシートから消したいときはマクロ


Private Sub Button点線_Click()
'印刷のページ区切りの点線をすべてのシートで非表示
   Application.ScreenUpdating = False

    For c = 1 To ActiveWorkbook.Sheets.count
        ActiveWorkbook.Sheets(c).DisplayPageBreaks = False
    Next c

   Application.ScreenUpdating = True
    
End Sub
 
 
 

f:id:gogowaten:20191014153339p:plain

何かの拍子ですべてのシートに印刷のページ区切りの点線が表示されてしまって

消し方をググってみたもののシートごとに設定するものしか見つからなくて
マクロに落ち着いた
 

f:id:gogowaten:20191014153645p:plain

以前作ったフォーム
エクセル2007でツールバーのようなものを作ってみた
に登録して一件落着
 
 
参照したところ
ページ区切りの点線を消す：Excel VBA｜即効テクニック｜Excel VBAを学ぶならmoug