Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


7144 / 13644 ツリー ←次へ | 前へ→

【40930】ユーザーフォーム内のテキストボックスにfor-nextを適用したい salt 06/7/26(水) 14:50 質問[未読]
【40931】Re:ユーザーフォーム内のテキストボックス... Ken 06/7/26(水) 15:09 発言[未読]
【40933】Re:ユーザーフォーム内のテキストボックス... salt 06/7/26(水) 15:15 お礼[未読]

【40930】ユーザーフォーム内のテキストボックスに...
質問  salt  - 06/7/26(水) 14:50 -

引用なし
パスワード
   次のような作業を実行したいと思っています。

まず、ユーザーフォーム内にテキストボックスが
form.text1_1 〜 form.text1_9
form.text2_1 〜 form.text2_9
form.text3_1 〜 form.text3_9 
form.text4_1 〜 form.text4_9
form.text5_1 〜 form.text5_9 
・・・
と数多くあります。

このテキストボックスにそれぞれデータを代入していくのですが、

For i = 1 To 10
For j = 1 To 9
  form.text【i】_【j】= i+j ・・・※
next j
next i

のようなプログラムで代入できないかと色々なパターンで作成しておりますが、
※でエラーとなってしまいます。

こうした作業のためのプログラムをご教授願います。

【40931】Re:ユーザーフォーム内のテキストボック...
発言  Ken  - 06/7/26(水) 15:09 -

引用なし
パスワード
   こんにちは

For i = 1 To 10
For j = 1 To 9
  Me.Controls("text" & i & "_" & j ).Value = i + j
next j
next i

これでどうですか?

【40933】Re:ユーザーフォーム内のテキストボック...
お礼  salt  - 06/7/26(水) 15:15 -

引用なし
パスワード
   早々のご連絡ありがとうございます。

問題なく実行できました。助かります。

7144 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free