Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
960to964
960to964
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Variable Wenn-Dann Abfrage in einer TextBox

Forumthread: Variable Wenn-Dann Abfrage in einer TextBox

Variable Wenn-Dann Abfrage in einer TextBox
25.03.2008 23:12:00
edie
Hallo zusammen,
wie lautet die Syntax, wenn die Wenn-Dann Abfrage nicht nur
für das Jahr 2008 gelten soll?

Private Sub CommandButton1_Click()
If Format(CDate(Me.TextBox1.Value), "dd.mm.yy") > CDate("01.03.08")_
And Format(CDate(Me.TextBox1.Value), "dd.mm.yy")


Würde gerne eine "Eiwige" Abfrage in die Prozedur einbauen.
Kann mir jemand helfen?
Vielen Dank im Voraus.
Grüße

Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
ändere doch die Jahreszahlen oT
25.03.2008 23:25:37
Matthias

AW: Variable Wenn-Dann Abfrage in einer TextBox
25.03.2008 23:28:26
ChrisL
Hallo
If Month(CDate(TextBox1)) = 3 Then
Gruss
Chris

AW: Variable Wenn-Dann Abfrage in einer TextBox
25.03.2008 23:28:00
Chris
Servus,
evtl. so, wenn ich's richtig verstanden habe:

Private Sub CommandButton1_Click()
If Format(CDate(Me.TextBox1.Value), "dd.mm.yy") > CDate("01.03." & Year(Me.TextBox1))_
And Format(CDate(Me.TextBox1.Value), "dd.mm.yy")


So wird das Jahr aus der TextBox ausgelesen.
Gruß
Chris

Anzeige
... oder meinst Du es so ?
26.03.2008 01:07:00
Matthias
Hallo
... oder meinst Du generell so:
BILD
Userbild

Option Explicit
Private Sub CommandButton1_Click()
On Error GoTo Ende
If IsDate(TextBox1.Value) Then
 If CLng(TextBox2.Value) > 0 And CLng(TextBox2.Value) 
End If
Ende:
On Error GoTo 0
End Sub


Der schwarze Text (im Code) gehört in eine Codezeile ! (wie im Bild). Er wird leider von der Forumsoftware immer wieder "zerpflückt"

Ich habe das ElseIf mal in eine Zeile gepackt.
Es wird ja immer TextBox3.Value = 240 - TextBox4.Value gerechnet
In einer Textbox steht generell Text, das sagt der Name schon.
Auch wenn Du eine Zahl da reinschreibst, bleibt es erstmal Text !
Deshalb die Umwandlung in Clng und Cdbl ( dann sind es Zahlen [Typ Long & Doubel])
hier meine Beispielmappe:
https://www.herber.de/bbs/user/51010.xls
Ich hoffe es hift Dir
Userbild

Anzeige
AW: ... oder meinst Du es so ?
26.03.2008 08:20:00
edie
Hallo Chris,
Hallo Matthias,
vielen herzlichen Dank für die Hilfe.
hatte bis vor kurzem nicht Zeit zum testen, aber jetzt.
Danke noch ein mal.
Grüße

AW: ... Zusatzfrage
26.03.2008 09:04:00
edie
Hallo zusammen,
Wenn das Datum in TextBox1 zwischen 01.03. und 01.04. liegt
If Format(CDate(Me.TextBox1.Value), "dd.mm.yy") > CDate("01.03." & Year(Me.TextBox1))_
And Format(CDate(Me.TextBox1.Value), "dd.mm.yy") würde ich gerne vom 01.04. minus das Datum aus TextBox1 abziehen.
so etwa: "01.04." & Year(Me.TextBox1)- TextBox1.Value
Wie könnte die Syntax lauten?
Vielen Dank im Voraus.
Grüße

Anzeige
AW: ... Zusatzfrage
26.03.2008 09:22:00
Chris
Servus ede,
z.B. so:

Private Sub CommandButton1_Click()
Dim datum As String, ergebnis As Double, datum1 As String
If Format(CDate(Me.TextBox1.Value), "dd.mm.yy") > CDate("01.03." & Year(Me.TextBox1)) And  _
Format(CDate(Me.TextBox1.Value), "dd.mm.yy")


Gruß
Chris

Anzeige
AW: Vielen Dank, es funktioniert
26.03.2008 09:28:10
edie
Hallo Chris,
vielen Dank, es funktioniert, prima.
Grüße
;

Forumthreads zu verwandten Themen

Wenn-Dann + SVERWEIS ???
B@sti

Hallo zusammen,
ich bräuchte zu folgendem Thema eure Hilfe:
und zwar geht es um den Abgleich zweier Arbeitmappen. In der ersten Arbeitsmappe befinden sich die Infos, aus der ein Ergebnis für die zweite Arbeitsmappe ausgelesen werden soll. Hab mal ne Beispieldatei angehängt:
https://...
21.08.2008 10:54:00
Thread-ID: 1003404
4 Beiträge
Wenn in Zelle folgender String, dann
mehmet

Hallo Forum,
In Spalte G4:G92 sind viele kodierte Zeichenfolgen.
Fest steht aber, dass diese zu erkennen sind, z.B.
in Zelle G4: METAR EKAH 052150Z AUTO 12005KT 9999NDV DZ OVC080/// 15/14 Q1005=
in Zelle G5: METAR ESSA 051940Z 20006KT CAVOK 11/10 Q1006 NOSIG=
und so weiter.....
06.09.2008 01:08:00
Thread-ID: 1007801
16 Beiträge
Anzeige
Wenn in Zelle folgende Zeichen, dann
mehmet

Hallo Forum,
in Spalte G4:G92 sind folge Codes:
in G4= TAF LSZH 090600Z 090716 VRB03KT 0200 FG VV001 BECMG 0709 CAVOK=
in G5= TAF DTTA 090600Z 090716 VRB03KT 0700 FG BKN013 BECMG 1012 07010KT 8000 SCT026=
in G6= TAF EPKT 090500Z 090615 24002KT 0500 FG NSC BECMG 0608 26005KT 9999...
09.09.2008 09:39:00
Thread-ID: 1008320
6 Beiträge
Wenn Zelle leer, dann Grafik löschen
TomTom

Hi,
ich möchte auf meinem Sheet abprüfen, ob die Zelle A41 und B41 leer sind, und wenn ja, soll eine Grafik (.bmp / wurde eingefügt mit Kopieren und einfügen und heisst im Namensfeld "Bild 01")
gelöscht oder unsichtbar werden.
Wie mache ich dies ?
Danke mal
Gruss
Tom<...
22.09.2008 08:28:10
Thread-ID: 1011373
3 Beiträge
Anzeige
Mehr als 7 Wenn-Dann-Verschachtelungen
Bernd

Hallo Leute,
ich habe eine WENN DANN Formel mit mehr als 7 Verschachtelungen. Hat jemand eine Idee wie ich diese Formel so umschreiben kann, dass ich Sie nutzen kann?
Hier ist sie:
=WENN(Monat($D$2)=1;SVERWEIS($D$2;'01'!$G$7:$R$43;2);WENN(Monat($D$2)=2;SVERWEIS($D$2;'02'!$G$7:$R$43...
13.10.2008 17:23:11
Thread-ID: 1016134
4 Beiträge
Wenn ComboBox Dann ListBox
sockel939

Hallo Excelfreunde,
habe hier ne Legerverwaltung dessen Code ich gerne um einen Punkt erweitern möchte.
Und zwar soll die TextBox " Lagerbestand" aus der UserForm die Gesamtmenge aus der Tabelle "Lagerstand" wiedergeben in abhängigkeit des Wertes der in der ComboBox "Marke"
eingegeb...
16.10.2008 15:36:46
Thread-ID: 1016894
3 Beiträge
Wenn-Dann
Jenny

Hallo,
also in meiner Tabelle habe ich mehrere Daten z.B. 01.12.1990. Excel soll mir nun alle Daten die vor dem 01.10.2005 waren als 01.10.2005 anzeigen...alle Daten die nach dem 01.10.2005 sind soll er mir auch genau anzeigen. Geht das?
Lieben Gruß
23.10.2008 10:31:00
Thread-ID: 1018545
7 Beiträge
Wenn Eintrag in ListBoxspalte dann Eintrag in lbl
Josef

Guten Morgen!
In eine mehrspaltige ListBox werden eine Menge Datensätze eingelesen.
Ich möchte nun folgendes erreichen:
Wenn ich einen Datensatz in der ListBox markiere oder anklicke und wenn jetzt z.B. in der 2.Spalte in der ListBox ein "J" steht, dann soll ein vordefinierter Text...
29.10.2008 07:57:42
Thread-ID: 1020127
3 Beiträge
Formel wenn dann sonst ...
Uwe

Hallo, Gemeinde ..
Mir stellt sich folgende Herausforderung:
ich möchte in einer Liste Fahrtkosten berechnen. Der Arbeiter bekommt von km 1 bis km 10 0,36€ pro km (einfach). ab dem 11 km bekommt der Arbeiter 0,40€.
Wie bekomme ich eine Formel hin, die das berechnet, wenn
- der A...
31.10.2008 11:20:00
Thread-ID: 1020821
10 Beiträge
Zelleninhalt suchen wenn gefunden dann...
Ernst

Hallo Fachleute,
ich möchte mit einem Makro eine Tabelle (möglichst nur einen vorher definierten Bereich) auf bestimmte Zellinhalte durchsuchen und wenn es einen Inhalt findet soll es dort eine Zeile einfügen und von mir im Makro definierten Text einfügen.
Nähere Anleitung in der Datei....
16.11.2008 14:44:22
Thread-ID: 1024902
7 Beiträge
WENN-DANN verschachteln
Stefan

Guten Morgen Zusammen
Hab da ein kleines WENN-DANN Problem. Da müßte ich (wahrscheinlich) schachteln. Aber mit Formeln und verschachteln hab ich so meine lieben Probleme.
Problem:
Ich möchte eine Auswertung machen. Hierzu steht in Zelle E18 der Wert - z.B. A für Aussenstelle und H f...
21.11.2008 08:11:00
Thread-ID: 1026592
2 Beiträge
Wenn-Dann-Funktion als Makro
Sulley

Hallo zusammen,
ich hänge an einem Makro fest.
Matthias L und fcs (Vielen dank noch mal an dieser Stelle) haben mir mal jeder ein super makro gebaut, mit welchem ich Daten von einer Tabelle ans Ende einer anderen Tabelle schicken kann. Hat auch super geklappt.
Hier nochmal das Makro...
24.11.2008 16:47:36
Thread-ID: 1027372
11 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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