エクセルの学校：全文検索：Hyper Estraier： kazu 条件付書式

Results of 1 - 1 of about 406 for kazu 条件付書式 (0.004 sec.)

kazu (7739), 条件付書式 (2650)

[[20080218145658]]: #score: 6689; @digest: 44222796b01f94513412a504a33076fe; @id: 36199; @mdate: 2008-02-18T08:30:35Z; @size: 1313; @type: text/plain; #keywords: オハ (9739), ハラ (5664), mm20040727 (3952), 式wi (3276), ロ勉 (1922), 字色 (1107), e2qw (944), backnumber (854), ラ） (748), ル・ (735), ・マ (708), 超初 (644), colorindex (636), （オ (630), selectionchange (593), 純丸 (574), col (562), 件付 (559), 強中 (557), target (487), font (465), （ha (453), 記述 (351), （純 (322), 丸） (308), 様あ (300), 付書 (285), worksheet (282), hatch (271), 書式 (265), 無視 (264), マイ (263); 『セルの文字色を変えるマクロ』（オハラ）
マクロの超初心者です。一つのブックに複数のシートがあります。そのうち、シート1 だけの処理として A1に1が入力された時、A2の文字色を赤にするというマクロは、どこに記述すればよいのでしょうか。ちなみに、コードは下のとおりの記述でよいのでしょうか。ご教示をお願いいたします。 If Cells(1, 1).Value = 1 Then Range("A2").Select Selection.Font.ColorIndex = 3 Else End If ---- こういった感じでよいですか? Sheet1の見出しを右クリックしてコードの表示からVBEへ入ればよいと思います。（Hatch) エクセル・マイスターのWorksheet_SelectionChange http://www.excel.studio-kazu.jp/mag2/backnumber/mm20040727.html Private Sub Worksheet_Change(ByVal Target As Range) Dim col As Integer If Target.Address(0, 0) <> "A1" Then Exit Sub If Target.Value = 1 Then col = 3 Else col = 1 End If Target.Offset(0, 1).Font.ColorIndex = col End Sub ---- 条件付き書式でいいのでは? 【条件付き書式 Win】 http://www.excel.studio-kazu.jp/lib/e2qw/e2qw.html マクロ勉強中ということなら、このレスは無視して下さい。（純丸）(o^-')b ---- （Hatch)様ありがとうございました。できました。（純丸）(o^-')b様ありがとうございました。 条件付書式の方法は確認しました。（オハラ） ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/200802/20080218145658.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ