Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

67504 / 76732

←次へ　｜　前へ→


	【13783】Re:セルに文字を入力したらその行の色をすべ...

つん

- 04/5/13(木) 13:28 -


	引用なし

	パスワード

VINAKA＿BULA さん、こんにちは

>現在進捗を作成しております。
>　　A　B　C　D　E　F　G
>1
>2
>3
>4
>
>B1に値が入力されたら１の行をすべて例えば水色に。
>B2に値が入力されたら１の行をすべて例えば黄色に更新。
>B3に値が入力されたら１の行をすべて例えば赤色に再び更新。
>ひとつのデーターは１つの行しか使用しません

B1、B2、B3が変更されるたびに、１行目の色を変化させるってことですか？

Private Sub Worksheet_Change(ByVal Target As Range)

　　With Rows(1).Interior
　　　　If Target.Address = "$B$1" Then
　　　　　　.ColorIndex = 34
　　　　ElseIf Target.Address = "$B$2" Then
　　　　　　.ColorIndex = 36
　　　　ElseIf Target.Address = "$B$3" Then
　　　　　　.ColorIndex = 3
　　　　End If
　　End With

End Sub

こういうこと？
違うような気もする今日この頃・・・

0 hits

▼

【13782】セルに文字を入力したらその行の色をすべ... VINAKA＿BULA 04/5/13(木) 13:09