質問: ブック間参照しながら3つ以上の条件書式 book1、book2があり book1のa1が"aaa"ならbook2のa1を赤く網掛け book1のa1が"bbb"ならbook2のa1を青く網掛け book1のa1が"ccc"ならbook2のa1を黄色く網掛け book1のa1が"ddd"ならbook2のa1を黒く網掛け book1のa1が""ならbook2のa1の網掛け無し これを列1~列100の間で可能にするマクロを教えてください。 よろしくお願いします。 エクセルは2003、osはxpです。
回答: vbaご理解いただけるでしょうか。 基本の部分だけですが book1,book2とも開いているとして book2の標準モジュールに sub macro1() for i = 1 to 100 select case workbooks("book1").sheets("sheet1").cells(i, 1).value case "aaa" cells(i, 1).interior.colorindex = 3 case "bbb" cells(i, 1).interior.colorindex = 41 case "ccc" cells(i, 1).interior.colorindex = 6 case "ddd" cells(i, 1).interior.colorindex = 1 case else cells(i, 1).interior.colorindex = xlnone end select next end sub をコピペして実行 手抜きでも申し訳ありません。