Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1392to1396
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1392to1396
1392to1396
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Jahresformat 19xx und 20xx

Jahresformat 19xx und 20xx
25.11.2014 20:37:18
Spenski
huhu.
ich gebe in eine Textbox zb 24.12.14 ein und über einen button wird dieser wert dann zb in zelle A1 geschrieben.
klappt auch soweit nur wird mir n grünes dreieck in der zeile angezeigt wo ich 19xx bzw 20xx auswählen soll/kann
gibts ne möglichkeit das automatisch immer 20xx gewählt wird?
fanke fürs lesen
christian

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Jahresformat 19xx und 20xx
25.11.2014 21:35:39
Jürgen
BUH!
ICH GLAUBE, DEINE TASTATUR IST KAPUTT! Oh, jetzt hat meine wohl auch geklemmt...
Zu Deiner Frage (ohne den konkreten Code zu kennen): eine Lösungsmöglichkeit ist, den Textboxinhalt mit Datevalue in ein Datum umzuwandeln und dann in die Zelle zu schreiben.
Gruß, Jürgen

AW: Jahresformat 19xx und 20xx
25.11.2014 21:57:41
Spenski
hihi wie meinst das mit der tatstatur? weil ich nur klein schreibe?
also hier ist die abgespeckte version vom code
Sub x()
With Workbooks("MD.xlsx").Worksheets("Datenbank")
With .Range("A2:A" & .Cells(Rows.Count, 1).End(xlUp).Row)
Set Suchergebnis = .Find(TextBox1, LookIn:=xlValues, lookat:=xlWhole)
If Not Suchergebnis Is Nothing Then
Dim Antwort
Antwort = MsgBox("Der Auftrag ist bereits Vorhanden. Sollen die alten Daten überschrieben  _
werden?", 4, "Auftrag anlegen?")
If Antwort = vbYes Then
Suchergebnis.Offset(0, 1).Value = TextBox2.Value
Suchergebnis.Offset(0, 2).Value = TextBox3.Value
End If
End If
End With
End With
With Workbooks("MD.xlsx").Worksheets("Datenbank")
If Suchergebnis Is Nothing Then
.Cells(.Rows.Count, 1).End(xlUp).Offset(1, 0) = TextBox1.Value
.Cells(.Rows.Count, 1).End(xlUp).Offset(0, 1) = TextBox2.Value
.Cells(.Rows.Count, 1).End(xlUp).Offset(0, 2) = TextBox3.Value
End If
End With
End With
End Sub

Anzeige
AW: Jahresformat 19xx und 20xx
25.11.2014 22:59:44
Gerd
Hallo,
versuche es mit
=CDate(TextBox1.Value)
Gruß Gerd

AW: Jahresformat 19xx und 20xx
26.11.2014 07:34:14
Spenski
Huhu danke für die Ntworten, ich werde es heute testen und Feedback folgt heute Abend
Gruss

AW: Jahresformat 19xx und 20xx
26.11.2014 18:47:21
Spenski
hat super geklappt
danke

87 Forumthreads zu ähnlichen Themen

Einen noch Boris :-)
sockel939

So gehts nicht :-(
For Each Zelle In Range("M4:X1000")
If Zelle "" Then
Interior.ColorIndex = 23
End If
Next
23.08.2008 00:34:00
Thread-ID: 1004060
5 Beiträge
Anzeige
aus Januar 2009 - 01.01.2009 machen
Karsten

Hallo,
durch eine Verkettung erscheint in einer Zelle Januar 2009 oder Februar 2009 usw. bis Dezember 2009.
Läßt sich diese Verkettung (z.B.Januar 2009) in einer anderen Zelle als "richtiges Datum", eben als 01.01.2009, umwandeln? Ich benötige dies für eine Suchfunktion, für einer Spalt...
08.07.2009 09:41:13
Thread-ID: 1087082
5 Beiträge
Sorry Tino, Bitte nochmal wg. Deinem Beispiel
Joachim

Hallo Tino,
Sorry der Belästigung. Du hast mir doch letzte Woche das Beispiel geschickt, mit dem Zusammenfassen von Datensätzen. Babei sollte man bei gleichem Inhalt in V , die Preise in "E" addieren.
Das war diese Zeile:
.FormulaR1C1 = "=IF(OR(RC22="""",RC22=""S""),RC5,IF(COUNTIF(R...
29.09.2009 09:11:42
Thread-ID: 1106050
4 Beiträge
Anzeige
Datum jahr 2010 / 11
Karel

Hallo Forum,
wie kan ich wert in Zelle zu darstellen das bei Monats Anfang Grosser dan Januar 2 Jahres zahlen in Zelle dargestellt wird für die nächste 3 Jahre.
Jahr Ausgabe 1 Ausgabe 2 Ausgabe 3
Jan 2010 2010 2011 2012
Feb 2010 2010 / 11...
19.01.2010 16:53:31
Thread-ID: 1131111
6 Beiträge
Zelleneintrag "1200" in Uhrzeit 12:00 umwandeln
',," (2x Komma) Durch:':' (Doppelpunkt).Nun kannst Du 'komfortabel' auf dem Ziffernblock 2 Kommas eingeben; der Doppelpunkt eird generiert.Ansonsten als Ansatz fogende VBA-Makros von Michael Schwimmer:
16.04.2002 10:15:59
Thread-ID: 113633
2 Beiträge
Jahre vor 1900
Matthias

Hallo zusammen!Gibt es eine Möglichkeit in Excel auch mit Jahreszahlen vor 1900 zu rechnen oder beginnt das "Excel-Zeitalter" definitiv mit dem 1.1.1900?
Vielen Dank,
Matthias

17.04.2002 10:53:30
Thread-ID: 114014
2 Beiträge
Drucken ja oder nein mit Kontrollkästchen
Michael

Hallo zusammen,
ich sitz hier grad und bastle an einem Ausschusserfassungsprogrämmchen herum, leider klappt das noch nicht ganz so wie ich das gern hätte.
Bis jetzt läuft das so ab, dass ich automatisch nach der Übernahme der Daten per Knopfdruck einen Sperrzettel ausdrucke und das E-Ma...
01.03.2010 09:18:33
Thread-ID: 1142271
5 Beiträge
msgbox Ja,nein Vorauswahl "Nein"
chris

Hallo und guten morgen.ich fasse mich kurz.
ich benutze eine msgbox mit VBYes und VBNo
Wie kann ich erreichen das die Norauswahl auf "Nein" ist.
Also wenn ich Enter drücke das Nein gewählt wird ?
Ohne das ich erst mit TAb auf den Nein Button springe.
Würde mich sehr über Hil...
21.09.2010 07:31:06
Thread-ID: 1178653
3 Beiträge

Links zu Excel-Dialogen

TextBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
2
4
3
3
5
1
1
4
2
2
6
5
10
6
6
8
6
6
12
7
15
2
2
6