AW: Unterschiedliche Schriftgrößen in einer Zelle
04.02.2009 12:15:18
Uwe
Hi Gerd,
erst mal nur ein Denkanstoß, damit ich sehe, dass wir uns nicht falsch verstehen:
ActiveCell.Characters(Start:=1, Length:=InStr(1, ActiveCell.Value, Chr(10))).Font.Size = 20
Kannst Du damit vielleicht schon was anfangen. Also zuerste alle Zellen so formatieren wie der _
zweite Teil aussehen soll, und dann diese Zeile "drüber laufen lassen". Müsste nur noch eine Schleife drumrum gebaut werden. Evtl. muss Du Chr(10) noch anpassen, falls Du da einen anderen Umbruch hast. (Mit der Formel:
=CODE(TEIL(A1;4;1))
, wobei 4 die Stelle des Umbruchs ist, bekommst Du den richtigen Chr().
Hilft das Dir schon weiter?
Gruß
Uwe
(:o)