Hallo
In einer Excelzelle möchte ich zwei Ergebnisse anzeigen. =Summe(A:A)&" "Summe(B:B)
Nun soll die Summe (Text)von Spalte A blau sein und die von Summe (Text) B Rot. Leider bekomme ich dies nicht hin.
Gruss
Andreas
das könnte daran liegen, dass man Formeln nicht umfärben kann…
Excel ist nun mal eine Tabellenkalkulation und kein Tool zum Designen von Ergebnissen…
Versuch mit 2 Zellen zu arbeiten, dann bekommst Du auch zweifarbige Ergebnisse…
Grüße
Munich
Hallo Munich
Besten Dank für die Antwort!
das habe ich mir fast gedacht. Kennst du eine Möglichkeit wie ich die Zelle teilen kann (wie z.B. zellen verbinden)? Da wenn ich eine Spalte einfüge mein Format nicht mehr passt.
ich fürchte, dass es auch dafür keine Möglichkeit gibt.
Die einzige Möglichkeit, die ich sehe ist eine weitere Spalte einzufügen, die Spaltenbreite zu halbieren und alle anderen Zellen wieder zu verbinden…
Falls es zu viele wären um das Händisch zu tun evtl per Makro…
Grüße
Munich
In einer Excelzelle möchte ich zwei Ergebnisse anzeigen.
=Summe(A:A)&" "Summe(B:B)
Nun soll die Summe (Text)von Spalte A blau sein und die von
Summe (Text) B Rot. Leider bekomme ich dies nicht hin.
Hallo Andreas,
Alt+F11, Doppelklick auf den Blattnamen, Code reinkopieren, ggfs. Zielzelle C1 abändern, Editor schließen.
Code berechnet automatisch die Summen und färbt.
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range(„A:B“)) Is Nothing Then Exit Sub
Range(„C1“).Value = Application.Sum(Range(„A:A“)) & " " & Application.Sum(Range(„B:B“))
Range(„C1“).Characters(Start:=1, Length:=InStr(Range(„C1“), " ") - 1).Font.ColorIndex = 5
Range(„C1“).Characters(Start:=InStr(Range(„C1“), " ") + 1, Length:=99).Font.ColorIndex = 3
End Sub
Gruß
Reinhard
Besten Dank
Gruss
Andreas