Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
732to736
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
732to736
732to736
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

If schleife

If schleife
Roger
hi wollte ne Abfrage starten
IF-SCHLEIFE "B-NUMMER"
Die Werte weden nicht übernommen!
Hat jemand ne Idee?

Private Sub CommandButton2_Click()
Dim i
Dim Zelle
z = Range("A2").End(xlDown).Row + 1
If z > 65000 Then z = 2
cells(z, 1) = ComboBox1
cells(z, 2) = TextBox1
cells(z, 3) = TextBox2
cells(z, 4) = TextBox3
cells(z, 5) = TextBox4
cells(z, 6) = TextBox5
cells(z, 7) = TextBox6
cells(z, 8) = TextBox7
'Hier werden die "EINGABEN" gelöscht
ComboBox1 = ""
TextBox1 = ""
TextBox2 = ""
TextBox3 = ""
TextBox4 = ""
TextBox5 = ""
TextBox6 = ""
TextBox7 = ""
' Dieses ist die Schleife "B-Nummer"
If ComboBox1 = "B20000" Then
cells(z, 1) = "B20000"
cells(z, 2) = "Datum"
cells(z, 3) = "Uhrzeit"
cells(z, 4) = " "
cells(z, 5) = "20/00"
cells(z, 6) = " "
cells(z, 7) = "Name"
cells(z, 8) = "Vorname"
End If

Private Sub CommandButton1_Click()
UserForm2.Hide
With Me.ComboBox1
.RowSource = "User!A2:i17"
End With
End Sub

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: If schleife
19.02.2006 20:48:23
MichaV
Hallo,
zuerst schreibst Du ComboBox1 = "", und danach If ComboBox1 = "B20000" Then...
Ist doch kein Wunder, daß dieser Zweig nie ausgeführt wird. ComboBox1 ist leer.
Gruß- Micha
PS: Rückmeldung wäre nett.
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige