Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
25.04.2024 12:55:42
Funktionsparameter auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1648to1652
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
1648to1652
1648to1652
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Auswahl Tabellenblattname aktuelles Datum

Auswahl Tabellenblattname aktuelles Datum
09.10.2018 11:07:20
Tommy
Hallo zusammen,
ich bin auf der Suche nach einem Makro, welches ein neues Tabellenblatt einfügt und diesem als Name das aktuelle Datum zuweist. Danach soll dieses Tabellenblatt ausgewählt und komplett als Text formatiert werden.
Vielen Dank für eure Hilfe im Voraus.
VG, Tommy

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Makrorekorder anwerfen! (owT)
09.10.2018 11:09:43
EtoPHG

AW: Makrorekorder anwerfen! (owT)
09.10.2018 11:14:28
Tommy
Das habe ich schon versucht und bringt mich nicht weiter
AW: mit Pruefung
09.10.2018 11:19:54
hary
Moin 
Sub Blatt_einfuegen()
If IsError(Evaluate(Date & "!A1")) Then '--pruefen ob Blatt schon vorhanden
Worksheets.Add after:=Worksheets(Worksheets.Count)
ActiveSheet.Name = Date
Cells.NumberFormat = "@"
End If
End Sub

gruss hary
AW: Auswahl Tabellenblattname aktuelles Datum
09.10.2018 11:14:32
ChrisL
Hi
Makrorekorder war auch mein erster Gedanke.
Sub t()
Dim WS As Worksheet
For Each WS In ThisWorkbook.Worksheets
If WS.Name = Format(Date, "DD.MM.YYYY") Then
MsgBox "bereits vorhanden"
Exit Sub
End If
Next WS
Sheets.Add Before:=Sheets(1)
ActiveSheet.Name = Format(Date, "DD.MM.YYYY")
Cells.NumberFormat = "@"
End Sub
cu
Chris
Anzeige
AW: Auswahl Tabellenblattname aktuelles Datum
09.10.2018 11:19:26
EtoPHG
Hallo Tommy,
Sub NeuesHeuteBlatt()
Dim ws As Worksheet, wsName As String
wsName = Format(Date, "DD.MM.YYYY")
On Error Resume Next
Set ws = Worksheets(wsName)
If Err.Number  0 Then
Set ws = Worksheets.add(After:=ActiveSheet)
ws.Name = Format(Date, "DD.MM.YYYY")
ws.Cells.NumberFormat = "@"
Else
MsgBox "Blatt " & wsName & " existiert bereits!", vbExclamation
End If
On Error GoTo 0
End Sub
Gruess Hansueli
AW: Auswahl Tabellenblattname aktuelles Datum
10.10.2018 09:51:27
Tommy
Hat geklappt! Vielen Dank für eure Hilfe :)

132 Forumthreads zu ähnlichen Themen

Zeile anlegen, dann Datum von heute
heute

Hallo Leute,
ich hab (mal wieder) ein kleines Problem und hoffe auf eure Unterstützung.
Ich habe eine Exceltabelle, in der noch fast nichts drin steht.
Jetzt würde ich es gerne so haben, dass, wenn ich eine neue Zeile anlege (z.B. mit Kundendaten), soll er mir in einer bestimmten Ze...
23.09.2008 16:37:51
Thread-ID: 1011817
12 Beiträge
Anzeige
VBA heutiges Datum finden und Inhalt der Zelle prü
NeptunesChild

Hallo Leutz,
ich möchte in einer Zeiterfassung auf einem Monatsblatt das heutige Datum finden, dann in einer anderen Spalte (5 weiter links) eine Uhrzeit eintragen. Zuvor soll aber die Kontrolle erfolgen, ob in der Zelle bereits etwas steht und ob dies kleiner ist, als die aktuelle Zeit. We...
06.11.2008 15:38:08
Thread-ID: 1022323
3 Beiträge
aktuelles Datum in Input Box
Rolf

Hallo Excelianer,
Mit einer InputBox kann man ja einen bestimmten String vorgeben, der dann im Eingabefeld angezeigt wird. So weit so klar.
Mein Vorgabestring beinhaltet das aktuelle Datum. Das heisst, es sollte so sein. Leider habe ich nicht den blassen Dunst einer schwachen Ahnung, wi...
16.03.2009 13:03:41
Thread-ID: 1060692
4 Beiträge
Anzeige
Aktuelles Datum in Formel (mit Inputbox)
StefanS

Hallo zusammen,
habe folgendes Problem:
Mittels der Formel =ZÄHLENWENN(Daten!E:E;" Meine nächste Idee wäre, das Datum mittels Inpubox abzufragen (Eingabe erfolgt durch User).
Sub Auswertung() Dim datum As String datum = InputBox("Datum") Range("B7").Select ActiveCell.FormulaR1C1 =...
21.04.2009 12:49:15
Thread-ID: 1070034
4 Beiträge
aktuelles datum im Calendar in Userform
lisa

Hallo
Leider finde ich in der Recherche nichts. Deshalb heute noch einmal an Euch die Frage:
Wie kann ich in einmem calendar in meiner UserForm ein immer aktuelles Datum einstellen heute()?
Ich suche schon eine Weile in der Recherche und Google, bislang aber ohne Erfolg.
Hat jem...
01.10.2009 12:18:48
Thread-ID: 1106645
4 Beiträge
aktuelles Datum eintragen
Warn

Hallo zusammen,
leider konnte ich im Forum nichts zu meiner Frage finden, daher mache ich ein neues Thema auf.
Ich möchte automatisiert ein aktuelles Datum in eine definierte Zelle eingeben, dieses Datum soll sich danach aber nicht mehr verändern daher fallen Funktionen wie "=heute()" o...
31.05.2010 15:11:13
Thread-ID: 1159627
12 Beiträge
per doppelklick Bereich einfügen
anja

hallo, ich würde gerne per Doppelklick einen Bereich einfügen.
Die Vorlage, die Kopiert werden soll, soll fix in den Zellen x2 bis AA2 eingeben werden.
Dann würde ich gerne in z.B. Zeile 34 + 36 + 37 ....Spalte x klicken, und dann soll der Inhalt von x2 bis AA2 in
X34 bis AA34 einge...
28.07.2010 14:39:46
Thread-ID: 1169318
6 Beiträge
Makro: Datum von heute
heute

Hallo,
kann mir jemand mitteilen, wie bei folgendem Makro in dem Betreff (subject) automatisch das heutige Datum eingetragen wird, ohne dies manuell über eine Input-Box tun zu müssen?
Sub Mail_AM_SettlementsRentengeschaefte() Dim olapp As Object Set olapp = CreateObject("Outlook.Applica...
29.11.2010 15:50:16
Thread-ID: 1189263
4 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
11
15
2
3
2
3
3
11
5
3
9
2
14
4
3
4
4
2
4
2
5
3
3
2
16