Excel (VBA)

Excel VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 10 Home : Excel 2016)
A列の文字が隣のセルのB列の文字列の中に含まれているかを調べたい
投稿日時: 17/08/03 18:27:24
投稿者: Dellcasio

お世話になっております。
 
 ("A1").Value の中に文字列でパンがあり、
("B2").Valueの中には文字列でパン、りんご、オレンジがある場合
の様にA列の文字が隣のセルのB列の文字列の中に含まれているかを
調べたいのですが、
 
ネットで調べたxlContainsなどの使い方が
よくわかりません
コードをどのように書くのかがわかりません。
 
また、xlContains以外の関数でも問題ありませので
ご指導ごよろしくお願い致します。

回答
投稿日時: 17/08/03 20:28:32
投稿者: WinArrow
投稿者のウェブサイトに移動

>B2セル
は、
B1セルの間違いですよね?
 
ワークシート関数で対応可能です。
 

=COUNTIF(B1,"*"&A1&"*")

回答
投稿日時: 17/08/04 07:49:29
投稿者: simple

マクロなら

Sub test()
    If InStr(Range("B2").Value, Range("A1").Value) > 0 Then
        MsgBox "含まれている"
    End If
End Sub
# セル範囲は提示例をもとにしているが、そこは適宜修正してください。
 
xlContainsは条件付き書式などで使われる定数ですか。
もし、条件付き書式に関する話なら、
いちどマクロ記録をとってみることを薦めます。
 
なお、
【同じ日付かを確認する方法について 】
http://www.moug.net/faq/viewtopic.php?t=76010
はどうなったのですか?放置ですか。
 
ご自分の発言したスレッドは、
右の詳細検索から入る【投稿者検索】を使って一覧することができます。
http://www.moug.net/faq/search.php?search_author=Dellcasio
きちんと対応するようにしてください。

投稿日時: 17/08/04 09:20:41
投稿者: Dellcasio

WinArrow さんの引用:
>B2セル
は、
B1セルの間違いですよね?
 
ワークシート関数で対応可能です。
 

=COUNTIF(B1,"*"&A1&"*")

 
WinArrowさん
有難う御座いました。
 

投稿日時: 17/08/04 09:24:02
投稿者: Dellcasio

simple さんの引用:
マクロなら
Sub test()
    If InStr(Range("B2").Value, Range("A1").Value) > 0 Then
        MsgBox "含まれている"
    End If
End Sub
# セル範囲は提示例をもとにしているが、そこは適宜修正してください。
 
xlContainsは条件付き書式などで使われる定数ですか。
もし、条件付き書式に関する話なら、
いちどマクロ記録をとってみることを薦めます。
 
なお、
【同じ日付かを確認する方法について 】
http://www.moug.net/faq/viewtopic.php?t=76010
はどうなったのですか?放置ですか。
 
ご自分の発言したスレッドは、
右の詳細検索から入る【投稿者検索】を使って一覧することができます。
http://www.moug.net/faq/search.php?search_author=Dellcasio
きちんと対応するようにしてください。

 
 
simpleさん
有難う御座いました。
 
前スレは消えてしまったので対応ができませんでした。
対応できるようなので、これから対応させて頂きます。
 
いろいろ有難う御座いました。