アクセスのフォームにて

質問

こんにちは、いつもお世話になっております。

会社で急きょデータベースが必要になりアクセス２０００でデータベースを作っています。

それでフォームを作成しコンボボックスにて品番コードを入力できるようにしたのですが、どうも上役からの反応がイマイチです。というのは「マウスではコンボボックスの項目を選択できるが、キーボードからではコンボボックスの項目を選択できない。キーボードの↑↓ボタンで項目を選んで選択を可能にして欲しい」といわれました。

たしかに、キーボードでデータ入力していてコンボボックスの場所だけマウスに手を動かし品番を選択するのはわずらわしいです。なにか方法はありますでしょうか？

次に今度はエクセルなのですが、ＶＢＡで

Sub 数式計算()

s = InputBox("値を入植してください")
Range("A1").Formula="=B1+C1+s"

End Sub

値の入力によってセルＡ１の数式を変更したいのですがエラーになってしまいうまくいきません。
例えば、sにH5を入力したらB1+C1+H5となるようにしたいのですが何か良い方法はありますでしょうか？

以上、２点よろしくお願い致します。

回答No.2

gadd3 · ベストアンサー

Excelのことはよくわかんないですけど

sは変数なんですから、

Range("A1").Formula="=B1+C1+s"

ではなくて

Range("A1").Formula="=B1+C1+" & s

という形になるのではないでしょうか？

違ってたらごめんなさい。

Accessのほうは Gin_F さま の書かれたとおりです。

お礼

エクセルばっちり動きました～(*^-^*)助かりました。ありがとうございます。

回答No.3

keikan

Ａｃｃｅｓｓの場合コンボボックス上でＡｌｔキーを押しながら↑↓でリストが出たと思いますが。
これを、↑↓だけで行う場合、SendkeyでＡｌｔ＋↑or↓を送ればいいかな。

Execelは

Range("A1").Formula="=B1+C1+" & s

にすればいい。

お礼

ありがとうございます。無事データーベースが完成しました。皆様ありがとうございました(*^-^*)/~

回答No.1

Gin_F

コンボボックスにフォーカスがあるときに、F4キーを押してください。
それで、上下キーで選択できるようになります。

もしくは、コンボボックスのフォーカス取得時イベントで、
Me!コンボボックス名.DropDown
とすれば、自動で開きます。

お礼

できました。ありがとうございました(*^-^)/~