vba - 将值写入用户窗体中的文本框 - VBA

Question

我正在尝试在放置在用户窗体上的文本框中动态写入一个值。这是我的代码，我在最后一行收到错误。它说需要对象。

Sub Userform1_Display()

TotalSelected = 0

With Sheets("Main").Ent_ListBox

    For i = 0 To .ListCount - 1
        If .Selected(i) = True Then
          Count = 1
          TotalSelected = TotalSelected + Count
        End If
    Next i

End With

'Useform'
Questionaire.Show

'TextBox placed in Userform'
N_Ent_TextBox.Value = TotalSelected


End Sub

请分享你的想法

Answer 1

看起来您的代码实际上并不在用户窗体的类模块内 - 因此您需要完全限定该对象:

Questionaire.N_Ent_TextBox.Value = TotalSelected