[三流君] −−> [VBAで楽しく] −−> [バックナンバー一覧]

Access コンボボックスを自動で開きたい

メルマガ発行内容

<Access コンボボックスを自動で開きたい>

こんにちは、三流プログラマーKen3です。 今回は、 掲示板に質問があった、 Access コンボボックスを自動で開きたい です。

/* * 1.今回のキッカケ */

掲示板、 http://www.ken3.org/cgi-bin/bbs/vba/wforum.cgi?mode=allread&no=99&page=0 に来た質問です。※何か質問あったら遠慮なく、回答遅いけど。 --- >投稿時間:2003/04/25(Fri) 14:33 >投稿者名:miki >タイトル:accessでコンボボックスを自動で開く方法について > > accessフォームのコンボボックスで、フォーカスを取得したら自動 >的にリストが開くようにしたいのですが、方法がいまいちわかりません >。フォーカス取得時のイベントでF4キーの送信をすればいいのだと思 >うのですが、キー送信の書き方が解りません。ヒントを頂けたら大変有 >り難いです。 > 上記以外の良い方法がありましたらそれもご教授いただけると嬉し >いです。 --- さて、やりたいことを整理して、 と思ったら、もう整理されてますね。 F4 keyの送り方ですね。

/* * 2.SendKeysでF4_Key(特殊なキー)を送る方法 */

SendKeys "{F4}" ~~~~~~~~~~~~~~~ でF4を送ることが出来ます。 ポイントは {F4} ^^^^^^^^^と{}でF4を囲うぐらいかなぁ。(Access97で確認) ヘルプを見ると、 BackSpace {BACKSPACE}、{BS}、または {BKSP} Ctrl + Break {BREAK} Enter {ENTER}または {~}  ・  ・  ・ Tab {TAB} ↑ {UP} F1 {F1} など載っているので、確認してください。 あとは、コンボボックスのフォーカスXXX系のイベントに書けばOKだと思います。 If Len(コントロール & "") = 0 Then SendKeys "{F4}" End If みたいにして、選択されて無い時だけ開くと、お客さんに喜ばれると思います。 ※毎回通るたびに開くとうざいので。 コンボボックスイベント 何かの参考となれば幸いです。 では、また。

/* * 3..Dropdown ってあるらしい */

なんか、忘れてない? えっ、できたよF4送って開けたよ。 ここ、ここ。 >  上記以外の良い方法がありましたらそれもご教授いただけると嬉し > いです。 ほかの方法ありませんか?知ってたら教えて。 読み替えると?プロならもっと良い方法しってるだろ、隠さず教えろよ? なんては言ってないけど、 自分はこの道(方法)で目的地に向かいます。 もっと簡単な道(方法)あったら教えてくださいかぁ、、、 向上心が含まれてる質問だよね。 ※類似品で、オレ様の方法はコレ、これよりいい方法出してみろ三流PG  と完璧回答送ってくるのもありだよねぇ(そんなイヤな人居ないけど) そんな時間稼ぎはいいから、ハヤク教えろ。 はいはい、 コンボボックスのコントロールに .Dropdown ってあって、これがスバリみたいです。 使い方は、簡単で、
Private Sub USER_ID_Enter()
    Me!USER_ID.Dropdown
End Sub
Me!コンボボックス.Dropdown でOKです。 なんて私が見つけたように書いたけど、 ~~~~~~~~~~~~~~~~~~~~~~~~ たまたま掲示板見てた人にメール貰った。 ※なんで直接掲示板に書いてくれないのだろう?  意外と書きにくい空気の掲示板なのかなぁ? こちらも、時間があったら試してみてね、では、また。 -- 余談 -- [No.157 聞き易い空気・環境を作る(人気者目指して自己分析?)] http://www.ken3.org/backno/backno_guchi31.html#157 で、軽く >--- 枠外解説・愚痴 --- >質問し易い・しにくい空気って在ると思う。 >新人君が2・3人居てA君が先輩に聞きに行ってたりすると、B君も聞きに行き易い。 >誰も書きこまれていない掲示板だと、なんか書きこみにくいよね。 >あっ、例題的には誰も入っていない定食屋・ラーメン屋にはなんか入りにくいよね。 >人が集まっているって安心感があるのかなぁ。 >よく後輩が質問をしに来る先輩には、他の後輩も聞きに行く、それで人気があがる? >場合もあるので、自分は嫌われてる? >なんて被害妄想を感じてる中堅社員さんは、 >質問に答えてるって姿を見せるのも手かなぁ。 > >えっ、質問が来ないほうが自分の作業に集中できていいって? >質問に答えると自分の勉強にもなりますよ。 >自分を成長させるには他人に教えるコーチをやるのも1つの勉強だと思って、 >ダマされたと思ってやってみてください。 >※新人や後輩から質問・反応こなくなると、私みたいに成長できないですよ(笑) --- とか適当にほざいてます、暇な時、のぞきに来てください。

/* * 4.おわりの挨拶 */

今回のポイントは、 ・SendKeys "{F4}"でF4を送り、コンボボックスを自動で開く ・.Dropdownを使用して、コンボボックスを開く 拾い読みして、 1つでも何かの参考となれば幸いです。 Excel/Access大好き、三流プログラマーKen3でした。 -------------------- 読者からのお便り紹介 -------------------- 掲示板にあった質問なのですが、 http://www.ken3.org/cgi-bin/bbs/vba/wforum.cgi?mode=allread&no=100&page=0 >投稿時間:2003/04/25(Fri) 15:12 >投稿者名:たけを >タイトル:レプリカの同期エラー > >いつもメルマガ楽しみにしています。 >XPでACCESS2002を使っているのですが >複数拠点にて使用するためにデータMDBのレプリカを各拠点で使用し >週に2度ほど集めて同期をとるといった方法を行っているのですが >データ更新量が多いと同期エラーがでて同期を取ることができないことがあります。 >ヘルプを見ると >レジストリのMaxLocksPerFileの設定を超えていますのであるので >適当に大きくしてもとれず >他の理由として >・使用できるメモリ量 >・レコードセットの行のサイズ >・ネットワークOSの制限 >とあるのですが >メモリは512Mつんでいますし >レコードセットの行サイズは一度無理をしてテーブルを2つに分けたので >これ以上分割するとわけのわからない構造になってしまいます。 >現在エラーの起きるテーブルは >全部で10フィールドで >内訳は >オートナンバー 1 >超整数 1 >数値バイト 3 >テキスト50文字 2 >通貨 1 >日付 1 >Yes/No 1 >となっています。 >そのほかにレプリカにしたら自動でできるフィールドがあります。 >ネットワークOSの制限というのもローカルHDに持ってきても >同期エラーになりとれませんでした。 >どうにか同期エラーが起きなくしたいのですがどなたか解決方法はないでしょうか。 ---- 何かヒントでもある人は助けてあげてください。 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 私も探してるけど、いつもの姑息な逃げ手も浮かばなくて。。。


ページフッター

ここまで、読んでいただきどうもです。ここから下は、三流君のホームページの紹介・案内です
目的の情報が見つかったか?少々心配しつつ、、、

種類別のリンク や 広告など

気になったジャンル↓を選択してください。

人気記事(来場者が多いTOP3):
[VBAでIE,WebBrowserを操作]・・・VBAでIE,WebBrowserを操作する サンプルです
[Access から Excel 連携 CreateObject("Excel.Application")]・・・AccessからExcelを操作したりデータの書き出しなどです
[VBAでOutlookの操作 CreateObject("Outlook.Application" )]・・・VBAからOutlookを使い、メール関係を処理するサンプルです
↑上記3つみたいなCreateObjectで他のアプリケーションを操作するサンプルが人気です。

Excel関係:
[Excel UserFormを操作する]・・・エクセルでユーザーフォームを作成して入力などを行ってます
[ExcelからAccessを操作する]・・・ExcelからAccessのマクロを起動してみました、
[Excel関係 関数、その他]・・・その他Excel関係です

Access関係:
[Access UserForm/サブフォーム 操作]・・・アクセスでフォームを使ったサンプルです
[Access レポート操作]・・・レポートを操作してみました
[Access クエリーやその他関数]・・・あまりまとまってませんが、スポット的な単体関数の解説です

その他:VBAの共通関数やテキストファイルの操作など
[VBAでテキストファイル(TextFile)の操作]・・・普通のテキストファイルを使ったサンプルです
[VBA 標準関数関係とその他解説]・・・その他、グダグタ解説してます

開発時の操作: [F1を押してHELPを見る]/ [Debug.Print と イミディエイトウインドウ]/ [実行時エラーでデバッグ]/ [ウォッチ式とSTOP]/ [参照設定を行う]

仕様書(設計書?) XXXX書類: [基本設計書や要求仕様書]/ [テスト仕様書 テストデータ]/ [バグ票]/ [関数仕様書]/ [流れは 入力・処理・出力]

※↑文章の味付けが変わっていて、お口に合うかわかりませんが。。。
※※読んで、気分を悪くされたらスミマセン。

Blogとリンク:[三流君の作業日記]/ [VBAやASPのサンプルコード]/ 広告-[通販人気商品の足跡]



[三流君(TOP ken3.org へ戻る)] / [VBA系TOPへ] / [VBA系バックナンバー目次へ移動]