Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Formatierg von Zelle mit Datum mit zusätzl. Text
#1
Hallo zusammen,

per Makro wird aus einem Tabellenblatt 1 eine Zelle mit einem Datum in das Tabellenblatt 2 in eine Zeile eingefügt.
in dem Tabellenblatt 2 soll vor dem Datum noch ein Text "ab" und ein Leerzeichen eingefügt werden.
In der Zeile des 2. Tabellenblattes setze ich folgendes ein:  ="ab "&(+Bezugseile aus dem 1. Blatt)&".
Das Ergebnis ist leider nicht das Datum in Format, sondern als Text, obwohl ich in beiden Tabellen die gleiche Formatierung "Datum / 14.03.2012" durchgeführt habe.
Wenn ich aber den Bezug ohne die Textergänzung "ab" eingebe, funktioniert die Formatierung.

Wo habe ich hier den Fehler? Kennt jemand die Lösung??

Vielen Dank im Voraus!

Beste Grüße
Antworten Top
#2
Hola, 
Zahl und Text ergibt nun mal Text. 
Gruß,
steve1da
Antworten Top
#3
Hallo steve1da,
wenn das so einfach ist, alles klar  Idea
Vielen Dank!

Beste Grüße
Willi53
Antworten Top
#4
Oder meinst du, dass dir mit der Formel das Datum als einfache Zahl dargestellt wird, also zb 44361?
Antworten Top
#5
Hallo,
versuche es doch mal ganz einfach so, könnte schon mal ohne Makro helfen.

="ab "&TEXT(Tabelle1!B6;"TT.MM.JJJJ")

(angenommene Bezugszelle = B6)

und als Makro (in vereinfachter Form)

Sub DruckDatum()

  Sheets("Tabelle2").Range("E7") = "ab " & Sheets("Tabelle1").Range("b6")

 End Sub


Gruß Stephan
Antworten Top
#6
Hallöchen,

alternativ kannst Du auch mit der Zellformatierung "ab " davor setzen.
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste