VBA 印刷されないシート背景の設定 印刷されないシート背景の設定 Sub test() ' 印刷されないシート背景の設定 Dim myPath As String myPath = ThisWorkbook.Path ActiveSheet.SetBackgroundPicture myPath & "\2025-Pic.png" End Sub Sub test2() ' シート背景の解除 ActiveSheet.SetBackgroundPicture "" End Sub 実行結果 ― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 関連記事 『VBA印刷設定 シートの印刷』 シートの印刷 Sub test() ’ シート1を印刷する Worksheets("sheet1").PrintOutEnd Sub…ameblo.jp 『VBA印刷設定 行列番号を含めて印刷する』 行列番号を含めて印刷する Sub test() ’ 行列番号を含めて印刷する With Worksheets(1) .Page…ameblo.jp 『VBA印刷設定 印刷の余白設定』 印刷の余白設定する Sub test() ’ 印刷の余白設定する With Worksheets(1) ' 印刷の上余白を設定…ameblo.jp 『VBA印刷設定 ページのフッターを設定』 ページのフッターを設定 Sub test() ’ ページのフッターを設定 ' 左フッターを設定する ファイル名WorkSheets(1).Pag…ameblo.jp 『VBA 改ページの挿入と削除』 改ページの挿入と削除 Sub test() ' 垂直改ページの挿入 ActiveSheet.VPageBreaks.Add Before:=R…ameblo.jp 『VBA印刷設定 ページ中央に印刷位置を設定する』 ページ中央に印刷位置を設定する Sub test() ' 水平方向の中央に配置する .PageSetup.CenterH…ameblo.jp 『VBA印刷設定 用紙サイズ、印刷の向きを調整する』 用紙サイズ、印刷の向きを調整する Sub test() With Sheets(1) ' 印刷の向きを縦に設定する …ameblo.jp
『VBA印刷設定 ページのフッターを設定』 ページのフッターを設定 Sub test() ’ ページのフッターを設定 ' 左フッターを設定する ファイル名WorkSheets(1).Pag…ameblo.jp