在用户表单中将值写入文本框-VBA

我正试图在放置在用户窗体上的文本框中动态地写入一个值。这是我的代码，并且在最后一行中出现错误。它说物体是必需的。在用户表单中将值写入文本框-VBA

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

请分享你的想法

来源

2017-05-31 Sid29

它看起来像你的代码实际上不是用户窗体的类模块中 - 所以你需要完全限定对象：

Questionaire.N_Ent_TextBox.Value = TotalSelected

来源

2017-05-31 10:39:59

是的。有用。现在明白了你的观点。谢谢:) – Sid29

不用担心，如果它解决了您的问题，请不要忘记接受答案。 –

将接受它。它说我必须等待6分钟才能接受它:) – Sid29

N_Ent_TextBox.Text = TotalSelected 尝试使用此

来源

2017-05-31 10:37:32

不，它还说对象需要！ – Sid29

在用户表单中将值写入文本框-VBA

回答

相关问题