TEILERFOLG
27.05.2003 16:03:22
Franz W.
Hallo Martin,hast recht, war der Rekorder, hab mir das unterschiedliche Formatieren innerhalb einer Zelle aufgezeichnet.
Deine Formel stimmt. Wenn ich sie allerdings auf meine gesamte Formel erweitere, kommt mal wieder 1004:
ActiveCell.Formula = "=(RANG(AB21;$B$21:$AF$21)) & "" ("" & AH21 & "")"""
Hab's jetzt geändert auf :
ActiveCell.FormulaLocal = "=(RANG(AB21;$B$21:$AF$21)) & "" ("" & AH21 & "")"""
... und damit geht's (wobei ich gestehe, dass ich nicht weiß warum!). Gibt's dafür auch noch eine kurze Erklärung?
ABER: der zweite Teil, des ganzen Codes, nämlich die unterschiedlich Farbformatierung haut nicht:
es kommt raus "3(13)" und das ist richtig. Aber die eins sollte rot und fett sein, der Rest blau und dünn. Es ist aber alles rot.
Wenn ich die beiden Werte in einzelne Zellen schreibe und die beiden dann zusammenfasse:
ActiveCell.Formula = [AH20] & " ( " & [AH21] & ")"
..., dann klappts, dann färbt er wie gewünscht
Kannst Du mir dabei bitte auch noch helfen.
Danke und Gruß
Franz