Registriert seit: 07.04.2016
Version(en): XP Pro 2002
Hallo,
bin gerade dabei, einen Code zu schreiben, der mir einen Bereich, in ein anderes Workbook kopiert.
Dabei wird das Datum aus dem Quell-Worksheet ausgelesen: Hat z.B. das Format 01.10.2016
dateWS = Cells(4, 12).Value
Mit diesem Datum soll im Ziel-Workbook ein Sheet benannt werden.
.Name = dateWS
wenn ich es so mache, dann heißt das Sheet im Ziel-Workbook natürlich: 01.10.2016
Ich hätte es aber gern im Format: Okt.16
d.h. es soll nur die Variable umformatiert werden, ohne die Anzeige auf dem Quell-Worksheet zu verändern?
Wie geht's?
Registriert seit: 28.05.2014
Version(en): 2013 / 2016
Moin, das sollte so hinkommen:
Code:
Format(dateWS, "MMM.YY")
Beste Grüße
Günther
Excel-ist-sexy.de …schau doch mal rein!
Der Sicherheit meiner Daten wegen lade ich keine *.xlsm bzw. *.xlsb- Files mehr herunter! -> So geht's ohne!
Registriert seit: 07.04.2016
Version(en): XP Pro 2002
16.10.2017, 13:24
(Dieser Beitrag wurde zuletzt bearbeitet: 16.10.2017, 13:24 von lapunta.)
Danke, für die schnelle Antwort.
... aber wie bau ich's ein?
wenn ich es so einsetze
dateWS = Cells(4, 12).Value
dateWS = Format(dateWS, "MMM.YY")
heißt das sheet wieder:
01.10.2015
und wenn sie in meine With-Schleife einsetze
With ActiveSheet
dateWS = .Format(dateWS, "MMM.YY")
.Name = dateWS
End With
ebenfalls
und ohne Punkt, also so:
With ActiveSheet
dateWS = Format(dateWS, "MMM.YY")
.Name = dateWS
End With
heißt das Worksheet: 15.10.2017, obwohl heute schon der 16. ist
Registriert seit: 10.04.2014
Version(en): Office 2007, 2016, Win 10 64 bit
Hi,
Günter hats doch geschrieben:
.Name = Format(dateWS, "MMM.YY")
Mit freundlichen Grüßen :)
Michael
Registriert seit: 28.05.2014
Version(en): 2013 / 2016
16.10.2017, 13:30
(Dieser Beitrag wurde zuletzt bearbeitet: 16.10.2017, 13:31 von GMG-CC.)
Moin,
ich gehe stark davon aus, dass in L4 kein echtes Datum sondern ein Text steht, der wie ein Datum aussieht.
Was ergibt denn
Code:
MsgBox Vartype(cells(4,12))
(ich hoffe, der Code ist korrekt).
Beste Grüße
Günther
Excel-ist-sexy.de …schau doch mal rein!
Der Sicherheit meiner Daten wegen lade ich keine *.xlsm bzw. *.xlsb- Files mehr herunter! -> So geht's ohne!
Registriert seit: 07.04.2016
Version(en): XP Pro 2002
Oh, sorry - jetzt funktionierts
Danke