Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1164to1168
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
Formatierung 01-A-02
UweD
Hallo
Ich übernehme eine Tabelle aus Warenwirtschaftssystem in Excel.
Hierin sind Lagerorte angegeben. Diese verarbeite ich in einem Word Sereienbrief.
Zur besseren Lesbarkeit soll der Text folgendermaßen aufbereitet werden.
Zellwert: 01A02 ist immer 5- Stellig
soll : 01-A-02
Wie kann ich das NUR durch Zellformatierung erreichen, Ohne Zwischenzelle und Formel etc. (das kann ich)
Besten Dank und Gruß aus Siegen

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

Betreff
Benutzer
Anzeige
AW: Formatierung 01-A-02
30.06.2010 14:04:00
Thomas
Hallo,
ich wüsste nur einen eventuell doch umständlichen Weg über Hilfsspalten.
=LINKS(A1;2) - Formel in A2
=TEIL(A1;3) - in A3
=RECHTS(A1;2) - in A4
Dann in A5 =A2&"-"&A3&"-"&A4
Geht sicherlich auch zusammenzufassen, aber es funktioniert.
MFG, Tom
AW: Formatierung 01-A-02
30.06.2010 15:29:24
UweD
Hallo
das ist mir bekannt. Ich brauche aber eine Möglichkeit ohne Zusatzspalten.
Danke für dein Interesse an meiner Frage
AW: Formatierung 01-A-02
30.06.2010 14:16:43
Peter
Hallo Siegen...
probiere es einmal so
Function Lager_NummerFormatieren(Arg1 As String)
Lager_NummerFormatieren = Format(Arg1, "@@!-@!-@@!")
End Function
Gruß
Peter
Anzeige
AW: Formatierung 01-A-02
30.06.2010 15:37:26
UweD
Hallo
dann muß ich ja trotzdem mit Zwischenspalte arbeiten.
Aber guter Tip.
Ich mach es jetzt per Makro und nutze dabei deine Funktion
Danke und Gruß
Dann sind die Trennstriche aber mit drin,...
30.06.2010 19:10:17
Luc:-?
…Uwe…!
Beim normalen Formatieren bedeutet @ stets den ganzen Zelltext; @@ verdoppelt ihn also! _ Aber nichtsdestotrotz ist das Problem mit VBA lösbar, man muss nur den Zelltext auch in die Formatierung der Zelle übernehmen, natürlich mit den Trennstrichen, dann wird das so wie gewünscht…

For Each zelle in zellbereich
zelle.NumberFormat = "0;-0;0;" & Left(zelle, 2) & "-" & Mid(zelle, 3, 1) & _
"-" & Right(zelle, 2)
Next zelle
Das findest du auch im Herber-Archiv, denn ich hatte eine solche Lösung vor Monaten schon einmal (g)e[r]funden. Mit den vorangestellten Nullen würde das Format auch für Text als Ergebnis einer Fml fktn. Hier könnten sie auch entfallen.
Gruß Luc :-?
Anzeige
AW: Dann sind die Trennstriche aber mit drin,...
01.07.2010 09:53:46
UweD
Hallo
ganz schön tricky.
Klappt. Aber gefährlich.
Gruß UweD

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige