problem z dodaniem przycisku polecenia s do formularza użytkownika. Zasadniczo chcę, aby przycisk wstawiał dane do nowego wiersza na arkuszu 1 z polami ustawionymi jak poniżej. Jednak podczas testowania przycisku pojawia się komunikat o błędzie „Nie znaleziono metody lub elementu danych”.
Nie wspaniale z VBA, próbowałem czytać online, ale nadal jestem zdezorientowany, co robić. Proszę pomóż.
Private Sub CommandButton1_Click()
Dim LastRow As Long, ws As Worksheet
Set ws = Sheets("Sheet1")
LastRow = ws.Range("A" & Rows.Count).End(xlUp).Row + 1
ws.Range("A" & LastRow).Value = ComboBox1.Text
ws.Range("C" & LastRow).Value = TextBox1.Text
ws.Range("D" & LastRow).Value = ComboBox2.Text
ws.Range("F" & LastRow).Value = CheckBox2.Text
ws.Range("E" & LastRow).Value = CheckBox1.Text
ws.Range("H" & LastRow).Value = ListBox1.Text
ws.Range("G" & LastRow).Value = ListBox2.Text
ws.Range("I" & LastRow).Value = TextBox2.Text
End Sub
microsoft-excel
vba
użytkownik767772
źródło
źródło
Value
lubCaption
, w zależności od typu kontrolki.Odpowiedzi:
Pola wyboru nie mają
Text
właściwości.Value
Zamiast tego użyj właściwości, np .:Zauważ, że zwraca to „Prawda” lub „Fałsz”. Jeśli potrzebujesz czegoś innego, musisz wykonać kontrolę, na przykład:
źródło