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