Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Laufzeitfehler 381

Laufzeitfehler 381
01.04.2008 21:20:00
Hans
Hallo
Könntet Ihr mir bitte meine Datei anschauen.
https://www.herber.de/bbs/user/51200.xls
Ich bekomme einen Laufzeitfehler wenn ich keinen Eintrag in der Listbox markiere und auf Eintragen klicke.
Vielen Dank
Gruß Hans

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
probier mal On Error
01.04.2008 21:30:00
Matthias
Hallo

Private Sub CommandButton1_Click()
On Error GoTo Ende
With Me.ListBox1
Cells(16, 3) = .Value
Cells(17, 3) = .List(.ListIndex, 1)
Cells(18, 3) = .List(.ListIndex, 3)
End With
Ende:
Unload Me
End Sub


Gruß Matthias

Anzeige
AW: Laufzeitfehler 381
01.04.2008 21:30:48
Renee
Hi Hans,
Als erste Befehlszeile:

Private Sub CommandButton1_Click()
If ListBox1.ListIndex 


GreetZ Renée

AW: Laufzeitfehler 381
01.04.2008 21:31:17
Gerd
Hallo Hans,
meinst Du so ?

Private Sub CommandButton1_Click()
With Me.ListBox1
If .ListIndex > -1 Then
Cells(16, 3) = .Value
Cells(17, 3) = .List(.ListIndex, 1)
Cells(18, 3) = .List(.ListIndex, 3)
End If
End With
Unload Me
End Sub


Gruß Gerd

Anzeige
AW: Laufzeitfehler 381
01.04.2008 21:43:32
Hans
Dank an Euch,
Alle 3 Lösungen funktionieren.
Gruss Hans
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige