Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
896to900
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
896to900
896to900
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Wert in Label (UF) wird nicht verändert

Wert in Label (UF) wird nicht verändert
16.08.2007 06:18:20
Josef
Hallo!
Ich habe folgenden Code:
If cboNamen6.Text = "Orthesen" And Label112.Caption >= "1024,00" Then
txtBox15.Text = "xPV"
End If
If cboNamen6.Text = "Orthesen" And Label112.Caption txtBox15.Text = ""
End If
If cboNamen6.Text = "Orthesen" And Label112.Caption = "0,0001" Then
txtBox15.Text = "xPV"
End If
Ist der aktivierte Code in der ComboBox (cboNamen6 "Orthesen" und ist der Wert im Label112 größer als 1024,00 wird in der txt15 der Wert "xPV" eingetragen.
Wenn ich jetzt jedoch einen Wert unter 1024,00 aktiviere, dann bleibt der Wert in der txt15 weiter bestehen obwohl jetzt die TextBox eigentlich leer sein sollte.
Ich habe es bereits auch mit If Else probiert. Leider ohne Erfolg. Was mache ich hier bitte falsch?
Danke
Josef

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert in Label (UF) wird nicht verändert
16.08.2007 06:58:57
Beverly
Hi Josef,
bei deinem Code ist der Wert 1024,00 immer erfüllt, da er sowohl ">=" als auch "

If cboNamen6.Text = "Orthesen" And Label112.Caption >= "1024,00" Then
txtBox15.Text = "xPV"
End If
If cboNamen6.Text = "Orthesen" And Label112.Caption  "1024,00" Then
txtBox15.Text = ""
End If


________________________________________

AW: Wert in Label (UF) wird nicht verändert
16.08.2007 07:31:39
Josef
Hallo Karin! Hallo Rainer!
Danke für Eure Hilfe. Hat mit sehr geholfen.
Josef

AW: Wert in Label (UF) wird nicht verändert
16.08.2007 07:11:45
Wuxinese
Hallo,
ich habs folgendermassen gemacht (funktionierte aber auch nach Deinem Schema):
If cboNamen6.Text = "Orthesen" And Label112.Caption >= 1024 Then
txtbox15.Text = "xPV"
ElseIf cboNamen6.Text = "Orthesen" And Label112.Caption txtbox15.Text = ""
ElseIf cboNamen6.Text = "Orthesen" And Label112.Caption = 0.0001 Then
txtbox15.Text = "xPV"
End If

Vielleicht ist Dein Fehler ja auch in der Einbindung des Codes. Dazu waer es schoen, wenn ich die Tabelle sehen koennte.
Gruss
Rainer
Anzeige

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige