Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
2004 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【70553】検索の文字列に関して maimai 11/11/29(火) 10:54 質問[未読]
【70554】Re:検索の文字列に関して UO3 11/11/29(火) 11:19 発言[未読]
【70556】Re:検索の文字列に関して maimai 11/11/29(火) 14:37 お礼[未読]
【70553】検索の文字列に関して
質問  maimai  - 11/11/29(火) 10:54 -
引用なし
パスワード
   シート1のA1から文字列を取ってきて、そのワードで検索するときは、
name = Workbooks(~~).Sheets(~~).Range("A1").Value

という感じでnameに入れてそれをキーワードとして検索していたのですが、
A1の文字列にプラスして他の言葉も含めたい場合はどのようにしたらいいのでしょう。

たとえば、
シート１のA1セルに111129と入ってて探すのに指定したい文字列は
111129_○○_●●_△だったとします。

○と△に関しては何が入ってても良くて
111129と●●が一致しているものだけをとりだしたいのですが、
【70554】Re:検索の文字列に関して
発言  UO3  - 11/11/29(火) 11:19 -
引用なし
パスワード
   ▼maimai さん：

こんにちは
比較を何でおやりになるのか、判然としませんし、また比較対象文字列が
○○は、何でもいいけど、必ず _○○_ が条件なのかどうかもわかりませんが
たとえば Like を使ったとき以下は参考になりますか？（禅問答のようでわかりにくいですかね？）

Sub Test()
　　Dim a1 As String
　　Dim p1 As String
　　Dim p2 As String
　　Dim s1 As String
　　Dim s2 As String
　　
　　a1 = "111129"
　　s1 = a1 & "abc●●xyz"　　 '比較対象
　　s2 = a1 & "_abc_●●_xyz"　'比較対象

　　p1 = "111129*●●*"　　　　'比較条件
　　p2 = "111129_*_●●_*"　　 '比較条件
　　
　　MsgBox s1 Like p1
　　MsgBox s1 Like p2
　　MsgBox s2 Like p1
　　MsgBox s2 Like p2
　　
End Sub
【70556】Re:検索の文字列に関して
お礼  maimai  - 11/11/29(火) 14:37 -
引用なし
パスワード
   回答ありがとうございます。
ＶＢＡ初心者で全くわからなかったもので、
質問がうまくできずにすみません。

フォルダ選択したら、セルに入ってる文字列のつくファイルを取り出して
一覧表を表示したかったんですが、文字列だけだと余計なものまで
取り出してしまったので、そのほかを指定しようと思ったのですが、わからず質問してしまいました。

無事できました。
ありがとうございます。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
2004 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free