Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1492to1496
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
1492to1496
1492to1496
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Als Text formiert: Mit Punkten anzeigen

Als Text formiert: Mit Punkten anzeigen
09.05.2016 12:17:50
Matthias
Hallo zusammen
Ich habe die Zelle I12 als Text formatiert. Der Inhalt der Zelle ist aber an und für sich ein Datum. Also beispielsweise 01012016.
Nun möchte ich gerne folgendes:
1. Ich möchte in I12 entweder 01012016 ODER 01.01.2016 eintragen können. Bei beiden Eingaben, soll aber am Ende 01012016 in der Zelle stehen
2. Der als Text formatierte Zelleninhalt besteht immer aus 7 oder 8 Zahlen (01012016 oder ev. ohne das erste Null dann nur 1012016). In der Zelle soll der User aber immer 01.01.2016 sehen.
Kann mir da jemand helfen? :)
Herzlichen Dank und liebe Grüsse
Matthias

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Als Text formiert: Mit Punkten anzeigen
09.05.2016 12:32:13
Rudi
Hallo,
Texten kann man kein Format zuweisen.
Gruß
Rudi

Abgesehen mal davon, dass das mit VBA sehr ...
09.05.2016 15:50:41
Luc:-?
…spezifisch doch geht, Rudi,
wäre es hier in einer 2.Zelle (Ergebnis) durchaus möglich, egal ob die 1.Zelle (Eingabe) text- oder standard-formatiert ist.
Ergebnis als Text:
1062016 → 01.06.2016 ⇐WENN(UND(ISTZAHL(A1);LÄNGE(A10)>6);TEXT(A1;"00\.00\.0000");TEXT(A1;"TT.MM.JJJJ"))
1.6.2016 → 01.06.2016 ⇐WENN(UND(ISTZAHL(A2);LÄNGE(A2)>6);TEXT(A2;"00\.00\.0000");TEXT(A2;"TT.MM.JJJJ"))
Ergebnis als Zahl, datum-formatiert:
1062016 → 01.06.2016 ⇐WENN(UND(ISTZAHL(A1);LÄNGE(A1)>6);--TEXT(A1;"00\.00\.0000");--A1)
1.6.2016 → 01.06.2016 ⇐WENN(UND(ISTZAHL(A2);LÄNGE(A2)>6);--TEXT(A2;"00\.00\.0000");--A2)
Die Korrektur bei Eingabe (Bernd) ist natürlich nicht dasselbe wie ein Format, hat aber den gewünschten Effekt.
Um einen textformatierten Wert formatartig umzuwandeln, muss das gewünschte und anderweitig (bspw nach obigen Fmln) ermittelte Ergebnis direkt als TextTeil des Formats angegeben wdn. Dadurch bliebe die Eingabe erhalten, würde aber wie gewünscht angezeigt wdn. Ich nehme aber an, dass sich Matthias nur etwas ungeschickt ausgedrückt hat und es ihm darauf gar nicht ankommt (s.s.AW an Bernd).
Gruß, Luc :-?
Besser informiert mit …

Anzeige
AW: Als Text formiert: Mit Punkten anzeigen
09.05.2016 12:46:44
Bernd
Hi,
habs im Netz gefunden:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim dat As String
If Target.Count > 1 Then Exit Sub
If IsNumeric(Target) Then
If Len(Target.Text) = 5 Then
dat = "0" & Left(Target, 1) & "." & Mid(Target, 2, 2) & ".19" & Right(Target, 2)
ElseIf Len(Target.Text) = 6 Then
dat = Left(Target, 2) & "." & Mid(Target, 3, 2) & ".19" & Right(Target, 2)
ElseIf Len(Target.Text) = 7 Then
dat = "0" & Left(Target, 1) & "." & Mid(Target, 2, 2) & "." & Right(Target, 4)
ElseIf Len(Target.Text) = 8 Then
dat = Left(Target, 2) & "." & Mid(Target, 3, 2) & "." & Right(Target, 4)
End If
If dat  "" Then
Application.EnableEvents = False
Target.Value = dat
Application.EnableEvents = True
End If
End If
End Sub
mfg Bernd

Anzeige
AW: Als Text formiert: Mit Punkten anzeigen
09.05.2016 12:51:40
Matthias
Cool, danke Bernd. Damit kann ich was anfangen. Im Netz hab ich auch gesucht, aber wohl mit den falschen Suchbegriffen :) LG Matthias

Gerne & Danke für die Rückmeldung! owT
09.05.2016 12:53:36
Bernd

Thema verfehlt. 6! Setzen. owT
09.05.2016 12:54:55
Rudi

Hier in Ö gehts nur bis 5, also ebenfalls 6 :-) oT
09.05.2016 12:56:33
Bernd

310 Forumthreads zu ähnlichen Themen

Labels u. TextBoxen in UserForm blinken lassen
Lenhard

Moin Excellianer!
Wie bringe ich in einem UserForm die Caption mehrerer Labels und den Hintergrund von TextBoxen (z.B. Gelb/Weiß im Wechsel) zum blinken, wenn in der TextBox1 ein Wert steht? Wenn in der TextBox1 kein Wert steht, dann soll es auch nicht blinken in den Labels und TextBoxen.
19.12.2008 17:16:00
Thread-ID: 1034201
21 Beiträge
Anzeige
Datum in Textbox in eine Zahl umwandeln
TCO99

Hallo zusammen,
ich habe folgendes Problem.
In einer Spalte einer Tabelle befinden sich Datumsangaben. Ich filtere diese Liste nach einem Datum. Dieses Datum wird vor der Filterung in eine Textbox eingegeben. Als richtiges Datum fuktioniert die Filterung aber nicht mehr. Da habe ich ei...
26.02.2009 23:31:12
Thread-ID: 1054555
15 Beiträge
Zahlen in Text umwandeln
Thomas

Liebe Excelianer
Ich fülle per Excel ein Formular aus, welches ich anschliessend auf einen Check drucke. Darauf gibt es ein Feld mit einem Total, welches unten in Textform übertragen werden muss (Betrag in Worten).
Was kann ich tun, damit diese Zahl automatisch in Buchstaben umgewandelt...
01.04.2009 23:23:30
Thread-ID: 1066161
16 Beiträge
Anzeige
Umwandeln von Text in Währung
Text

Hallo,
ich habe ein Eingabefeld und dort soll ein Euro-Betrag eingegeben werden. Den will ich in eine Zelle schreiben. Dort soll er als Währung (mit Eurozeichen) erscheinen. Bisher ist er als Text eingetragen.
Was muss ich ändern?
Danke Euch.
27.04.2009 15:50:12
Thread-ID: 1071416
5 Beiträge
Hyperlink in TextBox
Mister

Hallo und guten Morgen,
in einer UF habe ich ein TextBox angelegt das den Pfad eines externen Dokuments beinhaltet. Durch Doppelklicken wird das externe Dokumet geöffnet. Mit folgendem Code aus dem Forum klappt es auch:
Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoo...
18.05.2009 07:27:51
Thread-ID: 1075771
3 Beiträge
Fehlerwerte in Text umwandeln
Bernd

Hallo,
gibt es eigentlich eine Möglichkeit, Fehlerwerte wie #DIV/0! in Text umzuwandeln per Formel aus der Formelbibliothek von Excel? Bisher ist mir das nur über die Aktion : Kopieren/Werte einfügen gelungen.
Welche Möglichkeiten kennt Ihr so?
Gruß
Bernd
24.08.2009 16:36:00
Thread-ID: 1098185
18 Beiträge
Text ab einer bestimmten Stelle löschen +Hyperlink
Werner

Hallo,
ich habe in Excel in einer Spalte (Spalte D) unter einander sehr viele Zeilen nach folgenden Schema
(Hinweis: Ich habe das h am Anfang hier weggelassen, weil der Beitrag sonst immer als Hyperlink dargestellt wird, in meiner Tabelle ist es vorhanden):
ttp://www.ihrname.de*dfg...
05.12.2009 23:35:56
Thread-ID: 1122006
3 Beiträge
TextBox - kontextMenü um einen Hyperlink einfügen
Frank

Hallo euch Allen und vorab frohe Ostern!!!
Meine Frage: Wie kann ich erreichen, dass wenn ich eine TextBox in einer UF ansteuere sich ein Kontextmenü öffnet, so dass ich dann in die TextBox einen Hyperlink eingeben kann. Wer weiß Rat?
Vorab Danke!!!
Gruß Frank H.!!!
31.03.2010 21:12:34
Thread-ID: 1149714
12 Beiträge
Anzeige

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
20
7
14
15
3
4
2
17
2
11
1
4
2
1
3
1
2
3
8
1
7
1
6
2
2