MS Access

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

投稿日:

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

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

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

-MS Access

執筆者:

関連記事

no image

Access 2007 Runtime Released

とうとうこの日がきたか。 「6/26公開」「6/27ダウンロード中止」「7/20再公開」って経緯で、今日現在ダウンロードできる。 MS-Access Discovery – ニュース Ac …

no image

VBAで英字混じりの引数から数字のみを取り出す関数

たとえば、abcABC123456XYGという引数から、123456のみを取り出したい。 VBAの組み込み関数で、適当なのがありそうだけど、無いみたい。 カスタム関数を作るにも、これはという情報がググ …

no image

Accessで複数の用紙サイズ・向きの帳票を印刷したいが2枚出るとか、思ったようにならないなら

私がAccessで作った会社の業務管理システムは、帳票類がほとんどA4縦の用紙で出力されるようになっている。 しかし、一部の帳票、というか封筒は、長三サイズと、角6サイズをの用紙にしないと、プリントが …

no image

AccessからMySQLを操作

WordPressに書いた記事は、MySQLに格納されている。 格納された大量の記事をまとめて修正したいときは、いちいち管理画面から修正するのは疲れる。 今までは、PhpMyAdminでSQLのUPD …

no image

Accessで、見積書のような「サブフォームつきフォームを丸々コピー」する方法・・・見つけるのに、四苦八苦。

最初、複雑でかつ読み取り専用のクエリを元にしたフォームをコピーしようとしていたために、 acCmdPasteAppendのラインで「コマンドまたはアクション”追加貼り付け”は無効です」のエラーが出て、 …