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(エクセル)
-
シート見出しの色を自動で変えるには
Excel(エクセル)
-
VBAで条件によってシート見出しの色を変更したい
Excel(エクセル)
-
-
4
【 Excel】シートの見出しに自動で色を付けるには?
Excel(エクセル)
-
5
セルの値によって、シート見出しの色を変更したい
Visual Basic(VBA)
-
6
[EXCELマクロ] シートタブに自動で色をつけるには?
Excel(エクセル)
-
7
EXCEL関数(土日祝日自動色分け)
Excel(エクセル)
-
8
エクセルで複数のシートのクリアをしたいです
Excel(エクセル)
-
9
エクセル:シート名を手入力でなく、セル「A1」の文字を出したい。
Excel(エクセル)
-
10
エクセルの複数シートの保護を一括でする方法を教えてください(編集したいセルあり)
Excel(エクセル)
-
11
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
12
同じ作業を複数のシートに実行させるにはどうしたらいいのでしょうか
Visual Basic(VBA)
-
13
IFS関数の場合で、セルが空白の場合は何も表示しないようにする方法
Excel(エクセル)
-
14
VBAで特定文字列がある場合にシート見出しの色を変更したい。
その他(プログラミング・Web制作)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Officeを開くたびの「再起動メ...
-
英数字のみ全角から半角に変換
-
outlookのメールが固まってしま...
-
エクセルにおいて品名コードを...
-
teams設定教えて下さい。 ①ビデ...
-
Microsoft Officeを2台目のPCに...
-
エクセルで英文字に入れた下線...
-
複数の写真を1枚に印刷
-
マクロの書き方を教えて下さい
-
マイクロソフト 一時使用コード...
-
会社PCのメールが更新されない
-
Outlook で宛先が複数の場合の人数
-
Outlookでの時間指定送信機能に...
-
Microsoft365で写真をアルバム...
-
マクロのコードを教えてください。
-
大学のレポート A4で1枚レポー...
-
office365って抵抗感ないですか?
-
マクロ1があります。 A1のセル...
-
一太郎でカーソルを次の行の先...
-
WEBの記事を印刷する際にA...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【スプレドシート】IMPORTRANGE...
-
英数字のみ全角から半角に変換
-
「生産性ソフトウェア」とは何...
-
会社PCのメールが更新されない
-
【関数】○年○ヶ月と表示された...
-
WEBの記事を印刷する際にA...
-
エクセルでXLOOKUP関数...
-
Microsoft familyに追加されま...
-
会社のOutlookにてメールを予約...
-
Microsoft Formsの「個人情報や...
-
Microsoft365の一部を解約したい
-
マクロ自動コピペ 貼り付ける場...
-
Outlook で宛先が複数の場合の人数
-
outlookのメールが固まってしま...
-
【Excel VBA】PDFを作成して,...
-
大学のレポート A4で1枚レポー...
-
office365って抵抗感ないですか?
-
Microsoftにofficeアプリについ...
-
Excel テーブル内の空白行の削除
-
マイクロソフト 一時使用コード...
おすすめ情報