- ベストアンサー
ACCESS listboxで選択した値を取得
access2010のVBAでlistboxで選択した値を取得したいと思っています。 https://docs.microsoft.com/ja-jp/office/vba/api/access.listbox.itemdata を参考に、 Debug.Print listbox1.ItemData(listbox1.ItemsSelected) としましたが、うまくいきません。 どのようにしたらよいでしょうか。 listboxは複数選択は特に許可していません。 よろしくお願いします。
- オフィス系ソフト
- 回答数5
- ありがとう数4
- みんなの回答 (5)
- 専門家の回答
質問者が選んだベストアンサー
> とのエラーがでました。 No2で回答したように listbox1.Value にしてください。
その他の回答 (4)
- kkkkkm
- ベストアンサー率65% (1620/2460)
> リストを選択すると下記エラーとなりました。 下記がありません。
- kkkkkm
- ベストアンサー率65% (1620/2460)
No1の追加です。 listbox1.ItemData(listbox1.ItemsSelected(0)) だと選択していないときにエラーになりますから listbox1.Value でいいと思います。
お礼
ありがとうございました。
補足
リストを選択すると下記エラーとなりました。
- kkkkkm
- ベストアンサー率65% (1620/2460)
Debug.Print listbox1.ItemData(listbox1.ItemsSelected(0)) で試してみてください。
お礼
ありがとうございます。
補足
リストボックスを選択すると、 実行時エラー2480 番号を使ってプロパティを参照していますが、このプロパティ番号はコレクションにありません。 とのエラーがでました。
関連するQ&A
- フォームを開くときに、コンボボックスの値を選択(アクセスVBA)
こんにちは。 アクセスVBAで、フォームを開いたとき (フォームのOpenイベント)に、 コンボボックスの値を選択したいのですが、 どういう方法が、あるでしょうか。 理想は、 フォームのOpenないし、Loadイベント内で、 コンボ0.ItemData(2).Selected と、書くような感じです。 (無論、Selectedは使えませんでした)。 よろしくお願いします。
- ベストアンサー
- Visual Basic
- アクセスVBA 一個前や一個後の値を取得するには
フォームの中にあるサブフォームの現在選択中のレコードの値を取得は出来たのですが 一個前や一個後の値を取得するにはどうすればいいですか? Sub test() Debug.Print Forms("F_Main").Controls("F_SubMain").Form.Filter Debug.Print Forms("F_Main").Controls("F_SubMain").Form.Controls("日付") End Sub で、現在のレコードの情報は取得できましたが 上のレコード、下のレコードを取得するコードを教えてください。
- ベストアンサー
- オフィス系ソフト
- エクセルのフルパスをvbaで取得
当方エクセル2003で、 エクセルのフルパスは C:\Program Files\Microsoft Office\OFFICE11\ EXCEL.EXE です。 それをVBAで取得するにはどうすればいいですか? Sub サンプル() Debug.Print 'オフィスがインストールされているフォルダのパスの取得 End Sub のようにして、 C:\Program Files\Microsoft Office\OFFICE11\ EXCEL.EXE を返したいです。 VBAコードをご教示ください。
- ベストアンサー
- オフィス系ソフト
- アプリケーションの横幅の値を取得したい vba
アクセスのアプリケーションの横幅の値をvbaで取得する事は可能でしょうか? Sub サンプル() Debug.Print Application.Width End Sub はエラーになっちゃいました。
- ベストアンサー
- オフィス系ソフト
- リストボックスの全ての値を取得するには?
エクセルのシート上のリストボックスに あああ いいい が表示されてるとして、 その二つの値をコマンドボタンを押した際に取得したいのですが Private Sub cmd_取得_Click() MsgBox Me.ListBox1.Value End Sub だと現在リストボックスで選択中の値しか取得されません。 リストボックスであああが選択中なら、 あああしか返ってきません。 あああ、いいいをVBAで取得する方法を教えてください。
- ベストアンサー
- Excel(エクセル)
- アクセス APIファイルを利用して複数画像を選択
1つのレコードの中にwindowsのAPIファイルを開いて複数の画像をリンクさせてフォームに表示させる方法を模索しています。 access2010を利用し、単票フォームで作成。VBAのプログラム知識はありませ。ネット上のサンプルを主に利用しています。 参考No1 http://www.accessclub.jp/samplefile/samplefile_78.htm 参考No2 http://www.nurs.or.jp/~ppoy/access/access/acF039.html 上記の参考No1はフォームに一枚の画像をAPIを開くモジュールを利用して表示しています。 上記の参考No2はフォームに3枚の画像を表示していますが、ファイル名を入力する方法です。 この2つのやり方を合わせたような操作をしたいと思っています。 つまり、3枚(複数)の画像を表示するのに、一つ一つ選択ボタンがありAPIを開いて画像を表示させる方法です。 分かる方がいましたら、教えてください。 アクセス初心者で説明が分かりにくいかもしれませんがお願いします。
- 締切済み
- その他MS Office製品
- C# ListBoxのキーボードマッチを無効にしたい
お世話になります。 .NET FW2.0+C#でListBoxを使用しています。 ListBox(ドロップダウンリスト)にはフォーカスしている状態でキーボードの英数キーを押すとリスト内のValue先頭値と自動的にマッチするものを選択状態とする機能が標準で備わっていますが、これを無効とする方法はありますでしょうか。 プロパティでは該当するものがなかったようです。 http://msdn.microsoft.com/ja-jp/library/system.windows.forms.listbox_properties(VS.80).aspx# イベント処理で何とかするしかないのでしょうか。それともプロパティの見落としか・・・・ 可能であれば方法など教えて頂けると助かります。
- ベストアンサー
- その他(プログラミング・開発)
- ACCESSについて教えて下さい。
データベースにログオンしているユーザーを Microsoft Jet UserRoster で調べる方法 http://support.microsoft.com/kb/285822/ を調べたのですが、この方法だとDebug.Printでイミディエイト ウィンドウに値を返していますよね?? これをフォームを作成しテキストBoxなどに返す方法を教えて下さい。 宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- ライブラリについて。
Excel、word、powerpointの一部の機能はライブラリーになっているかどうか分からないけど、99%は、ライブラリーになっているだろうという事は合っていますでしょうか?で、なぜ、分からないのかというと、Excelのソースコードは、公開されていないから。という事も教えていただけると幸いです。すみません。 で、オフィス製品を 内部から操作する Visual Basic for Application (VBA) や 外部から操作する Component Object Model (COM) にて オフィス製品の機能を利用できるように、 API ライブラリが提供されています。 https://docs.microsoft.com/ja-jp/office/vba/api/ … 公開されている文書が膨大なので、 すべてに目を通したわけではありませんが、 たいていの機能はライブラリとして公開されている印象です。 というのは、本当なのでしょうか?教えていただけると幸いです。すみません。
- ベストアンサー
- その他([技術者向] コンピューター)
- 秒以下は取得できないですか?
VBAで現在時刻を取得する時は秒以下は取得できないですか? Sub Nowを取得する() Debug.Print Now End Sub だと、秒までしか取得できません。 APIなどを使えば秒以下の取得は可能でしょうか?
- ベストアンサー
- オフィス系ソフト
お礼
ありがとうございます。