Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

55855 / 76732

←次へ　｜　前へ→


	【25643】Re:検索時の行番号取得について

Jaka - 05/6/9(木) 10:57 -


	引用なし

	パスワード

こんにちは。
ろくに質問の内容を見てないけど、Findの書き方にちょっと...。

>　　　　Set 検索 = .Find(KENSAKU)
　　　　 ↑　ここで1回目の検索をしているのに
>　　　　If Not 検索 Is Nothing Then
>　　　　　　firstAddress = 検索.Address
>　　　　　　Do
>　　　　　　　　Set 検索 = .FindNext(KENSAKU)←ここでエラーになります。
　　　　　　　　 ↑　何でここで次を探すのでしょうか？
　　　　　　　　　　 2度目に処理するから、処理内容によっては同じ結果にはなりますが....。

>　　　　　　　　LastAddress = 検索.Address
>　　　　　　　　　　If KAZU = EKAZU Then
>　　　　　　　　　　　　Exit Do
>　　　　　　　　　　Else
>　　　　　　　　　　　　EKAZU = Range(LastAddress).Row
>　　　　　　　　　　End If
>　　　　　　Loop
>　　　　End If

で、たぶん。
.FindNext(KENSAKU)
　↓
.FindNext(after:=検索)

絞込みだったら、こういうのと違うのでしょうか？
http://www.vbalab.net/vbaqa/c-board.cgi?cmd=one;no=84;id=FAQ

0 hits

▼

【25638】検索時の行番号取得について こなつ 05/6/9(木) 9:35