質問: エクセル>>罫線>>色>>一括変更できますか? エクセル(excel2000)で文書を作成しました。 かなり複雑な罫線が入り込んだ「発注書」のようなイメージです。 記入者の属性ごと(お客様、受注担当者、業者など)に 罫線の色を変えていたのですが、モノクロ印刷時に濃淡に 差が出てしまい、都合がよくありません。 そこでシート全体を選択した上で、書式⇒セル⇒罫線タブ⇒色 で「黒」を指定したのですが、まったく反映されません。 罫線の種類を指定すると色も変更されるのですが、 本来空白のセルまで実線で表示されてしまい、うまくいきません。 個別に指定していくやり方はかなり手間なので、 シート全体の罫線の色を一括変更する方法を教えてください。 よろしくお願いします。
回答: 印刷で濃淡をつけたくないなら#01さんの回答で解決されていると思います。もし「シート全体の罫線の色を一括変更する方法」が必要なら以下のマクロを実行して下さい sub edgecolormod() dim r as range dim i as integer for each r in activesheet.usedrange for i = 7 to 10 if r.borders(i).linestyle <> xlnone then r.borders(i).colorindex = xlautomatic end if next i next r end sub マクロはalt+f11でvbe画面を開き、「vbaprojectエクスプローラのシート名右クリック」→「挿入」→「標準モジュール」で表示される画面にペーストして下さい。実行はシート画面に戻って、alt+f8を押してマクロ一覧からマクロ名を選択します。