□ 戻る □一般操作のサロン □ 使用方法 □ 新着記事 □ 新規に質問する！ □ トピック一覧 □ 検索 □ 過去ログ
[ 親トピックをトピックトップへ ]
| このトピックに書きこむ |
|---|
| このトピックに書きこむ |
|---|
| Re[2]: セルの部分一致でフィルタ検索をしたい。 | |
|---|---|
[195832] Re[2]: セルの部分一致でフィルタ検索をしたい。- ■  / 記事引用/メール受信=OFF■
□投稿者/ 乾燥植物 -(2023/08/02(10:21)) □U R L/ ねむねむ様 アドバイスありがとうございます。 こんな単純なことだったんですね……。 昨日ずっと頭を悩ませていましたが、助かりました！ | |
[195831] Re[1]: セルの部分一致でフィルタ検索をしたい。- ■記事引用/メール受信=OFF■ □投稿者/ ねむねむ -(2023/08/02(09:54)) □U R L/ 下記ではどうだろうか？ Worksheets("Sheet2").Range("A1").AutoFilter 1, "*" & A & "*" | |
[195830] セルの部分一致でフィルタ検索をしたい。- ■親トピック/記事引用/メール受信=OFF■ □投稿者/ 乾燥植物 -(2023/08/02(09:27)) □U R L/ お世話になっています。
またひとつ
●やりたい事。
シート1のA1に入力されている値（例えば東京）を
シート2で検索して抽出したいのです。
ただし、値は「完全一致」ではなく「部分一致」で検索をしたいのです。
（東京都新宿区、東京都品川区、東京都千代田区、と検索がしたい）
●書いたコード
Dim A As String
A = Worksheets("Sheet1").Range("A1")
Worksheets("Sheet2").Range("A1").AutoFilter 1, A
ここのAをどのようにしたらいいか、よくわかりません。
Like,*や LookAt:=xlPartを使ってみましたが、どうもうまくいきません。
おそらく単純なんだろうですが、ちょっと頭を抱えています。
どなたアドバイスを頂けないでしょうか。
よろしくお願いいたします。この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他 | |