Witam
Mam problem z napisanym kodem:
W module1
Public vba As Worksheet
Public Lp As Integer
Sub zmienne()
Set vba = Sheets("Arkusz1")
Lp = vba.Range(A1")
End Sub
W UserForm
Private Sub Dodaj_Click()
vba.Cells(Lp, 10).Value = TextBox1.Value
Unload Me
End Sub
Private Sub UserForm_Initialize()
Call zmienne
End Sub
przy wywołaniu "Dodaj_Click" pojawia się komunikat: Method or data member not found.
Jeżeli zamienię
vba.Cells(Lp, 10).Value = TextBox1.Value
na
Sheets("Arkusz1").Cells(Lp, 10).Value=TextBox1.Value
to jest ok.
Nie rozumiem, dlaczego nie widzi zmiennej obiektowej VBA, natomiast zmienną Lp już tak.
Proszę o pomoc, kogoś bardziej pojętnego niż ja.