Ｐａｇｅ 569 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼含み文字抽出 長島監督ガンバ!! 04/3/23(火) 1:25 ┣Re:含み文字抽出 クロ 04/3/23(火) 8:44 ┃ ┗Re:含み文字抽出 こうちゃん 04/3/23(火) 8:46 ┃ ┗Re:お気になさらずに クロ 04/3/23(火) 8:58 ┗Re:含み文字抽出 こうちゃん 04/3/23(火) 8:45 ┗Re:含み文字抽出 長島監督ガンバ!! 04/3/23(火) 9:39 ─────────────────────────────────────── ■題名 ： 含み文字抽出 ■名前 ： 長島監督ガンバ!! <t1312865@hotmail.com> ■日付 ： 04/3/23(火) 1:25 -------------------------------------------------------------------------
| フォームで、特定文字の存在するレコードを抽出するとき、 Me.Filter="[文字]Like'[タ-ド]*'" とかなりますが、これを、入力した文字で抽出できたるようにしたいんです。 SQLだと、whereに?を入れれば抽出されますが、これをフォームで行いたいのです。具体的なうまい方法はないのでしょうか。おそらくたわいのないことで躓いていると思います。どうか、突破口を開いてくれては？ |
| ▼長島監督ガンバ!! さん： >フォームで、特定文字の存在するレコードを抽出するとき、 >Me.Filter="[文字]Like'[タ-ド]*'" >とかなりますが、これを、入力した文字で抽出できたるようにしたいんです。 入力する場所はテキストボックスでいいのでしょうか？ フォームのテキストボックスを指定 Me.Filter="[文字]Like'" & Forms!フォーム名.テキストボックス名 & "*'" あとはインプットボックスを使うか... Dim ipt As String ipt = InputBox ("メッセージ","インプットボックスタイトル") Me.Filter="[文字]Like'" & ipt & "*'" など... |
| クロさん、こんにちは かぶりました、ごめんなさい |
| ▼こうちゃん さん： >かぶりました、ごめんなさい おはようございます。 同フォーム上でしたら「こうちゃん」さんの方が スマートです。 |
| 長島監督ガンバ!! さん、こんにちは >フォームで、特定文字の存在するレコードを抽出するとき、 >Me.Filter="[文字]Like'[タ-ド]*'" >とかなりますが、これを、入力した文字で抽出できたるようにしたいんです。 >SQLだと、whereに?を入れれば抽出されますが、これをフォームで行いたいのです。具体的なうまい方法はないのでしょうか。おそらくたわいのないことで躓いていると思います。どうか、突破口を開いてくれては？ こんな感じ？ フィルターをかけるフィールドを「f1」 「入力した文字」は テキストボックス「txt1」に入力された文字として・・ Me.Filter = "f1 Like '*" & Me.txt1.Value & "*'" Me.FilterOn = True |
| ▼こうちゃん さん： >長島監督ガンバ!! さん、こんにちは > >>フォームで、特定文字の存在するレコードを抽出するとき、 >>Me.Filter="[文字]Like'[タ-ド]*'" >>とかなりますが、これを、入力した文字で抽出できたるようにしたいんです。 >>SQLだと、whereに?を入れれば抽出されますが、これをフォームで行いたいのです。具体的なうまい方法はないのでしょうか。おそらくたわいのないことで躓いていると思います。どうか、突破口を開いてくれては？ > >こんな感じ？ >フィルターをかけるフィールドを「f1」 >「入力した文字」は テキストボックス「txt1」に入力された文字として・・ > >Me.Filter = "f1 Like '*" & Me.txt1.Value & "*'" >Me.FilterOn = True ＝＞出来ました。ありがとうございます。自分もやはり同じことを考えてはいたのですが、どうも、& Me.txt1.Value & の両端の "" (ダブルクォーテーション）が足りなかったのです。文字列なので必要だったのだと思います。すばやい対応ありがとうございます。AccessVBAエキスパート・スタンダード（あまり意味のない資格）の資格は取りましたが、やはりどうしても応用が･･･････。自分に足りない部分を、どうもありがとうございました。 |