ページ 11

【解決】フォーム上の大量のコンボボックスの値の読み込み

Posted: 12月 22, 2012, 1:29 pm
by Kankun
マクロでフォーム上のコンボボックス(約100個 内容は○×の記号)を一つの文字変数にまとめたい

For I=1 to 100
  文字変数 = 文字変数 + コンボボックス(I)
Next I

みたいなイメージでプログラムを作りたいのですがどのようにすればいいのでしょうか
ご教授おねがいします

Re: フォーム上の大量のコンボボックスの値の読み込み

Posted: 12月 23, 2012, 10:40 am
by ike@九州
コンボボックスの名前はフォームナビゲータで確認、修正できます。
その名前を意図した順番に
Comb1 ~ Comb100 と設定している場合

'oFormは既に取得として

sText = ""
For i = 1 to 100
oComb = oForm.getByName("Comb" & Cstr(i))
sText = sText & oComb.Text
Next

Re: フォーム上の大量のコンボボックスの値の読み込み

Posted: 12月 25, 2012, 5:25 pm
by Kankun
ike@九州さん お返事大変ありがとうございました
名前の後ろを数字にして For Nextで、回すのですね 
教えていただいたものをベースにして考えてみます
(配列に名前を入れてと思ってましたが、教えていただいた方うがシンプルでいいですね!)
大変勉強になりました。