Problem mit If

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Problem mit If
von: Daniel O.
Geschrieben am: 11.11.2003 10:27:11

Hallo Freunde,
Ich habe mal wieder ein Problem!!!
Kann sich jemand diese Code anschauen?


Private Sub CommandButton1_Click()
If ListBox1.Text = "" Then
Label2.Caption = "Sie haben kein Monat gewählt!"
Label3.Caption = "Wählen Sie ein Monat"
End If
If ListBox1.Value > 0 Then
Label2.Caption = "Der Plan wird gespeichert"
Plan_Speichern
End If
End Sub


Private Sub CommandButton2_Click()
If ListBox1.Text = "" Then
Label2.Caption = "Sie haben kein Monat gewählt!"
Label3.Caption = "Wählen Sie ein Monat"
End If
If ListBox1.Value > 0 Then
Label2.Caption = "Der Plan wird geöffnet"
Plan_Öffnen
End If
End Sub


Private Sub CommandButton3_Click()
If ListBox2.Text = "" Then
Label2.Caption = "Sie haben keine Tabelle gewählt!"
Label3.Caption = "Wählen Sie eine Tabelle aus."
End If
If ListBox2.Value > 0 Then
Plan_Speichern1
End If
End Sub


Private Sub CommandButton4_Click()
If ListBox2.Text = "" Then
Label2.Caption = "Sie haben keine Tabelle gewählt!"
Label3.Caption = "Wählen Sie eine Tabelle"
End If
If ListBox2.Value > 0 Then
Label2.Caption = "Die Tabelle wird geöffnet"
Plan_Öffnen1
End If
End Sub


Die

Private Sub CommandButton 1 und 2  funktionieren:
wenn ListBox1.Text="" erscheinen die beide Labels
wenn ListBox1.Value>0 dann geht zu Plan speichern oder öffnen.... reibungslos!!
Die CommandButton 3 und 4 ignorieren der If und gehen gleich weiter und natürlich kommt zum Error, 
da der Wert von der Listbox2  "" ist
Warum???
Kann mich jemand helfen?
Danke Daniel
Bild


Betrifft: AW: Problem mit If
von: Hans W. Herber
Geschrieben am: 13.11.2003 06:43:28

Hallo Daniel,

frage nicht ListBox-Value, sondern ListBox-Index ab. Keine Auswahl ist -1

gruss hans


Bild


Betrifft: AW: Problem mit If
von: Daniel
Geschrieben am: 13.11.2003 13:08:00

Danke


Bild

Beiträge aus den Excel-Beispielen zum Thema " Problem mit If"