Vba Listbox Fehlermeldung
27.12.2017 23:08:31
adcak
undzwar habe ich ein kleines Problem und hoffe ihr könnt mir weiterhelfen.
Irgendwie bekomme ich immer einen Laufzeitfehler 381(Warum weiss ich nicht) habe auch verschiedene Varianten ausprobiert.
bei
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Value = ListBox1.Column(1, ListBox1.ListIndex)
TextBox2.Value = ListBox1.Column(2, ListBox1.ListIndex)
TextBox3.Value = ListBox1.Column(5, ListBox1.ListIndex)
TextBox4.Value = ListBox1.Column(7, ListBox1.ListIndex)
End Sub
oder
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1 = ListBox1.Column(1)
TextBox2 = ListBox1.Column(2)
TextBox3 = ListBox1.Column(5)
TextBox4 = ListBox1.Column(7)
End Sub
oder
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1 = ListBox1.List(ListBox1.ListIndex, 1)
TextBox2 = ListBox1.List(ListBox1.ListIndex, 2)
TextBox3 = ListBox1.List(ListBox1.ListIndex, 5)
TextBox4 = ListBox1.List(ListBox1.ListIndex, 7)
End Sub
Anzeige