Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 00:15:51
Passwort im Herbersforum ändern
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1228to1232
1228to1232
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelle farbig, wenn Kriterium erfüllt

Forumthread: Zelle farbig, wenn Kriterium erfüllt

Zelle farbig, wenn Kriterium erfüllt
Claudia
Hallo zusammen,
in eine Datei werden fortlaufend DAten geschrieben. Im Reiter Historie ist hierbei die Spalte C entscheidend. Bei jedem Lauf wird die Spalte C um eine weitere Zeile ergänzt.
NUn würde ich gerne abhängig von der letztengefüllten Zeile der Spalte C zwei Zellen in Spalte C farbig markieren:
- die Zelle, deren Zahl kleiner als die letztgefüllte Zelle = grün
- die Zelle, deren Zahl größer als die letztgefüllte Zelle = rot
Es soll von der letzgefüllten Zelle nach oben geprüft werden. Liegt das Kriterium vor, dann farbig markieren und Makro beenden. Beim zweiten Kriterium das gleiche.
Vor dem Prüfen muss der Bereich C3 bis Ende wieder neutral farbig hinterlegt werden, ansonsten werden immer mehr Zellen rot oder grün.
Wer kann mir helfen?
Liebe Grüße
Claudia
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Zelle farbig, wenn Kriterium erfüllt
11.09.2011 17:17:46
Hajo_Zi
Hallo C´laudia,
benutze die bedingte Formatierung.
Letzter Wert einer Spalte (Array)
das funktioniert mit nachfolgender Array-Formel:
=INDEX(Tabelle1!A1:A1000;MAX(ZEILE(Tabelle1!A1:A1000)*(Tabelle1!A1:A1000"")))
ARRAY-Formel {=geschweifte Klammern} nicht eingeben;
Abschluss der Formel mit gleichzeitig Strg / Shift / Enter; - das erzeugt sie.
Von WF
Oder falls alle Zelle gefüllt
=INDEX(A8:A41;ANZAHL(A8:A41)) - von FP
Einer Zeile
=INDEX(Tabelle1!1:1;MAX(SPALTE(Tabelle1!1:1)*(Tabelle1!1:1"")))

Anzeige
AW: Zelle farbig, wenn Kriterium erfüllt
11.09.2011 17:30:15
Claudia
Hallo Hajo,
mir wäre eine Lösung per VBA lieber, weil ich das ganze dann in den bisherigen Code einbauen kann. Bin auch nicht sonderlich Freund der bedingten Formatierung.
Daher noch einmal offen, aber danke für Deine Hilfe!
Claudia
AW: Zelle farbig, wenn Kriterium erfüllt
11.09.2011 17:39:49
Josef

Hallo Claudia,

' **********************************************************************
' Modul: Tabelle2  Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
  Dim lngRow As Long, intSmall As Integer, intLarge As Integer
  
  If Target(1, 1).Column = 3 And Target(1, 1).Row > 3 Then
    If Target(1, 1) <> "" Then
      Range("C3:C" & Target(1, 1).Row).Interior.ColorIndex = xlNone
      For lngRow = Target(1, 1).Row - 1 To 3 Step -1
        If Cells(lngRow, 3) > Target(1, 1) And intLarge = 0 Then
          Cells(lngRow, 3).Interior.ColorIndex = 3
          intLarge = 1
        ElseIf Cells(lngRow, 3) < Target(1, 1) And intSmall = 0 Then
          Cells(lngRow, 3).Interior.ColorIndex = 4
          intSmall = 1
        End If
        If intLarge + intSmall = 2 Then Exit For
      Next
    End If
  End If
End Sub



« Gruß Sepp »

Anzeige
Prima, klappt bestens. Danke schön!
11.09.2011 17:57:43
Claudia
;

Forumthreads zu verwandten Themen

Zellen farbig markieren
chrisss

Hallo,
ist es eigentlich bei Excel 2007 nun möglich, dass bei einer Wenn-Funktion eine Zelle farbig ausgefüllt wird. Beispiel: Wenn in Tabelle 1 in A1 ein U steht, soll die Zelle A1 in Tabelle 2 rot ausgefüllt werden.
Ich hatte die Frage schonmal gepostet und die Antwort erhalten, dass...
21.08.2008 13:20:00
Thread-ID: 1003455
8 Beiträge
Text in Zelle suchen und markieren
Heiko

Hi, Excelianer,
kenne mich mit der Suche nach Strings nicht gut aus...
Ich habe mit Excel einen Kalender (händisch) erstellt mit dem Datum jeweils eines Monats in Spalte A (Text in Zelle: "01.10.2008", durch Formatierung angezeigt: "Mittwoch, 01. Oktober 2008"). Die Tabellenblätter heiß...
30.10.2008 08:21:00
Thread-ID: 1020459
5 Beiträge
Anzeige
Formel wenn dann zellvergleich Text
Karel

Hallo Forum,
wie kann ich Zellwert C mit Zellwert E vergleichen ausgaben in Zelle A
wenn C und D Leer dsnn A auch Leer
Tabelle1

 ABCDE2Ausgabe Textwert Textwert3Offen Bezahlt Offen4Bezahlt Bezahlt Bezahlt5Offen Bezahlt  6Of...
28.11.2008 20:04:52
Thread-ID: 1028782
5 Beiträge
Anzeige
Zahl einer Zelle in den Wenn-Text
die_nathan

Schönen Nachmittag,
Ist es möglich innerhalb eines Textes die Zahl einer Zelle einzufügen:
falsches Beispiel:
=wenn(A1="Ja!";"Die Gebühr von"A2"Euro ist noch zu zahlen!;"Die Gebühr wurde bereitsbezahlt."
Liebe Grüße
11.12.2008 15:35:07
Thread-ID: 1032078
6 Beiträge
Anzeige
trotz INDIREKT verknüpfte zellen farbig markieren
merlin

Hallo,
gibt es eine Möglichkeit trotz der Verwendung von INDIREKT die verknüpften Zellen markieren zu lassen?
https://www.herber.de/bbs/user/60118.xls
Viele Grüße, vielen Dank.
09.03.2009 11:14:37
Thread-ID: 1058088
3 Beiträge
Anzeige
Wenn o dann Text in A1 rot
Heinz A. Wankmüller
Hallo Jörg,dafür verwendest am besten die Bedingte Formatierung.
Setze den Cursor in die Zelle A1 und rufe Format/Bedingte Formatierung auf. Wähle anstatt Zellwert ist den Eintrag Formel ist und gib die Formel =$A$12="o" ein. Danach definierst du noch das gewünschte Format mit roter, vielleicht...
16.04.2002 17:25:23
Thread-ID: 113808
2 Beiträge
Wenn in D3 = X, Dann Text aus C3 -VBA
Wolfgang

Hallo,
über einen UF -mit entspr. OptionButton- wird in Spalte D ein X gesetzt. Wie kann ich erreichen, dass bei entsprechendem X der Text aus Spalte C in Zelle A 48 übernommen wird?
D3 = X, also C3 Text in A48 + ggfs. D5 = X, also Text C5 usw. - Der Bereich erstreckt sich dabei von D3...
07.03.2010 14:43:48
Thread-ID: 1144123
9 Beiträge
Bestimmten Inhalt in Zellen markieren
Andre

Hallo!!
Ich brauche ein Makro oder eine Formel, die mir alle Zellen mit dem Inhalt BF 01 grau hinterlegt.
In den Zellen steht allerdings vor dem BF 01 noch ein Name, der allerdings immer anders ist.
Gruß Andre
18.07.2010 21:48:50
Thread-ID: 1167659
4 Beiträge
Wenn zelle AW3, dann Farbe und Text.
Friedrich

Guten Abend liebe Excel-Spezis,
ich brauche in VBA folgende Lösung:
In der Zelle AW3 erscheinen über eine Formel drei Aussagen SH, H und E
Bei SH sollte die Zelle A7 Rot werden und eine Text "Sofortiger Handlungsbedarf" in Fett erscheinen.
Danke für eure Hilfe
Gruß Friedrich...
30.08.2010 18:23:16
Thread-ID: 1174841
2 Beiträge
Wenn Farbe dann ...
Denis

Hi Leute
Brauche Euren Experten Rat. Wie geht das:
Wenn D1 gelb ausgefuellt, dann fulle A1 auch gelb aus.
Noch besser waere:
Wenn D1 gelb ausgefuellt, dann fuelle A1 auch gelb aus UND kopiere die ganze Zeile in das Tab "Summary" (beginnend in A2).
Danke Euch sehr sehr! :)
16.11.2010 18:17:44
Thread-ID: 1187188
10 Beiträge
Text splitten wenn Zelle mehr als 265 Zeichen
bernie

Hallo Profis,
in einer Zelle habe ich mehr Text (mehr als 265 Zeichen) als ich über die Datenbankfunktion suchen kann.
Kann mir jemand einen Tipp geben, wie nach dem Einfügen eines langen Textes dieser so gesplittet wird, daß z.B. dann in B1 Text bis 265 Zeichen, in C1 der weitere Tex...
17.11.2010 13:03:03
Thread-ID: 1187321
10 Beiträge
textbox farbe wenn wert in verzeichnis vorhanden
Achim

Hallo ecxel freunde
wer kann mal schauen und korrigieren
If Dir("I:\AM33\PK22 Weiterbildung\01_Weiterbildung Allgemein und nach BKrFQG\01_Datenbanken und Teilnahmebescheinigung\BKrFQG\Kopie Führerscheine\" & UserForm1.Frame1.TextBox1) "" Then
TextBox84.BackColor = RGB(0, 255, 0...
14.02.2011 14:56:11
Thread-ID: 1200719
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige