Zellen mit Inhalt eines definierten Bereichs farblich füllen

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallöchen,

also, mit dem Code übergehst Du nur in den zwei Zeilen die Fehler. Siehe mein Hinweis, die Fehlerbehandlung nach Gebrauch wieder zurückzusetzen.

***********************

Dann holen wir mal weiter aus - erst mal zu meinem Vorschlag.

--> Erste Frage wäre, was in dem Bereich steht.
Stehen dort nur Daten, brauchst Du nur die ...constants. Dann könnte man statt mit einer Fehlerunterdrückung mit einer Zählfunktion programmieren.
Stehen dort nur Formeln, brauchst Du nur die ...Formulas. Dann könnte man statt mit einer Fehlerunterdrückung mit einer Zählfunktion programmieren.
Das könnte so aussehen
If WorksheetFunction.CountA(Range("F5:F300")) > 0 Then
...
Kann dort beides stehen, dann reicht das nicht, weil COUNTA da nicht unterscheidet.
Eine Fehlerunterdrückung oder Prüfung bräuchtest Du auch nicht, wenn Du garantieren kannst, dass Daten und/oder Formeln in dem Bereich stehen.

--> Zweite Frage wäre, warum Du für die zwei Zeilen kein OnError nehmen kannst.
Nur mal ein weiterer Hinweis. Zu OnError haben einige die Meinung, dass das einen Programmierer kennzeichnet, der es nicht besser kann. Nun kann man gerne darüber diskutieren, ob eine Alternative statt gezieltem und bewusstem Einsatz von OnError unbedingt besser ist. Könnte für einen Programmierer aber durchaus lukrativ sein, alles Mögliche mit entsprechenden Codes abzufangen. Eventuell effektive Methoden nicht einzusetzen hat sicher auch was ...

**************************

So, und jetzt noch eine Alternative - in dem Fall wäre es eine Schleife. Ist bei Deinen 300 Zellen sicher auch kein zeitliches Problem :-)

For iCnt = 5 to 300
If Cells(iCnt,6).Value > "" Then
'Farbe setzen
End If
Next

Wie gesagt, ggf. vorher (vor der Schleife) die Färbung zurücksetzen.

@schauan:
Ich habe Deinen ersten Lösungsansatz mit "On Error" getestet. Es fühlt sich zwar irgendwie gemogelt an aber es läuft stabil und löst mein Problem zu meiner vollsten Zufriedenheit.
Dankeschön!

@onur:
das Du so pikiert bist über meine Frage bist kann ich nicht nachvollziehen. Über Deine Aussage, ich könne kein VBA, kann man sich streiten. In meinem Erfahrungslevel habe ich deshalb ja auch "VBA bescheiden" angegeben . Ich nutze Excel häufig im Beruf und bin ein Freund davon mir die Arbeit mit kleinen Hilfsmitteln zu erleichtern. So bin ich für Excel auf VBA gestoßen und habe mich dort eingelesen. Meine VBA-Kenntnisse habe ich mir also selbst angeeignet und nie in Schule oder Studium gelernt, wie vermutlich sehr viele Forumsmitglieder hier. 98% all meiner Ideen und Wünsche was die Excel-Hilfsmittel angeht konnte ich durch die Lösungen der Probleme vieler anderer Forumsmitglieder realisieren. Und das ist ja das Schöne an eben genau diesem tollen Forum. Ich konnte das selbst realisieren. Ja, ich möchte immer sehr viel machen. Aber keinesfalls das es ein Anderer für mich erledigt! Ein Forum ist für den Austausch von Ideen und Erfahrung und letztlich zum lösen von themabezogenen Problemen. Da muss ich mir von Dir nicht vorschreiben lassen, ich solle mir einen Auftragsprogrammierer besorgen.
Und was mein ersuchen nach kleiner Hilfe angeht, da hast Du wohl die sehr ausführlich Beschreibung meiner Sache missgedeutet. Das Problem an dem ich hängen blieb und keine Lösung in anderen Threads fand ist lediglich das, was im Betreff dieses Threads steht. Alles andere funktioniert.
Ebenso ist mir klar das man Summen auch OBEN berechnen kann. Die xlsx-Dateien, für die ich das Hilfsmittel haben wollte, sind jedoch von einem komplexen System generiert und dienen lediglich zur Datenanalyse. Habe ich auch schon erwähnt. Auf das Layout dieser Dateien habe ich keinen Einfluss. Da muss ich mit dem arbeiten was ich habe und das Beste daraus machen. Und dank hilfsbereiter Forumsmitglieder die sich der Lösung von VBA-Problemen anderer annehmen, ob nun aus reiner Nächstenliebe oder um selbst viele Probleme gesehen und gelöst zu haben (#Erfahrung), mache ich das beste daraus und mein Problem wurde gelöst.
Wenn dieses übliche Dilemma Dir also schlechte Laune bereitet, dann wäre es doch für alle besser wenn Du die Threads auf die Du antwortest besser selektierst und nur auf Fragen von Forumsmitgliedern antwortest die einen Erfahrungslevel auf Deinem Niveau angeben, anstatt Dich über die Unerfahrenheit anderer zu ärgern.
Ich danke Dir dennoch für Deinen Versuch mir bei meinem Problem zu helfen. Eine bedingte Formatierung war aber leider nicht das, was ich gesucht habe.

@Admin:
Mein Frage wurde erfolgreich beantwortet, somit kann dieser Thread geschlossen werden.
Vielen Dank!

Beliebteste Forumthreads (12 Monate)

Zellen mit Inhalt eines definierten Bereichs farblich füllen

14
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Zellen mit Inhalt eines definierten Bereichs farblich füllen

14 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

14
Beiträge zum Forumthread

Beiträge zu diesem Forumthread