Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
876to880
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
876to880
876to880
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Punkte aus Datum entfernen....

Punkte aus Datum entfernen....
16.06.2007 14:22:24
Uwe
Hallo an alle,
hab ja in der Onlinesuche gefunden wie man ein Datum ohne Punkte eingibt......
aber wie bekomme ich aus einer zelle in der das Datum mit Punkten drin steht, die punkte raus.....
...z.b. A1= 16.06.2007 nach A2=16062007.
Mit Formel wie Glätten bekomm ich nur die umgewandelte Zahl vom Datum.
Vorab schon mal Dank für die Hilfe!
Gruß Uwe

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

Betreff
Datum
Anwender
Anzeige
AW: Punkte aus Datum entfernen....
16.06.2007 14:29:01
Josef
Hallo Uwe,
wenn's nur um die Anzeige geht, brauchst du die Zelle ja nur im Format "TTMMJJJJ" Formatieren.
Gruß Sepp

AW: Punkte aus Datum entfernen....
16.06.2007 14:42:00
Uwe
Hallo Sepp,
dank erst mal!
Hab es mal probiert, leider ist es genau das was Du schon vermutet hast.
Mein Hintergedanke war dabei da Datum dann so weiter zu geben um es z.b. um damit einen dateinamen zum speichern zu erstellen..(test16062007).
Gibts dafür eine Formellösung?
Gruß Uwe

AW: Punkte aus Datum entfernen....
16.06.2007 14:45:40
Josef
Hallo Uwe,
Tabelle3

 A
116.06.2006
2 
3Test
4 
5Test16062006

Formeln der Tabelle
ZelleFormel
A5=A3&TEXT(A1;"TTMMJJJJ")
Excel Tabellen im Web darstellen  Excel Jeanie HTML
Gruß Sepp

Anzeige
AW: Punkte aus Datum entfernen....
16.06.2007 15:13:00
Uwe
Hallo Sepp,
war genau das richtige!! Danke!
..aber was ich gerade bemerkt habe, ist das ich an einer Umsetzung für eine speicherung einer Datei beschäftigt bin deren VBA-Code du bereits mal in einem anderen Beitrag erstellt hast......
Option Explicit
'API Deklaration~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Private Declare Function MakeSureDirectoryPathExists Lib "imagehlp.dll" ( _
ByVal DirPath As String) As Long
'Ende API Deklaration~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
'Der Code deines CommandButton
Private Sub CommandButton42_Click() Dim SpeicherName As String Dim result As Long SpeicherName = "W:\Test\test\" & Range("A1100") & Range("A1101") & Range("A1102") & Range(" _ A1103") & ".xls" result = MakeSureDirectoryPathExists(SpeicherName) If result 0 Then ActiveWorkbook.SaveAs Filename:=SpeicherName Else MsgBox "Pfad konnte nicht erstellt werden!", 48, "Hinweis" End If End Sub


'Ende Code CommandButton
.... jetzt wird damit ja die Datei in einen vorgegeben Ordner angelegt!
Geht das den so.... In dem vorgegeben Ordner einen Ordner anzulegen der den selben Dateinamen hat, und da drin die Datei abzulegen. Sonst alles wie es so jetzt auch geht.
Hoffe ich konnte das einigenmaßen deutlich machen.
Gruß Uwe

Anzeige
AW: Punkte aus Datum entfernen....
16.06.2007 16:53:37
Josef
Hallo Uwe,
wenn ich dich richtig verstehe, dann so.
Private Sub CommandButton42_Click()
Dim SpeicherName As String, strFile As String
Dim result As Long

strFile = Range("A1100") & Range("A1101") & Range("A1102") & Range("A1103")

SpeicherName = "W:\Test\test\" & strFile & "\" & strFile & ".xls"

result = MakeSureDirectoryPathExists(SpeicherName)

If result <> 0 Then
    ActiveWorkbook.SaveAs Filename:=SpeicherName
Else
    MsgBox "Pfad konnte nicht erstellt werden!", 48, "Hinweis"
End If

End Sub

Gruß Sepp

Anzeige
AW: Punkte aus Datum entfernen....
16.06.2007 19:18:00
Uwe
Genau so hab ich es mir gewünscht!Super!
..eins fällt noch auf... wenn man die Abfrage zum überschreiben mit nein oder abbrechen beantwortet geht er in den Debugmodus und wirft folgende Zeile als gelb markiert aus...
ActiveWorkbook.SaveAs Filename:=SpeicherName
hast Du da eine Lösung für?
Gruß Uwe

AW: Punkte aus Datum entfernen....
16.06.2007 19:40:48
Josef
Hallo Uwe,
ändere diesen teil.
If result <> 0 Then
    On Error Resume Next
    ActiveWorkbook.SaveAs Filename:=SpeicherName
    On Error GoTo 0
Else
    MsgBox "Pfad konnte nicht erstellt werden!", 48, "Hinweis"
End If

Gruß Sepp

Anzeige
AW: Punkte aus Datum entfernen....
16.06.2007 20:00:57
Uwe
Hallo Sepp,
jetzt läuft´s prima.
Vielen Dank dafür!
Gruß Uwe

23 Forumthreads zu ähnlichen Themen

Datum eingeben ohne die Punkte
rop

Hallo,
gibt es eine Möglichkeit das Datum ohne Punkt einzugeben und Excel wandelt das Datum korrekt um
Beispiel
Eingabe 01012009 in der Zelle wird dann 01.01.2009übernommen.
Grüße
Roland
04.03.2009 16:16:54
Thread-ID: 1056490
7 Beiträge
Anzeige
Datumseingabe in eine Zelle ohne Punkte
nsodw

Hallo,
ich habe eine Frage zu Excel 2007. Wenn man einen Datumswert in eine Zelle eingibt muss man zwischen die Zahlen Punkte setzen.
Kann man eine Zelle so formatiern, dass man nur noch die Zahlen eingeben kann; z.B. 11102011 anstatt der Datumseingabe von 11.10.2011.
Gruß
nsodw...
28.10.2011 17:04:37
Thread-ID: 1235827
9 Beiträge
Datumsformat ohne Punkt
Sebastian

Hallo zusammen,
ich benötige mal eure Unterstützung im Hinblick auf Datumsformat. Ich weiß, dass es im Forum schon etliche male angesprochen wurde, leider war nur für mich nix passendes dabei.
Ich möchte aus dem Datum der Zelle W1 in W2 ein neues Format erstellen. DasDatum soll dabei oh...
14.08.2015 17:31:47
Thread-ID: 1442397
3 Beiträge
Anzeige
Datum ohne Punkte eingeben, mit Punkten ausgeben
Marion

Hallo,
gibt es die Möglichkeit in Excel (egal welche Version) die Datumseingabe z.B. 22112000 einzugeben und 22.11.2000 ausgeben zu lassen, ähnlich wie in Access mit Eingabe und AUsgabeformat.Ich muß für die Bilanz verschiedene Aufstellungen machen und darf ganz viele Datumsfelder ausfüllen...
06.02.2003 17:02:20
Thread-ID: 215161
4 Beiträge
Datum ohne Punkte, aber wie ?
Andreas

Hallo,ich habe folgendes Problem:Wenn eine Zelle als Datum formatiert ist, wird dieses mit Punkten, also TT.MM.JJ oder TT.MM.JJJJ dargestellt.Für den Import in ein anderes Programm stören jedoch diese Punkte im Datum. Daher habe ich eine weitere Zelle angelegt und dort als benutzerdefinierts Fo...
16.05.2003 09:58:53
Thread-ID: 257377
12 Beiträge
Gültiges Datum (ohne Punkteingabe)
Jürgen

Hallo Forumsmitglieder,
nochmal das beliebte Thema Datumseingabe ohne Punkt.
Mit folgendem Code versuche ich eine Datumseingabe in einer Zelle:
Private Sub Worksheet_Change(ByVal Target As Range) Dim Bereich As Range Dim Datum As String Set Bereich = Range("C8") If Not Intersect(Tar...
01.01.1970 00:00:00
Thread-ID: 415218
18 Beiträge
Datumseingabe ohne Punkt
Florian

Hallo, Leute,
vor rund drei Wochen gab's hier einen Thread zu diesem Thema. Klappt aber alles irgendwie nicht. Da kommen die seltsamsten Ergebnisse, zum Teil auch dann, wenn derselbe Wert nacheinander in die gleiche Zelle eingetragen wird.
Wie muß der Code verändert werden, damit in die...
04.05.2004 03:50:40
Thread-ID: 423801
2 Beiträge
Datumeingabe ohne Punkte
Anna

Hallo,
wer kann mir bei folgendem PRoblem helfen?
Würde gerne in eine Zelle das Datum eingeben (TT.MM.JJ), jedoch ohne dabei die lästigen Punkte eingeben zu müssen. Diese sollen automatisch zugefügt werden.
Wie bekomme ich das hin?
Vielen Dank schon mal im Vorraus.
Anna.
16.09.2004 17:58:28
Thread-ID: 486295
6 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton

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
6
10
8
2
7
3
11
17
1
5
6
2
6
3
6
13
2
3
4
12
4
10
2