在用戶表單中將值寫入文本框-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

回答

相關問題