Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

höchste zahl in einer spalte farbig darstellen





Frage

Hallo Exelfreunde Ich habe in einer spalte mehrere zahlen davon möchte ich jetzt die größte oder die kleinste zahl in einerSchrift farbe (rot)dargestellt haben Ich habe es schon mit kgrösste versucht aber es klappt nicht weiß von euch jemand rat oder eine formel???? geht es mit einer bedingten formatierung?? mit vba kenne ich mich leider nicht aus!!!! Danke im voraus Günter

Antwort 1 von pelle

Hallo Guenni 3,

es geht problemlos mit einer bedingten Formatierung!

Zellwert ist - gleich - =MAX(B6:B8)

und Formate wie gewollt einstellen!

Das gleiche in grün mit Formatierung hinzufügen für MIN... OK??

gruss
pelle

Ps.: Tabellenbereiche einfach anpassen!

Antwort 2 von guenni3

Hallo Pelle
Danke für deine schnelle antwort
es funktioniert ungefähr es zeigt mir bloß die höchsten 3 werte an hab ich etwas falsch gemacht oder muß du deine formel verfeinern????

Antwort 3 von pelle

Hallo guenni 3,

beides ist möglich!!

Ich was anpassen oder Du was falsch gemacht! :-))

Die Formulierung " es zeigt mir bloß die höchsten 3 Werte an"
lässt darauf schliessen, dass Du nicht unbedingt den MAX-Wert suchst, oder MAX-Wert halt 3 mal vorkommt!

Schick Doch einfach mal eine Beispieltabelle!

gruss
pelle

Antwort 4 von Guenni 3

Hallo Pelle
sorry für die 1. antwort
ich habe es noch mal probiert und es funktioniert

Herzlichen dank weiß du vielleicht noch eine andere lösung (man kann daraus ja nur lernen) nochmals DANKE GÜNTER

Antwort 5 von pelle

Hallo Guenni3,

kein Problem!!!

Wenn Deine Addy stimmt, hast Du eine Kleine Beipieldatei!

Verstehe nicht so ganz Deine Frage in Antwort 4!

Die bedingte Formatierung lässt 3 Variationen zu!

Mehr sind nur über VBA möglich, mein Schwachpunkt ( hoffentlich sieht es Sicci nicht :-)) )!

Es gibt zu dem Thema einige Einträge im SN, einfach mal blättern!!!

gruss
pelle

Ps.: Bei Fragen ruhig melden!
Ps.: Bei VBA muss ich leider passen!!

Antwort 6 von coros

Moin Guenni,

ich hätte da noch eine VBA Lösung anzubieten. Zum Einfügen des Makros öffne Extras => Makros => Visual Basic Editor, gehe dann in der Menüleiste in der Visual Basic Umgebung auf Einfügen => Modul und füge das Makro dort ein.

Sub max_und_min()
Dim maxRow As Range, maxVal As Double
maxVal = [max([b]a:a)] 'Zu durchsuchende Spalte eingeben.
minVal = [min([b]a:a)] 'Zu durchsuchende Spalte eingeben.
With Columns(1) 'Diese Zahl gibt die Spalte an. Bei Spalte B eine 2 eintragen, bei Spalte C eine 3 usw.
.Interior.ColorIndex = xlNone
Set maxRow = .Find(maxVal, lookat:=xlWhole, LookIn:=xlFormulas)
Set minRow = .Find(minVal, lookat:=xlWhole, LookIn:=xlFormulas)
End With
maxRow.Interior.ColorIndex = 3
minRow.Interior.ColorIndex = 4
End Sub

In diesem Makro wird die Spalte A auf den Max- und Minwert durchsucht. Bei dem Maxwert wird die Hintergrundfarbe in rot geändert und beim Minwert ändert sich die Hintergrundfarbe in grün. Wenn das Makro eine andere Spalte als A durchsuchen soll, mußt Du die fettgedruckten Einträge in dem Makro abändern. Beispiel für Spalte B:

maxVal = [max(b:b)]
minVal = [min(b:b)]
With Columns(2)
Ich hoffe, ich konnte Dir weiterhelfen,
coros
Und nicht vergessen, hier noch einmal zu posten, ob Dich die Hilfe weitergebracht oder sogar Dein Problem gelöst hat.

Antwort 7 von want2cu

@coros:
manchmal sind Formeln und VBA eine reine Geschmackssache. In diesem Fall halte ich aber Pelles Lösung für die eindeutig bessere ;-)
Sie ist
- viel einfacher umzusetzen und dem jeweiligen Bereich anzupassen
- zeigt immer den jeweils größten und kleinsten Wert an
- muss nicht aktualisiert oder aufgerufen werden

@Pelle: freu mich, dich wieder häufiger im SN bei den Excelianern zu finden ;-)

Herzliche Grüsse an euch alle
CU
want2cu

Antwort 8 von coros

Hallo Klaus,

sicher ist Pelles Lösung die einfachere. Ich habe hier auch nur ein Makro gepostet, da Guenni in seinem letzten Posting angeregt hatte, eventuelle andere Lösungen zu präsentieren. Und das ist halt eine andere Lösung. ;-))

Übrigens Klaus, nochmal danke für die Mail mit den Exceltips. Habe zwar noch nicht alles durchgelesen, das was ich aber bis jetzt angeschaut habe war recht gut.


Also dann bis zum Nächsten mal,
coros



Antwort 9 von want2cu

@coros,
hast ja Recht mit einer "alternativen" Lösung.
Muss mich da mal an die "eigene Excel-nase" fassen ;-)))

Und vielen Dank für das freundliche Feedback zu den Excel-Tipps. Wenn du das Ergänzungen hast oder Fehler findest, bin ich für ein Feedback immer dankbar. Von Zeit zu Zeit schicke ich dann die aktualisierte Fassung an "interessierte Excelianer" .

CU
want2cu

Antwort 10 von Günni 3

Hallo
Herzlichen Dank für eure Vorschläge (besonders Pelle hat mein Problem gelöst)nochmals Danke

Antwort 11 von pelle

@all

"Excelianern" wie want2cu immer sagt/schreibt; streiten nicht! :-))))

"Excelianern" suchen Lösungen, wie alle hier im SN!!!!!

Viele Wege führen nach Rom!
Hauptsache einer führt nach Rom; sprich Lösung!

Günni 3 hat seinen Weg, also ist es OK!!

@coros
wenn ich von VBA Ahnung hätte, hätte ich Deinen Lösungsvorschlag auch unterbreitet, zumal es aus Günni 3´s Kommentaren nicht direkt hervorging!

@want2cu
ich habe nur einen anderen Vorschlag als Coros gemacht!
Gut er passte, ob VBA oder Formel ist s.h.i.t egal (Geschmacksache/Wissenstand.

Klar habe ich an Deine aktualisierte Fassung Interesse!!!

Übrigens, Du hast Post!

@Günni 3
dank für Deine Rückmeldung, die leider nicht so üblich ist!!!!

@all

gruss
pelle


Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: