Excel VBA質問箱 IV

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

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


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

36289 / 76738

←次へ　｜　前へ→


	【45632】Re:if文で部分一致を条件に使用

かみちゃん - 07/1/7(日) 19:50 -


	引用なし

	パスワード

こんにちは。かみちゃん　です。

>例えば次のような例ですが、かみちゃん　さん　とkeinsさんの結果が異なるので
>すが、その理由が分かりません。

申し訳ありません。説明不足でした。
Like演算子のヘルプにも書いてあるのですが、
「特殊文字の左角かっこ ([)、疑問符 (?)、数値記号 (#)、およびアスタリスク
(*) を文字列比較するには、これらの文字を角かっこで囲みます。」
とあります。

つまり、今回の場合"###"という文字列が含まれているという条件ですので、
　　If Cells(Row, 1).Value Like "*" & strPattern & "*" Then
の部分を
　　If Cells(Row, 1).Value Like "*" & Replace(strPattern, "#", "[#]") & "*" Then
としないといけません。

0 hits

▼

【45614】if文で部分一致を条件に使用 リビテ 07/1/6(土) 23:50