- ベストアンサー
現在選択している行すべてに色を付ける
- みんなの回答 (4)
- 専門家の回答
質問者が選んだベストアンサー
>マクロを組まないと無理ですか? はい、ムリです。既出のご回答でも全て、マクロが使われていますね。 なお No.1 さんのご回答については、「Application.ScreenUpdating = True」を「calculate」に書き換えても、ご要望の結果が得られます。
その他の回答 (3)
- tom04
- ベストアンサー率49% (2537/5117)
回答No.3
こんばんは! 複数行をまとめて選択した場合でも対応できるようにしてみました。 色は「薄い黄色」にしています。 シートモジュールです。 Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.Interior.ColorIndex = xlNone Rows(Selection(1).Row & ":" & Selection(Selection.Count).Row).Interior.ColorIndex = 36 End Sub ※ 選択範囲が飛び飛びの場合はうまく反応しません。m(_ _)m
質問者
お礼
回答頂きありがとうございました。
- 久保 泰臣(@omi3_)
- ベストアンサー率24% (254/1030)
回答No.2
とりあえず '選択行をハイライトに Private Sub Worksheet_SelectionChange(ByVal Target As Range) Cells.Interior.ColorIndex = xlNone Rows(Selection.Row).Interior.ColorIndex = 6 End Sub
質問者
お礼
回答頂きありがとうございました。
- keithin
- ベストアンサー率66% (5278/7941)
回答No.1
条件付き書式とマクロを併用します。 手順: http://www.relief.jp/itnote/archives/001406.php
質問者
お礼
回答頂きありがとうございました。
お礼
回答頂きありがとうございました。