世知辛さの記録

AccessでコンボボックスのリストをVBAで行番号で選択する

投稿日：2019年2月21日

こんな方法があるのは知らなかった。
メモメモ。

[code]
‘コンボボックスの1行目を選択する
‘Forms!見積請求書F.cbo銀行振込先 = Forms!見積請求書F.cbo銀行振込先.ItemData(0)
‘コンボボックスの最終目を選択する
Forms!見積請求書F.cbo銀行振込先 = Forms!見積請求書F.cbo銀行振込先.ItemData(Forms!見積請求書F.cbo銀行振込先.ListCount – 1)
[/code]

参考
コンボボックスのリストの先頭データ(or最終データ)を既定値とする – hatena chips

-MS Access

執筆者：admin

: AccessからExcelフォーマットでファイルに出力するサンプルコード

Excelから外部データの接続の際に,ユーザー定義関数を含んだクエリを指定するとエラーになったので、こんなやり方で対処。 Private Sub btnB2_Click() DoCmd.OutputT …

: Accessでレコードコピー（オートナンバー除く）の決定版のコード！

Accessで、レコードのオートナンバーを除くフィールドを１行、複製（コピー）したくって、Google検索したのだけどなかなか出てこず、しかしやっと見つけた、黄金のソース・・・・。 [VBA] ADO …

: AccessのレポートでNoDataでイベントキャンセル後もReport_Closeが実行されて困った

Accessのレポートで表示するデータがない場合は、以下のように書けばスマートにキャンセルできる。 [sourcecode] Private Sub Report_NoData(Cancel As I …