Excel VBA質問箱 IV

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

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


30669 / 76738 ←次へ | 前へ→

【51333】Re:オブジェクト名が変化して処理は変わらないときの
発言  アルジ  - 07/9/12(水) 14:17 -

引用なし
パスワード
   >はじめまして、アルジといいます。
>
>オブジェクト名が変化して処理は変わらないときの
>書き方がわかりません。
>いまだと下記のような例を30個も書かないといけない状態です。
>しかもこういったものが頻繁に必要になってきました。
>
>
>変わるところは s1〜s30までと c1〜c30まで
>変化します。 s1のときはc1になります。
>いろいろ調べた結果オブジェクトの変数化や
>引数のやり取りで出来そうな気がしましたが、
>具体的な方法がどうしてもわかりません。
>
>いい方法があれば教えてください。
>
>
>Private Sub s1_SpinUp()
>    
>If c1.Text <> "" Then
>    c1.Text = DateAdd("n", -30, c1.Text)
>    c1.Text = Format(c1.Text, "h:nn:ss")
>End If
>
>End Sub

すいません、情報に不備がありました。
エクセル2000使用
ユーザーフォームにて処理を行っています。
ここでいうs1はスピンでc1はテキストボックスです。
実はa〜oまであり処理により組み合わせで使います。
その中にはラベルやチェックボックスもあります。
目的はソースの簡略化です。

0 hits

【51332】オブジェクト名が変化して処理は変わらないときの アルジ 07/9/12(水) 14:08 質問
【51333】Re:オブジェクト名が変化して処理は変わら... アルジ 07/9/12(水) 14:17 発言
【51335】Re:オブジェクト名が変化して処理は変わら... Jaka 07/9/12(水) 14:44 発言
【51337】Re:オブジェクト名が変化して処理は変わら... アルジ 07/9/12(水) 16:12 発言
【51341】Re:オブジェクト名が変化して処理は変わら... Jaka 07/9/12(水) 17:22 発言
【51342】Re:オブジェクト名が変化して処理は変わら... アルジ 07/9/12(水) 17:27 発言
【51359】紛らわしい事をしてすみません。 Jaka 07/9/13(木) 9:24 発言
【51362】Re:紛らわしい事をしてすみません。 アルジ 07/9/13(木) 10:37 お礼
【51343】Re:オブジェクト名が変化して処理は変わら... ichi 07/9/12(水) 17:59 発言
【51344】Re:オブジェクト名が変化して処理は変わら... アルジ 07/9/12(水) 18:03 お礼

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