|
こんにちは。かみちゃん です。
>>>「Z仕様」と記述された行のフォント色が5になるというような理解を
>>>しましたが、全てB列がフォント色5に変換されてしまいますが…
>>
>>そのとおりです。
>????
「Z仕様」(全角)という文字列がなければ、1を返せという数式が設定されていますので、「Z仕様」では、1が返ってしまいます。
さらに、数値が入っているセルを選択して、そのセルが含まれている行は非表示
とするというのがコードの機能概要です。
したがって、「全部消えた(非表示になった)」というのは、「Z仕様」(全角)
という文字列が入っている行は、一行もないということです。
>With Range("B6", Range("B65536").End(xlUp)).Offset(, 254)
> .Formula = "=IF(ISERR(FIND(""Z仕様"",$B6)),1,"""")"
> .SpecialCells(6, 1).Offset(, -254).interir.ColorIndex = 43
> '>>SpecialCellsは何を示すのでしょう?意味が分かりません。
.SpecialCells(6,〜
の意味を何か間違えていませんか?「6」とはなんですか?
SpecialCells メソッドのヘルプと、以下の私のコメントを見てみてください。
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=one;no=31588;id=excel
私も、最近、Keinさんが書かれたこの手の処理方法を勉強させていただき、なるほどなぁと感心した次第です。
|
|