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

Markieren von Zellen mittels Makro

Forumthread: Markieren von Zellen mittels Makro

Markieren von Zellen mittels Makro
19.03.2020 13:52:45
Zellen
Hallo Zusammen,
ich habe eine Frage bezüglich des Markieren von bestimmten Zellen mittels Makros.
In meiner Tabelle würde ich gerne in einer bestimmten Zeile alle Werte markieren, in denen in der obersten Spalte eine "20" steht. Von diesen Werten wird dann anschließend der Mittelwert benötigt.
Kann mir jemand helfen, wie ich das machen kann?
Viele Grüße,
Anna
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Markieren von Zellen mittels Makro
19.03.2020 14:43:46
Zellen
Hallo Anna,
habe für Dich folgendes Makro gebastelt. Es markiert in der Zeile der aktuellen Zelle alle Zellen, deren Zelle jeweils in Zeile 1 ihrer Spalten "20" als Text haben. 
Sub markieren()
Dim rMarkierung As Range
Dim rErstfund As Range
Dim rFundzelle As Range
Dim lZeile As Long
lZeile = Selection.Row
With ActiveSheet.Rows(1)
Set rErstfund = .Find("20")
If Not rErstfund Is Nothing Then
Set rMarkierung = Cells(lZeile, rErstfund.Column)
Set rFundzelle = rErstfund
Do
Set rMarkierung = Union(rMarkierung, Cells(lZeile, rFundzelle.Column))
Set rFundzelle = .FindNext(rFundzelle)
Loop Until rFundzelle.Address = rErstfund.Address
rMarkierung.Select
End If
End With
End Sub
Hoffe, das hilft.
LGB
Anzeige
AW: Markieren von Zellen mittels Makro
19.03.2020 14:56:23
Zellen
Hallo Barbara,
vielen Dank für die schnelle Antwort. Es funktioniert!
Kannst du mir vielleicht noch sagen, wie ich das Makro änder, wenn ich das nicht nur in einer Zeile anwenden möchte, sondern über einen bestimmten Bereich?
Und aus diesen vielen markierten Bereichen müsste ich dann auch noch den Mittwert bilden? Hast du da eventuell auch noch einen Tipp? Über die AutoSumme Mittelwert funktioniert es leider nicht.
Vielen Dank im Voraus!
Anzeige
AW: Markieren von Zellen mittels Makro
19.03.2020 15:17:37
Zellen
Wie du das Makro änderst:
Am Besten berücksichtigst Du den Bereich, je nachdem, wie er definiert ist, in der Zeile
"Set rMarkierung = Union ..."
mit einer Erweiterung des Range dort.
In der untersten Zeile des Excel-Fensters wird immer die Summe und Anzahl der beschriebenen Zellen in der aktuellen Auswahl angezeigt. Die wolltest Du doch in Deinem Makro als Ergebnis. Dort kann mit Rechtsklick auch der Mittelwert eingestellt werden.
LGB
Anzeige
AW: Markieren von Zellen mittels Makro
19.03.2020 15:31:46
Zellen
Hallo Barbara,
super es hat funktioniert. Vielen Dank für deine Hilfe!

Forumthreads zu verwandten Themen

Mehrere Textfelder markieren
Captain

Moin @all,
ich erstelle mehrere Textfelder auf meiner Userform dynamisch.
Gibt es für die Userform eine Möglichkeit, mehrere Textfelder per Maus auf einmal zu markieren, so wie es in einem Sheet mit den Zellen möglich ist?
Im Anhang meine Beispieldatei:
https://www.herber.de/bb...
18.08.2008 11:11:00
Thread-ID: 1002529
9 Beiträge
Anzeige
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
Anzeige
Script um auf jeden Blatt eine Zelle zu markieren
Eddie

Hallo, ich habe eine eigentlich ganz einfache sache, aber irgendwie ruft wohl eher das WE in meinen Kopf :-)
Ich will eigentlich nur ein kleinen VBA Code ... der in jeden vorhandenen Tabellenblatt die Zelle A1 markiert
Vielleicht kann mir jemand da etwas sagen ?
gruß Eddie
22.08.2008 15:11:53
Thread-ID: 1003910
15 Beiträge
Leerzeilen in markieren Bereich einfügen
Ulrich

Hallo zusammen,
ich möchte gerne einen Bereich markieren und dann ein Makro starten, dass im markierten Bereich unter jeder Zeile eine Leerzeile einfügt und dann den gesamten Bereich (Zeilen+Leerzeilen) markiert.
Habe das versucht - geht nicht:
Dim bereich As Range
Set bereich...
26.08.2008 15:36:00
Thread-ID: 1004840
3 Beiträge
Markieren, formatieren und sortieren via VB-Skript
Wladimir

Hallo zusammen,
wie kann man in einer geschlossenen Excel-Datei via VB-Skript die Zellen markieren, formatieren und sortieren.
Danke im Voraus
Freundliche Grüße
Wladimir
01.09.2008 17:03:25
Thread-ID: 1006538
17 Beiträge
Anzeige
mehrere Zellen markieren verhindern
Dirk

Hallo miteinander,
brauche nochmals von Euch Hilfe, bitte.
Habe bei einer meiner Dateien eine Gültigkeitsprüfung (nur X zulassen) und vba trägt in einen Bereich beim reinklicken ein X ein, wenns schon drin ist wirds gelöscht, soweit kein Problem.
Problem: wenn man nun aus Versehen o...
03.09.2008 22:12:34
Thread-ID: 1007244
3 Beiträge
Zeilen markieren, dann sortieren... usw....?
Selma

Hallo Leute,
ich habe mir die Inhalte des Arbeitsblattes sortiert (mit drei Sortkriterien). Jetzt möchte ich noch eine Sortierung per VBA wie folgt durchführen....
Ab Zeile 4 sollen die Zeilen die gleichen Zelleninhalt in Spalte H haben, markiert und wie folgt sortiert werden:
Sele...
04.09.2008 19:05:06
Thread-ID: 1007484
3 Beiträge
Zeilen markieren (ohne Formeleinträge)
Selma

Hallo Leute,
ich habe versucht ab Zeile 2 bis letzte gefüllte Zelle der Spalte B (leere Formelergebnisse sollen nicht berücksichtigt werden) die Zeilen zu markieren, leider ohne Erfolg.
Rows("2:" & Range("B65536").End(xlUp).Row).Select
Was muss ich ändern?
Vielen Dank im Vor...
07.09.2008 18:35:00
Thread-ID: 1007992
5 Beiträge
Anzeige
Bestimmte Werte markieren
mehmet

Hallo Forum,
ich habe in Spalte G4:G92 beispielsweise folgende Codes stehen:
in Zelle G4
TAF EKAH 080440Z 081212 16010KT 9999 SCT020 TEMPO 1218 4000 SHRA BKN015CB TEMPO 1807 2500 SHRA BR BKN008 SCT015CB BECMG 1921 21006KT TEMPO 0712 -SHRA BKN012 SCT020CB=
in Zelle G5
TAF ESS...
08.09.2008 08:36:00
Thread-ID: 1008041
3 Beiträge
Summenformel Zellbezüge markieren
Christian

Hi Leute,
heute möchte ich eine Frage stellen die mich schon eine Zeit lang beschäftigt, für die ich aber leider selber noch keine Antwort gefunden habe.
Ich habe ein Registerblatt in dem einige "Summen-Formeln" stehen, die auf Zellbeüge in anderen Registerblättern (alle in der selben A...
08.09.2008 08:38:00
Thread-ID: 1008042
6 Beiträge
Zeichenfolgen vergleichen und markieren
mehmet

Hallo Forum,
in Spalte G4:G92 habe ich mehrere Codes, z.B.:
G4
METAR EKAH 080850Z 18007KT 130V220 9999 SCT012TCU BKN100 18/16 Q1010=
G5
METAR UAAA 080900Z 03003MPS 010V080 9999 SKC 25/05 Q1017 55CLRD65 NOSIG RMK QFE704/0938=
G6
METAR ESSA 080920Z 04006KT 9999 SCT010...
08.09.2008 11:47:07
Thread-ID: 1008096
3 Beiträge
Doppeleinträge markieren
bug

Hallo,
ich habe eine Frage zu doppelten werten in einer Tabellenspalte.
wie kann ich in einer separaten spalte ein neues merkmal "X" ausgeben, mit dem nur einer derdoppelten einträge markiert wird, oder umgekehrt alle doppelten bis auf einen.
dabei spielt keine rolle welcher eintra...
09.09.2008 18:18:32
Thread-ID: 1008560
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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