No.4
- 回答日時:
> Sheet1のA1のセルの色を変えたときに、Sheet2~5のA1の色も自動的に
> 変わるようにするにはどうすればいいのでしょうか。
この条件であれば、次のコードを設定するとご希望通りになると思います。
一応、手順を書いておきますが、ご存知でしたら読み飛ばしてください。
1.Alt + F11 で VBE(Visual Basic Editor)を開きます。
2.プロジェクトウィンドウ内の「ThisWorkbook」をWクリックします。
3.表示されたコードウィンドウに下記コードをコピーして貼り付けます。
(必要により、2~3行目の指定を変更します。質問の例の場合は、このまま)
4.Alt + Q (または、右上隅の×)でウィンドウを閉じ、シートに戻ります。
5.メニューから[ツール]-->[マクロ]-->[セキュリティ]で「セキュリティレベル」を
「中」にして[OK]します。
これで如何でしょうか。
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Const OrgSh = "Sheet1" '<----- 元になるシート名を指定
Const OrgAdd = "A1" ' <----- 元になるセルを指定
If Sh.Name <> OrgSh Then
Sh.Range(OrgAdd).Interior.ColorIndex = _
Worksheets(OrgSh).Range(OrgAdd).Interior.ColorIndex
End If
End Sub
VBAという言葉はよく聞くけれどぜんぜんわからないです(^^;)
また時間のあるときに勉強しようと思います。
ありがとうございました。
No.3
- 回答日時:
(1)Sheet2のA1セルの条件付書式で他のシート=Sheet1の参照は出来ません。
(バージョン2000)仮に余り使わないセル、(Sheet2の例えばX1)に=sheet1!A1としておいて、一旦Sheet2に値を持ってきて、条件付き書式を、「数式が」にして、=$X$1>10にして、パターンをある色に設定するなど。しかし値の変化を捉えるのは難しいと思われる。
(2)関数式を使ってセルの書式を、左右することはできません。
(3)残る道はVBAしかありません。それも「自動的に」呼応することが望まれているのでしょうから、イベントを掴まえないとダメです。
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
MsgBox "changed"
Worksheets("sheet2").Range("a1").Interior.ColorIndex = 6
Worksheets("sheet3").Range("a1").Interior.ColorIndex = 6
End If
End Sub
それとSheet2のA1のセルの色をつけっぱなしでは不可でしょうから、色なしに戻すキッカケはどう決めればよいのでしょうか。
それにエクセルのシートのChangeイベントはいろいろクセがあるようです。
詳しい説明をありがとうございます。
とりあえず表を完成させないといけないので#1の方法でやってみますが、またじっくり勉強しようと思います。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) こんなことできますか?例えば、sheetに貼り付けた図形のタイトルを、セルA1の文字で表示する。 5 2022/04/22 15:25
- その他(Microsoft Office) 従業員増減対応で当番種類の増減対応な当番表 21 2022/07/19 07:30
- Visual Basic(VBA) 【変更】ファイルを閉じてダイアログで保存した時、更新したシートだけの処理の実行をする 5 2022/03/26 18:31
- Excel(エクセル) 3つのエクセルをそれぞれのシートのセルに反映させたいときはどうしたらいいでしょうか? 例えば①シート 4 2023/04/25 20:13
- Visual Basic(VBA) EXCELのVBAについて 2 2023/07/05 17:17
- その他(プログラミング・Web制作) python OpenPyXLを使って出力結果をエクセルに書き込み 2 2022/06/04 19:46
- その他(Microsoft Office) オフィス365のエクセル 3 2023/06/29 13:10
- Excel(エクセル) エクセルで、土日や祝祭日に色をつけるには? 3 2022/05/05 08:11
- Visual Basic(VBA) 昨日、質問した件『VBA にて、条件付き書式で背景色を設定しているセルの範囲で、背景色付きのセルをカ 4 2022/04/07 14:39
- Excel(エクセル) SUMIFSと日付変換 10 2023/04/16 15:38
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
エクセルの色も=イコールできますか?
Windows Me・NT・2000
-
エクセルのシートリンクで,色もリンクさせる方法
Excel(エクセル)
-
別シートのデータを参照してセルの色を塗り替えたい
Excel(エクセル)
-
-
4
別シートのセルの色も同じ色に変更する方法を 教えてください
Excel(エクセル)
-
5
エクセルのセルの塗り色も同期させたい
Excel(エクセル)
-
6
色のリンクは出来ますか?【エクセル】
Access(アクセス)
-
7
EXCELのセルや文字色の反映
Excel(エクセル)
-
8
Excelでセル参照したとき、書式も一緒に持ってくるには?
Windows Vista・XP
-
9
あるセルに色を付けた時、別のセルにも同じ色が付く
Excel(エクセル)
-
10
Excelの塗りつぶしの反映
Excel(エクセル)
-
11
エクセル 別シートへのコピーを,セルの色や太字斜体までやりたい。
Excel(エクセル)
-
12
Excelで、塗りつぶしを含め同じ表示にするには?
Excel(エクセル)
-
13
文字の色も参照 VLOOKUP
Access(アクセス)
-
14
excel 参照しているセルに色がついていたら、返すセルにも色もつける
その他(コンピューター・テクノロジー)
-
15
エクセルでマクロにてセル色と文字を他シートのセルへコピーしたい
その他(コンピューター・テクノロジー)
-
16
Excel 条件付き書式で、別シートを参照して色付けをしたい
Excel(エクセル)
-
17
エクセルで隣(右or左)のセルと同じ文字色にしたい
Excel(エクセル)
-
18
E列のセルに数値が入れば(空白でなければ)B列の同じ行のセルに色がつく
その他(Microsoft Office)
-
19
Excelの入力規則で2列表示したい
Excel(エクセル)
-
20
EXCELで塗りつぶし色ごとvlookupしたい
Word(ワード)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Access レポート印刷するときに...
-
アクセスクエリの計算
-
Access VBA を利用して、フォル...
-
実行時エラー3131 FROM 句の構...
-
エクセルのデータをアクセスに...
-
アクセスで教えてください。 ク...
-
【至急・画像あり】建物or住所...
-
Accessのスプレッドシートエク...
-
ACCESS VBA でのエラー解決の根...
-
Microsoft Accessをクレジット...
-
accessデータを指定したExcel、...
-
Microsoft365にAccessってあり...
-
Access VBA [リモートサーバー...
-
Accessで作ったデータベースをw...
-
アクセス レポートを開いたとき...
-
日付のテキストボックスに(例...
-
Accessのリンクテーブルのパス...
-
Access で半角スペースと全角ス...
-
アクセスクエリで教えて下さい...
-
Access Error3061 パラメータが...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Access レポート印刷するときに...
-
Access Error3061 パラメータが...
-
Microsoft365にAccessってあり...
-
Accessのクエリで、replace関数...
-
Accessのリンクテーブルのパス...
-
Access VBA [リモートサーバー...
-
ACCESS VBA でのエラー解決の根...
-
accessデータを指定したExcel、...
-
Accessのスプレッドシートエク...
-
CSVファイルの「0落ち」にVBA
-
【Access】Dcount関数の複数条...
-
Accessのフォーム上のテキスト...
-
Access VBA を利用して、フォル...
-
実行時エラー3131 FROM 句の構...
-
Vba Userformを前面に出すについて
-
Accessでフォームに自動入力し...
-
Accessレポートのチェックボッ...
-
Accessのテキストボックスの入...
-
Access 複数条件検索の設定が上...
-
accessのフォームに設置したボ...
おすすめ情報