Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1792to1796
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
Inhaltsverzeichnis

unterschiedliche Formatierung korrigiere

unterschiedliche Formatierung korrigiere
19.11.2020 15:44:35
reiner
hallo Leute,
https://www.herber.de/bbs/user/141706.xlsb
in Zeile 85 ´des Makros „Kalender_Vor_Aktuell_Nach“ wird in Zelle A5 „Oktober 2019“ links-bündig eingetragen. Im weiteren Verlauf wird in Zelle A11 „Nov 19“ rechtsbündig eingetragen (im Format 01.11.2019). In Zelle A17 steht dann wieder korrekt „Dezember 2019“.
Die Monate: Jan 20, Feb 20, Apr 20, Aug 20, Sep 20, Nov 20, Jan 21, Feb 21 erscheinen dann wieder in der Schreibweise „tt.mm.JJJJ“
Nach Abarbeitung des Makros werden alle Einträge in Spalte „A“ linksbündig angeordnet.
Für eine weitere Bearbeitung sollten aber alle Einträge in Spalte „A“ ausschließlich in der Schreibweise (Beispiel) „November 2020“ erscheinen.
Ich kann mir nicht erklären aus welchem Grund sich die Schreibweise bei einigen Monatsnamen ändert.
Vielleicht findet jemand in diesem Forum eine Erklärung für die unterschiedliche Darstellungs-weise, würde mich freuen.
mfg
reiner

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: unterschiedliche Formatierung korrigiere
20.11.2020 11:14:05
fcs
Hallo Reiner,
Excel führt bei der Eingabe von Zahlen oder Datumswerten oft automatische Konversionen aus, wenn es die Eingabe umwandeln kann. Dabei wird oft auch das Zahlenformat der Zellen umgewandelt.
Das Makro fügt Monat und Jahr als Text in die Zellen ein und Excel führt dann ggf. unerwünschte Konversionen durch.
Wenn Monat und Jahr immer als Text eingetragen werden sollen hast du jetzt 2 Möglichkeiten:
A) Die Zellen in Spalte A werden als Text formatiert.
Selection.NumberFormat = "@"
ActiveCell.Value = Format(DateSerial(Jahr, Monat, 1), "MMMM YYYY")
B) das Makro fügt als 1. Zeichen ein Hochkomma ein.
ActiveCell.Value = "'" & Format(DateSerial(Jahr, Monat, 1), "MMMM YYYY")
LG
Franz
Anzeige
AW: unterschiedliche Formatierung korrigiere
20.11.2020 12:05:31
reiner
hallo franz,
herzlichen Dank, das ist die Lösung
eigentlich ganz einfach, man muss nur darauf kommen
reiner

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige