人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

図のような、黒地に白文字の画面をキャプチャした画像が、EXCELのシートの数十枚貼り付けてあります。
EXCELから印刷しようと思うのですが、黒地部分をそのまま印刷してしまうと、インクがもったいないです。
白字の文字が読めればよいので、現在は、EXCELに貼り付けてある画像を一枚一枚、別の画像ソフトでネガポジ変換して、白地に黒字にしてから、再度EXCELに貼り付けるようなやり方をしていますが、画像がたくさんあるので非常に手間です。
そこで、EXCEL上から、配置してある画像を簡単にネガポジ変換する方法、または印刷時にインクを無駄にしない方法(文字の視認性は確保)があれば教えてください。

1205219697
●拡大する


●質問者: sls
●カテゴリ:コンピュータ 生活
✍キーワード:Excel もったいない キャプチャ ソフト ネガ
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● bmax
●60ポイント ベストアンサー

1.印刷したいシートを選択してください。


2.メニューの 「ツール」 → 「マクロ」 → 「VisualBasicEditor」 の順に選択し

VBAの編集ツールを立ち上げます。


3.VisualBasicEditorのメニューの 「挿入」 から 「標準モジュール」を選択してください。


4.Module1の編集ウインドウが開きますので以下のコードを貼り付けてください。

Sub EcoPrint()

Dim myShape As Shape

For Each myShape In ActiveSheet.Shapes

If myShape.Type = msoPicture Then

myShape.PictureFormat.TransparentBackground = msoTrue

myShape.PictureFormat.TransparencyColor = RGB(0, 0, 0)

myShape.Fill.Visible = msoFalse

myShape.PictureFormat.Brightness = 0#

myShape.PictureFormat.Contrast = 1#

End If

Next

End Sub


5.VisualBasicEditorを終了するか、タスクを切り替えてExcelに戻り、印刷してください。



手法としては

マクロを組んで、黒の背景を透過色に、白字の部分を 明るさ0=黒にしています。


サンプルの画像で試しに動かしましたが、実際の画像の背景色が厳密な黒(RGB(0, 0, 0))ではない場合、コードの中の該当部分を変更してください。


背景色の確認の仕方ですが、

「マクロの記録」を行っている状態で、該当の図を選択し、表示される"図"メニューから

「透明な色に設定」を選び、背景の黒い部分をクリックしてください。

その後、マクロの記録を終了し、そのマクロの編集を行っていただければ、RGBの値が分かると思います。

◎質問者からの返答

ありがとうございます!

最高です!

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ