Thema Datum  Von Nutzer Rating
Antwort
Rot Werte Größer als X hervorheben
 21.01.2023 14:34:47 FLo
NotSolved
21.01.2023 16:45:49 ralf_b
NotSolved

Ansicht des Beitrags:
Von:
FLo		 Datum:
21.01.2023 14:34:47		 Views:
929		 Rating:
     
Antwort:
  Ja
Thema:
Werte Größer als X hervorheben

 

Hallo liebe VBA Freunde!

 

Ich bin auf der Fehlersuche und finde ihn leider nicht....
Möchte das aus einem markierten Bereich jene Werte hervorgehoben werden die görßer sind als X.

Was mache ich hier schon wieder falsch????

 

Sub WerteGrößerAlsHervorheben()

Dim myRange As Range
Dim myCell As Range
Dim i As Integer

    i = InputBox("Eingabe des Wertes -> Größer als:", "Größer als...")
    
    Set myRange = Selection

For Each myCell In myRange

    If WorksheetFunction.CountIf(myRange, myCell.Value) > i Then
        myCell.Interior.ColorIndex = 43
    
    End If

Next myCell

End Sub

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Werte Größer als X hervorheben
 21.01.2023 14:34:47 FLo
NotSolved
21.01.2023 16:45:49 ralf_b
NotSolved