過去ログ

                                Page     254
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼フォームフィルタのボタンと同じ動作をするコード  B-BOSS 03/4/16(水) 22:27
   ┣Re:フォームフィルタのボタンと同じ動作をするコード  yu-ji 03/4/16(水) 23:45
   ┗Re:フォームフィルタのボタンと同じ動作をするコード  Hirofumi 03/4/17(木) 19:16

 ───────────────────────────────────────
 ■題名 : フォームフィルタのボタンと同じ動作をするコード
 ■名前 : B-BOSS
 ■日付 : 03/4/16(水) 22:27
 -------------------------------------------------------------------------
   Accsses97を使用しています。
ツールバーのフォームフィルタと同じ働きをするコマンドボタンを作成したいのですが
どの様にコードをかいていいのか分かりません。
どなたか分かりましたら、教えてください。

 ───────────────────────────────────────  ■題名 : Re:フォームフィルタのボタンと同じ動作をするコード  ■名前 : yu-ji  ■日付 : 03/4/16(水) 23:45  -------------------------------------------------------------------------
   ▼B-BOSS さん:
>Accsses97を使用しています。
>ツールバーのフォームフィルタと同じ働きをするコマンドボタンを作成したいのですが
>どの様にコードをかいていいのか分かりません。
>どなたか分かりましたら、教えてください。

#新しい仕事先には、Accessが入っていないので、詳細を説明できませんが(^^;
#じゃあ発言するなよ?

フォームのプロパティにフィルタってありましたよね?
そこにVBAから記述して、フィルタオンすれば良かったと思いますが、
なんせその機能を使ったことがないので(^^;
#いつも、レコードソースの方で変更してたので。。。

他の方のフォローがあるまでの一時的な参考として、一応上記プロパティのヘルプ
(フィルタやフィルタオン?)を見てみれば分かるんじゃないかな?
#ヘルプ自体も確認できるので、”分かる”とも言い切れませんが。。。。

 ───────────────────────────────────────  ■題名 : Re:フォームフィルタのボタンと同じ動作をするコード  ■名前 : Hirofumi <hirofumi@venus.dti.ne.jp>  ■日付 : 03/4/17(木) 19:16  -------------------------------------------------------------------------
   >Accsses97を使用しています。
>ツールバーのフォームフィルタと同じ働きをするコマンドボタンを作成したいのですが
>どの様にコードをかいていいのか分かりません。
>どなたか分かりましたら、教えてください。

こんな書き方で善いと思います

Helpより
設定値は、文字列式で、WHERE 句から WHERE を省いたものです。
たとえば、次の Visual Basic コードは、東京都の得意先だけを抽出する
フィルタを適用します。

  With Me
    .Filter = "[県名] = '東京都'"
    .FilterOn = True
  End With

詳しくは、FilterのHelpを参照してください

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 254