アプリ版:「スタンプのみでお礼する」機能のリリースについて

userFormに貼り付けたLabelが50個貼り付けてあり、Labelの後の数値を変数にしたいのですが、どう指定すればよいでしょうか
(label1~label50)

以前シートに貼り付けたComboBoxは下記のようにOLEObjects
で指定できることを教えていただきましたがuserFormではOLEObjectではだめなようです


--------------------シートの場合は以前これで教えていただいたのですが
 Dim i As Integer
  For i = 1 To 10
    Dim combo As ComboBox
    Set combo = Worksheets(1).OLEObjects("ComboBox" & i).Object
    Call MsgBox(combo.Value)
  Next

A 回答 (2件)

Dim myLabel As Control



i = 1
Set myLabel = Controls("Label" & i)
myLabel.Caption = "rrr"

こんな感じでいかがですか。
    • good
    • 3
この回答へのお礼

ありがとうございました。勉強不足でした。

お礼日時:2011/12/12 11:42

あと、単純に



i = 1
Controls("Label" & i).Caption = "TTT"

でもいけます。
    • good
    • 2

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています


このQ&Aを見た人がよく見るQ&A