Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12722 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【9006】名前を付けたセルの色を一括で変更するには？ 平 03/11/14(金) 14:00 質問
【9008】Re:名前を付けたセルの色を一括で変更するに... INA 03/11/14(金) 14:20 回答
【9012】できました 平 03/11/14(金) 14:51 お礼
【9006】名前を付けたセルの色を一括で変更するに...
質問  平  - 03/11/14(金) 14:00 -
引用なし
パスワード
   お世話様です。

エクセルでセルに名前をつける事ができますが、これによってある名前を
つけたセルが複数あります（これらのセルは重複する箇所はありません）。
それらのセルをマクロを起動する事により背景色を変更（例えば無地から
赤、という風に）するにはどのようにすればよいのでしょうか？

セルはA1〜A3およびB3・C3を「ＬＬＬ」という名前を付けたものや
E3・E5・F4・G3・G5を「ＸＸＸ」と名付けたものがあります。
ただ単にA1〜A5だけのものやB3〜C5という形ならセルの結合で一まとめに
して色変えをすれば良いだけなんですけど、Ｌ型やＸ型には結合できないので
困っております。

○○○　　　●○○　　　　　　　○○○　　　●○●
○○○　→　●○○　　または　　○○○　→　○●○　　という具合です
○○○　　　●●●　　　　　　　○○○　　　●○●
【9008】Re:名前を付けたセルの色を一括で変更する...
回答  INA  - 03/11/14(金) 14:20 -
引用なし
パスワード
   >それらのセルをマクロを起動する事により背景色を変更（例えば無地から
>赤、という風に）するにはどのようにすればよいのでしょうか？
Range("ＬＬＬ").Interior.Color = vbRed
Range("ＬＬＬ").Interior.ColorIndex = 34
のようにできます。

また名前を定義しなくても
Range("A1:A3,B5,C10").Interior.Color = vbRed
のように指定することも出来ます。
【9012】できました
お礼  平  - 03/11/14(金) 14:51 -
引用なし
パスワード
   INAさん、早速の回答ありがとうございました。
おかげで無事解決しました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12722 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free