No.1ベストアンサー
- 回答日時:
一例(※納請書1の見出しを右クリックして、コードの表示で開いたページに書き込んでください。
)Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$36" Then
ActiveSheet.Tab.ColorIndex = 15
End If
End Sub
この回答への補足
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$10" Then
Target.Offset(-6, 2).Value = Date
End If
End Sub
というマクロがすでに入力されていて下記のような警告が出ます。
知識不足と説明不足で誠に申し訳ありません。
それ故下記のような警告が出ます。
「コバイルエラー
名前が適切ではありません worksheet Change」
反転しています。
Private Sub Worksheet_Change(ByVal Target As Range
「コンパイルエラー
End Sub End Function 1または End Property 以降には、コメントのみが記述できます。」
誠に恐れ入りますがどのようにすればいいか再度ご指導いただきたく御願いします。
色々試行錯誤の結果下記のようにして解決したみたいです。
ご報告します。
これもひとえにあなたのアドバイスのお陰です。
有難うございました。
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$10" Then
Target.Offset(-6, 2).Value = Date
End If
If Target.Address = "$B$36" Then
ActiveSheet.Tab.ColorIndex = 15
End If
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルで”入力シート”の文字書式の変更を”出力シート”で同じ文字書式で印刷したいです。VBA希望 4 2023/04/24 11:07
- Excel(エクセル) 条件に合った数値の合計を表示させたい関数と条件指定の方法 3 2023/05/13 16:07
- Excel(エクセル) マクロVBA別Excelブックにデータ転記 2 2022/07/10 23:35
- Excel(エクセル) エクセルの数式で教えてください。 1 2023/02/02 10:20
- Excel(エクセル) こんなことできますか?例えば、sheetに貼り付けた図形のタイトルを、セルA1の文字で表示する。 5 2022/04/22 15:25
- Visual Basic(VBA) EXCEL VBA 単語置き換え について質問です ブック名 ぶぶぶ シート名 ししし セル V3〜 3 2023/03/08 01:41
- Excel(エクセル) エクセルの祝日に色が反映しない 4 2022/05/18 09:58
- Excel(エクセル) 関数EXACT(文字列,文字列)とexcelVBA 3 2022/04/14 15:07
- Excel(エクセル) 【エクセル】文中に別シートのセルの内容を自動入力したい 6 2022/11/17 11:30
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/12/26 12:05
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
シート見出しの色を自動的に変更させたい
Excel(エクセル)
-
VBAで条件によってシート見出しの色を変更したい
Excel(エクセル)
-
シート見出しの色を自動で変えるには
Excel(エクセル)
-
-
4
セルの値によって、シート見出しの色を変更したい
Visual Basic(VBA)
-
5
【 Excel】シートの見出しに自動で色を付けるには?
Excel(エクセル)
-
6
[EXCELマクロ] シートタブに自動で色をつけるには?
Excel(エクセル)
-
7
EXCEL関数(土日祝日自動色分け)
Excel(エクセル)
-
8
同じ作業を複数のシートに実行させるにはどうしたらいいのでしょうか
Visual Basic(VBA)
-
9
エクセル:シート名を手入力でなく、セル「A1」の文字を出したい。
Excel(エクセル)
-
10
IFS関数の場合で、セルが空白の場合は何も表示しないようにする方法
Excel(エクセル)
-
11
【VBA】色のついたシート名を取得
Visual Basic(VBA)
-
12
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
13
【Excel VBA】シート見出しの色を変更する
Excel(エクセル)
-
14
【エクセル】関数で「A1が0でないならB1を表示」の式
その他(コンピューター・テクノロジー)
-
15
エクセルvba (ByVal Target As Range)について
Excel(エクセル)
-
16
特定の文字を条件に行挿入とそこからセルデータを追加するVBAについて
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【スプレドシート】IMPORTRANGE...
-
Excel 日付を比較したら、同じ...
-
Excelで空白以外の値がある列の...
-
英数字のみ全角から半角に変換
-
会社PCのメールが更新されない
-
Excelで時間計算(負)
-
ウィンドウィズ メモ帳で日付だ...
-
Excel テーブル内の空白行の削除
-
Microsoft Formsの「個人情報や...
-
エクセルで英文字に入れた下線...
-
【Excel VBA】PDFを作成して,...
-
OFFICEで自動保存されたファイ...
-
【スプレッドシート】指定の日...
-
Excelに貼ったリンクについて E...
-
エクセルでXLOOKUP関数...
-
VBAファイルの保存先について
-
エクセルでレーダーチャートの...
-
Outlook 電源OFFの受診の仕方
-
Microsoft Edgeの「ニュースと...
-
何文字超えたファイルだけを抽...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【スプレドシート】IMPORTRANGE...
-
【スプレッドシート】指定の日...
-
英数字のみ全角から半角に変換
-
会社PCのメールが更新されない
-
マイクロソフト 一時使用コード...
-
Office 2021 Professional Plus...
-
エクセルで例えば、関数を使っ...
-
Microsoft Formsの「個人情報や...
-
1つのPCに「Excel 2010」「Exc...
-
エクセルで例えば、A1に㈱ベ...
-
理由を教えてください。
-
エクセルでXLOOKUP関数...
-
マイクロソフト オフィスについて
-
VLOOKUP関数について
-
teams設定教えて下さい。 ①ビデ...
-
Googleのスプレッドシートでシ...
-
【Excel VBA】PDFを作成して,...
-
Microsoft365で写真をアルバム...
-
Outlook で宛先が複数の場合の人数
-
Excel テーブル内の空白行の削除
おすすめ情報