ユーザーフォームに配置されたテキストボックスに動的に値を書き込もうとしています。これは私のコードであり、最後の行でエラーが発生しています。それは必要な物を言う。あなたは完全に修飾する必要がある -Userform - 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
親切に自分の考えを共有
はい。できます。今あなたのポイントを得ました。ありがとう:) – Sid29
心配しないで、あなたの問題を解決した場合は、答えを受け入れることを忘れないでください。 –
それを受け入れます。それは私がそれを受け入れるために6分待たなければならないと言う – Sid29