Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1956to1960
1956to1960
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro höchsten Wert ermitteln und markieren

Forumthread: Makro höchsten Wert ermitteln und markieren

Makro höchsten Wert ermitteln und markieren
12.12.2023 10:36:08
Martin
Guten Tag
ich möchte mit einem Makro in der Spalte M den höchsten Wert ermitteln und da wo "Ergebnis2 steht
den ermittelten Wert eintragen und farblich markieren.

Das Excel kann 1000 von Zeilen enthalten.

Kann das mit einer Formel oder Makro realisiert werden?

Viele Grüsse
Martin
Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro höchsten Wert ermitteln und markieren
12.12.2023 10:40:28
SF
Hola,
den Wert ermittelst du mit Max(), markiert wird er mit der bedingten Formatierung. 
=M2=max($M$2:$M$1000)

Ist natürlich nur geraten weil "Spalte M" vieles heißen kann.
Gruß,
steve1da
AW: Makro höchsten Wert ermitteln und markieren
12.12.2023 10:43:39
Martin
Hallo steve1da

Danke für deine Nachricht.
hatte den Link vergessen mit dem Beispiel.
kannst Du es aufrufen?
Anzeige
AW: Makro höchsten Wert ermitteln und markieren
12.12.2023 10:53:44
hary
Moin
Formel in N3 und runterziehen. 
=WENN(M3="Ergebnis";SUMME($M$3:M3)-SUMME($N$2:N2);"")

gruss hary
AW:Sry, Falsch gelesen owt
12.12.2023 11:02:09
hary
.
Anzeige
AW: Makro höchsten Wert ermitteln und markieren
12.12.2023 11:07:24
Martin
Hallo Hary

Danke, das ist wirklich gut, aber ich brauche immer den höchsten Wert nicht die Summe.

3448
3448
3445
3446
3449
3451
-->
höchster Wert ist 3451
AW: Makro höchsten Wert ermitteln und markieren
12.12.2023 12:02:52
hary
Moin nochmal
Hier mal mit Makro. Teste mal. 
Sub Max_Test()

Dim rngFind As Range

Dim erste As Long

Dim firstAddress As String

With Columns(13)

  Set rngFind = .Find("Ergebnis", LookIn:=xlFormulas)

    If Not rngFind Is Nothing Then

      firstAddress = rngFind.Address

        Do

          erste = Cells(rngFind.Row, 13).End(xlUp).Row

          rngFind.Offset(, 1) = Application.Max(Range(Cells(erste, 13), Cells(rngFind.Row - 1, 13)))

            Set rngFind = .FindNext(rngFind)

       Loop While rngFind.Address > firstAddress

    Else

        MsgBox "No results"

    End If

End With

End Sub
Anzeige
AW: Makro höchsten Wert ermitteln und markieren
12.12.2023 13:00:05
Martin
Geil, 1000 Dank!!

könnte man jetzt noch was machen das ich nicht das Wort "Ergebnis" reinschreiben muss,
also das es automatisch an das Ende, anstatt dem Wort gesetzt wird und die Zelle farbig gelb markiert wird?
AW: Makro höchsten Wert ermitteln und markieren
12.12.2023 13:09:15
hary
Moin
Bin ausser Haus. Komme erst morgen fueh an den PC.
Ich lass mal die Frage offen.
gruss hary
Anzeige
AW: Makro höchsten Wert ermitteln und markieren
12.12.2023 15:32:33
daniel
Hi
probiere mal dieses Makro.
es trägt am ende jeden Zahlenblocks in die darunterliegende Zelle den Max-Wert des Blocks jeweiligen Blocks ein.
Ich trage den Wert als Formel ein, damit du siehst, wie der Wert zustande kommt.
Du solltest hier auch die Formel stehen lassen, damit du eine Unterscheidung zwischen Wert und Auswertung hast (prinzipiell wäre es auch besser, das Ergebnis in eine eigene Spalte zu schreiben).

Solltest du die Formel durch den Wert ersetzen, dann wird das Ergebnis zum Teil der Ausgangsdaten und du musst aufpassen, dass du das Makro nicht ein zweites mal laufen lässt. 

Sub ErgebnisEinfügen()

Dim rng As Range

For Each rng In Columns(13).SpecialCells(xlCellTypeConstants, 1).Areas

    With rng(1).Offset(rng.Count)

        .Formula = "=Max(" & rng.Address(0, 0) & ")"

        .Interior.Color = vbYellow

    End With

Next

End Sub


zur Erklärung: "Areas" ist wie Cells und Range ein Zellenobjekt auf dem Tabellenblatt.
Cells ist die einzelne Zelle
Range ist eine Gruppe von beliebigen Zellen auf dem Tabellenblatt.
Area ist eine spezielle Gruppe von Zellen, nämlich die, die einen Lückenlosen Rechteckigen Zellbereich darstellen.
die Zahlenwerte in der Spalte M bilden also 3 Areas, welche das Makro dann durchgeht.

Gruß Daniel
Anzeige
AW: Makro höchsten Wert ermitteln und markieren
12.12.2023 15:41:37
Martin
Hi Daniel

wow, das ist ja echt cool, funktioniert perfekt.
Vielen Vielen Dank dafür!!

Gruss
Martin
;

Forumthreads zu verwandten Themen

SVERWEIS mit Max des Suchkriteriums
Wolfango

Hallo zusammen,
Ein Suchkriterium steht in A1
In Spalte D stehen Namen.
Über einen SVERWEIS möchte ich nach einem Namen in der Spalte D suchen und den Wert aus Spalte H zurückgeben. Soweit so gut.
Meine Formel lautet:
SVERWEIS(A1;$D$2:$H$1000;5;falsch)
Aber:
Das S...
09.03.2012 15:08:44
Thread-ID: 1254377
3 Beiträge
Sverweis mit MAX
Jürgen

Hallo,
ich habe Tabelle 2 Spalte A Artikelnummer und möchte in Spalte B den Min und Spalte C den Max wert haben.
Der Index:
Tabelle 1 Spalte D ist Artikelnummer und in der Spalte L die Werte.
Mein Versuch Tabelle2.
B2 SVERWEIS(A2;Tabelle1!D:L;MAX(Tabelle1!L:L;0))
Leider...
28.09.2016 09:09:45
Thread-ID: 1516815
9 Beiträge
Sverweis aber mit Maximal-Wert
Markus

Hallo Excel-Gemeinde
ich suche nach einem Maximal-Wert in einer Tabelle.
In Tabelle1 steht in A1 BUE_101.
In Tabelle2 stehen in A:A verschiedene Werte, darunter mehrmals BUE_101.
In Tabelle2 stehen in der B:B-Kolonne verschiedene Datumswerte.
mit welcher Formel ermittle ich...
03.04.2018 12:37:21
Thread-ID: 1617801
3 Beiträge
Zahlen&Buchstaben / Höchsten Wert ermitteln
botfaehig

Hallo zusammen,
Ich brauche eine Frmel die mir den Höchsten Wert ermittelt aber komplett.
was isch bis jetzt fand, trennt die Buchstaben von Zahlen und zeigt so den höchsten Wert. ich brauche aber komplette Darstellung.
VAA Variiert zum Glück nicht, bleibt immer AVV.
VAA0474...
11.07.2019 11:55:03
Thread-ID: 1701947
26 Beiträge
Sverweis mit MAX-Funktion
FL_Ddorf

Hallo zusammen,
ich habe folgende Herausforderung in Excel und komme nicht weiter:
Es gibt eine Kandidatenliste, ein Datum wann der Kandidat erschienen ist und ein Merkmal welches der Kandidat erreicht hat.
Excel soll jetzt folgendes anzeigen:
Welches Merkmal hat der Kandidat b...
20.08.2019 09:49:58
Thread-ID: 1708513
4 Beiträge
Sverweis mit Wenn-Abrage kombinieren?
Axel

Hallo,
ich möchte die Werte einer Datentabelle (SAP-Download) in eine andere Tabelle "einspielen".
Es handelt sich um Actuals auf Kostenartenebene verschiedener Projekte.
Wenn ich einen SVERWEIS verwende, fehlt mir noch die Verknüpfung zur Kostenart. Kann ich dies über eine WENN-Abfr...
20.07.2004 12:29:09
Thread-ID: 457818
7 Beiträge
sverweis mit wenn kombinieren
Rolf

ich möchte, wenn der sverweis kein Ergebnis bringt, anstatt des #NV eine 1 bekommen. Wie lautet die Formel?
20.07.2004 19:37:10
Thread-ID: 458170
6 Beiträge
Sverweis mit Wverweis kombinieren
linus
Hallo,
folgendes Problem:
ich habe eine Tabelle, in der in der ersten Spalte Lieferantennamen (Lief1,Lief2,...) stehen. In der ersten Zeile stehen diverse Überschriften (z.B. Artikel1,Artikel2,...).
Wie kann ich mir nun den Wert aus der Kombination Lief2 und Artikel1 in einer seperaten Zel...
19.11.2004 11:18:47
Thread-ID: 520114
9 Beiträge
SVERWEIS mit einer Matrixformel kombinieren?
ute

Guten Tag,
ich versuche, Berechnungen mit SVERWEIS auf einen Schlag mit einer Matrixformel auszurechnen.
Ich habe eine Liste von Teilenummern, deren Verkaufspreis "Wert-20%" aus einer Matrixtabelle gelesen wird. Dieser "Wert-20%" wird dann mit einer Anzahl multipliziert für jede Teilenu...
13.12.2006 14:20:35
Thread-ID: 828999
5 Beiträge
Summewenns mit Max kombinieren
Tony
Guten Tag
Ich habe in einer Tabelle (Kalkulation) mehrere tausend Teile bei denen jeweils zu mehreren unterschiedlichen Zeitpunkten die Materialkosten kalkuliert wurden (ein Teil = mehrer unterschiedliche Kalkulationen).
Nun möchte ich mir in einer anderen Tabelle (Roherträge) die jeweils ak...
15.12.2022 07:48:00
Thread-ID: 1911507
22 Beiträge
Die höchsten Werte aus 2 Bereichen ermitteln
Citrix
Hallo Zusammen,
ich möchte aus zwei Bereichen die insgesamt 4 höchsten Werte ermitteln.
Dabei muss aus jedem Bereich mindestens ein Wert enthalten sein.
Beispiel:
Bereich A: 1; 3; 5; 7, 8
Bereich B: 1; 2; 3; 4; 5
Ergebnis: 8; 7; 5(aus A); 5(aus B)

Wie kann ich das in...
24.09.2023 16:24:48
Thread-ID: 1947210
8 Beiträge
Formel Sverweis mit mehreren Kriterien und Max
Christoph Zahn
Hallo,
ich habe folgende Formel:
=WENNFEHLER(SVERWEIS(E44&F44&G44;WAHL({1.2.3.4};Kran!D:D&Kran!E:E&Kran!F:F;Kran!D:D);2;FALSCH);"")
Diese gibt das erste positive Ergebnis zurück.
Eine weitere Bedingung wäre, das der MAX Wert aus spalte G angezeigt wird, der aber auch...
17.10.2023 08:25:08
Thread-ID: 1949852
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige