Problem mit Call im VBA
14.03.2023 11:41:22
Sascha
Habe da ein komisches Problem. Ich nutze in einer Userform eine Multipage mit 4 Seiten. Dabei kommt 4 mal Private Sub bearbeiten () vor.
Private Sub bearbeiten1 (); PS bearbeiten2 (); PS bearbeiten3 (); PS bearbeiten4 ()
Aufgerufen durch klick auf den dazugehörigem Commandbutton. Die ersten 3 funktionieren Tadellos und ohne Probleme. Bei Call bearbeiten4 allerdings bekomme ich einen Debugg.
"Fehler beim Kompilieren; Methode oder Datenobject nicht gefunden". Makiert in blau: .aktuelleZeile = ; in gelb: Private Sub bearbeiten4()
Die ListBox heißt ListBox4, der Button heißt NFBearbeiten. Alles genauso eingerichtet, wie bei den anderen 3, die ja funktionieren.
Hat da jemand einen Rat für mich?
Grüße, Sascha
Private Sub bearbeiten1()
Dim frm As New StoffNrBearbeiten
frm.aktuelleZeile = ListBox1.ListIndex + 2
frm.Show
End Sub
Private Sub LackBearbeiten_Click()
Call bearbeiten1
End Sub
Private Sub bearbeiten2()
Dim frm As New SFBearbeiten
frm.aktuelleZeile = ListBox2.ListIndex + 2
frm.Show
End Sub
Private Sub SFBearbeiten_Click()
Call bearbeiten2
End Sub
Private Sub bearbeiten3()
Dim frm As New NKBearbeiten
frm.aktuelleZeile = ListBox3.ListIndex + 2
frm.Show
End Sub
Private Sub NKBearbeiten_Click()
Call bearbeiten3
End Sub
Private Sub bearbeiten4()
Dim frm As New NFBearbeiten
frm.aktuelleZeile = ListBox4.ListIndex + 2
frm.Show
End Sub
Private Sub NFBearbeiten_Click()
Call bearbeiten4
End Sub