おはようございます。
今エクセルのフォーマットにＶＢから値を代入しているのですが、
よくわからなくなってしまったのでお力を借りたく書き込みさせていただきました。
win200/VB6.0の環境です。

エクセルのＦＩＮＤを使用してセルの値を検索し該当セルに値を入れる作業をしたいのですが、

---------------------------------------------------------
｜1991/11/12|            |　        |          |  　　　｜
---------------------------------------------------------
|　　　　　 ｜         　 |          |2005/11/12|        |
---------------------------------------------------------
|1999/11/15｜            |1981/05/02|          |        |
---------------------------------------------------------
こんな感じのエクセルがあるんですが
日付を検索して該当セルに値を入れてやるって感じです

set RAN =Range(sheet1)
with RAN
   .Find("1999/11/15") = "削除"
end with

みたい感じなのですが、同じやり方でたとえば『1995年以前のものに"削除"を代入』みたいにできませんか？
で条件としてループでセルを取ることは仕様上できない感じです、自分的にはFindを仕様したい感じです。
よろしくお願いします！

>ループでセルを取ることは仕様上できない感じです
誰の仕様上？どういう理由で？Excel VBA のヘルプで
Find メソッドの解説には
>複雑なパターンの検索を行うには Like 演算子と
> For Each...Next ステートメントを使います。たとえば...
といった風に書いてあります。ループで探せって事です。

るしぇさんご返答ありがとうございます。
やっぱりFindには限界がありますね、ループを使って作りなおしてみます
返事送れてすいませんです。お世話になりました。