Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
464to468
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
464to468
464to468
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Alle Zeilen markieren, wenn...

Alle Zeilen markieren, wenn...
10.08.2004 15:55:21
Martin
Hallo liebe Leute,
wie kann ich es erreichen, dass alle Zeilen markiert werden, in denen in der Zelle in Spalte B ein "x" steht? Ist dies möglich? Hab es schon mit einer Schleife probiert, aber bisher immer erfolglos. Wahrscheinlich habe ich auch den falschen Ansatz. Kann mir jemand auf die Sprünge helfen?
Vielen Dank!!!
Gruss,
Martin

17
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alle Zeilen markieren, wenn...
Bert
Zu welchem Zweck sollen die markiert werden? Das ist doch nicht das eigentliche Ziel, oder? Was also soll mit den Zellen passieren?
Gruß Bert
AW: Alle Zeilen markieren, wenn...
10.08.2004 16:03:41
Martin
Hallo Bert,
recht hast Du, das ist nicht das eigentliche Ziel. Im nachhinein sollen einige wenige Ereignisse mit den Spalten passieren. Zum einen möchte ich aber über jede markierte Zeile eine neue Zeile einfügen. Klingt vielleicht blöde dies auf diesem Wege realisieren zu wollen, allerdings bin ich an einer Schleife, die ich zuvor geschrieben habe gescheitert. Sie funktionierte zwar bis zu einem gewissen Punkt einwandfrei, über diesen hinaus jedoch richtete sie an meiner Datei eher Schaden an, als zu helfen. ;-)
Hast Du eine Idee, wie man dieses Problem mit dem Markieren lösen kann?
Gruss,
Martin
Anzeige
AW: Alle Zeilen markieren, wenn...
10.08.2004 16:15:41
Vitor
Hallo Martin,
Benutzt mal das "Conditional formating" auf allen zelllen, mit folgenden formeln:
="x".
Das wars oder ?
Mfg aus Lissabon.
Vitor

AW: Alle Zeilen markieren, wenn...
10.08.2004 16:23:07
Martin
Hallo Vitor,
leider funktioniert auch das nicht. Hast Du vielleicht noch eine andere Idee?
Gruss,
Martin
AW: Alle Zeilen markieren, wenn...
10.08.2004 16:11:05
MRP
Hallo Martin,
hört sich so an, als ob du ein Makro brauchst. Damit kann ich leider nicht dienen, aber Zeichne dir mal folgendes mit dem Makrorecorder auf:
Markier die Spalte B und setzte den Autofilter, filtere nach "x", markier alle x, Bearbeiten/Gehezu/Inhalte Häkchen bei nur sichbare Zellen ( gibts auch als Icon für die Symbolleiste ), den Autofilter wegnehmen und wie gewohnt Zeile einfügen.
Hoffe es hilft dir weiter.
Ciao
Manuele Rocco Parrino
Anzeige
AW: Alle Zeilen markieren, wenn...
10.08.2004 16:20:56
Martin
Hallo Manuele,
leider nein. Hab es ausprobiert. Läuft bis zu dem Punkt gut, wo Excel sagt, dass ein "Insert" nicht möglich ist. Hab trotzdem vielen Dank für Deine Hilfe.
Gruss,
Martin
P.S.: Toller Name übrigens! :-)
AW: Alle Zeilen markieren, wenn...
10.08.2004 16:33:41
MRP
Hi Martin,
dass macht er doch nur, wenn er beim Zeilen einfügen irgendwelche Zellen über die 65536igste Zeile hinausschieben würde. Überprüf doch mal ob das der Fall wäre. Vielleicht hilfts auch vorher mal Leerzeilen rauszulöschen.
Ciao
Manu
P.S.: Danke, haben meine Eltern gut gemacht ;-)
AW: Alle Zeilen markieren, wenn...
10.08.2004 16:40:21
Martin
Hallo Manu,
nöö, ist beides nicht der Fall. Hab in der Datei ca. 1500 Datensätze und zwischen den Datensätzen keine Leerzeilen. Excel mokelt rum mit folgender Fehlermeldung:
"Insert-Methode des Range-Objekts konnte nicht ausgeführt werden."
Ich hab ja versucht den aufgezeichneten Code zu ändern, aber...nix zu machen! :-(
Es lassen sich keine Zeilen einfügen.
Gruss,
Martin
Anzeige
AW: Alle Zeilen markieren, wenn...
10.08.2004 17:07:54
MRP
Hallo Martin,
ich meinte einfach bevor dein Makro startet alle Zeilen unterhalb der 1500 Datensätze alle Zeilen löschen. Dann müsste ja auch nix mehr da sein, was er ins Nirvana schieben würde.
Ciao
Manu
Problem gelöst.
11.08.2004 08:15:16
Martin
Guten Morgen Manu,
das Problem ist endlich gelöst. Habe folgenden Code genommen:

Sub Test()
Dim LeRei, a As Long, r1, MyRange As Range
LeRei = ActiveSheet.Cells(Rows.Count, 2).End(xlUp).Row
For i = LeRei To 1 Step -1
If ActiveSheet.Cells(i, 2).Value = "X" Then
Rows(i).Select
Selection.Insert Shift:=xlDown
End If
Next i
End Sub

Vorher war das Problem entweder, dass er die Zeilen nicht direkt ausgewählt hat, oder es wurde das "Insert" nicht unterstützt. Keine Ahnung woran es genau gelegen hat, aber hauptsache es funzt jetzt.
Hab vielen Dank für Deine Mühe und Hilfe.
Lieben Gruss,
Martin
Anzeige
AW: Alle Zeilen markieren, wenn...
harry
hi martin,
probier das mal:

Sub markieren()
Dim LeRei, a As Long, r1, MyRange As Range
LeRei = ActiveSheet.Cells(Rows.Count, 2).End(xlUp).Row
For i = 1 To LeRei
If ActiveSheet.Cells(i, 2).Value = "x" Then
a = a + 1
If a = 1 Then
Set MyRange = ActiveSheet.Rows(i)
Else:   Set r1 = ActiveSheet.Rows(i)
Set MyRange = Union(MyRange, r1)
End If
End If
Next i
MyRange.Select
End Sub

liebe grüße,
harry
ergänzung
harry
das wäre dann der befehl zum zeilen einfügen:
MyRange.Select
Selection.Insert Shift:=xlDown
Leider nein!!!
10.08.2004 16:48:13
Martin
Hallo Harry,
der Code ist klasse. Es werden genau die Zeilen markiert, die ich haben will. Allerdings sagt Excel auch hier, dass kein Insert möglich ist.
Fehlermeldung:
"Insert-Methode des Range-Objekts konnte nicht ausgeführt werden."
Hast Du vielleicht eine Idee, woran das liegen könnte?
Liebe Grüße,
Martin
Anzeige
AW: Leider nein!!!
harry
nimm den insert befehl wieder raus, lass das makro alle zeilen markieren. dann wechselst du in die arbeitsmappe und zeichnest den befehl zeilen einfügen mit dem recorder auf. versuch dann, ob es mit dem code vom rekorder klappt.
AW: Leider nein!!!
10.08.2004 16:52:24
Martin
Nein, auch nicht. Der Code des Recorders ist der gleiche, den ich auch verwende.
"Selection.Insert Shift:=xlDown"
AW: Leider nein!!!
harry
dann fällt mir nur noch das ein:
Dim LeRei, a As Long, r1, MyRange As Range
LeRei = ActiveSheet.Cells(Rows.Count, 2).End(xlUp).Row
For i = LeRei To 1 Step -1
If ActiveSheet.Cells(i, 2).Value = "x" Then
Rows(i).Select
Selection.Insert Shift:=xlDown
End If
Next i
muss jetzt leider weg (grillen und bier trinken!!!)
liebe grüße,
harry
Anzeige
:-)
10.08.2004 17:02:07
Martin
Hey Harry,
danke für den zweiten Code. Ich teste ihn gleich mal aus.
Ich wünsch Dir einen guten Appetit und trink bitte mal 'n Pils für mich mit!!!
Lieben Gruss,
Martin

308 Forumthreads zu ähnlichen Themen

VBA Text suchen > Zeile durch Zelle markieren
Steffen

Hi Zusammen,
ich habe ein Tabellenblatt in dem in den Spalten A bis X jede einzelne Zelle nach einem bestimmten Begriff
durchsucht werden soll. Wenn der Begriff (Text) in einer Zeile vorhanden ist soll in Spalte Y in der entsprechenden Zeile ein "x" gesetzt werden.
Soweit bin ich...
24.09.2009 15:26:22
Thread-ID: 1105312
3 Beiträge
Anzeige
VBA Aktive Zeile markieren
Dirk

Hallo Forum,
wie kann ich in VBA eine aktuelle Zeile selektieren?
Ich habe eine Schleife, in der ich in einer Spalte Zellen mit Inhalt 0 suche - wenn ich eine Zelle gefunden habe, dann soll die entsprechende Zeile markiert werden damit ich sie dann löschen kann.
Vielen Dank!
Gru...
08.10.2010 10:52:07
Thread-ID: 1181416
10 Beiträge
VBA letzte Zeile von A bis letzte Spalte markieren
A

Hallo liebe Profis,
wie lautet der VBA-Befehl, wenn ich die letzte Zeile von A bis zur letzten Spalte meiner Tabelle markieren möchte?
Vielen Dank im Voraus
Sabine
27.12.2013 14:35:53
Thread-ID: 1343575
5 Beiträge
Anzeige
Alle zwei Zeilen grau markieren, VBA makro
karin

Guten Tag,
ich benötige in Makro, dass mir alle zwei Zellen die komplette Zeile grau hinterlegt.
Mit der bedingten Formatierung
=REST(ZEILE();2)=0
hat das super funktioniert. Allerdings ist der Bereich variabel, betroffen sind zwar immer die Spalten A:H, aber die Zeilen sind unt...
11.11.2015 11:19:51
Thread-ID: 1457597
11 Beiträge
VBA andere Zeile auswählen
Jule

Hallo,
ich habe gestern zum ersen mal selbst Berührungen mit Makros gehabt und scheitere schon an einer ganz simplen Sache :(
Das Makro aufzuzeichnen hat ja noch gut geklappt. Nun soll diese Aktion 4 Zeilen tiefer erneut ausgeführt werden. Und dann wieder 4 Zeilen tiefer, usw.
Ich...
19.01.2017 11:29:06
Thread-ID: 1536026
12 Beiträge
Excel VBA, Bestimmte Zeilen auswählen etc.
Chris

Hallo liebe Community,
ich habe als Projekt die "Digitale Weltkarte" bekommen.Mithilfe dieser Weltkarte, die in eine PowerPoint Präsentation gepackt wird, kann man schnell sehen, wenn etwa eine Naturkatastrophe gemeldet wird, ob Firmen, die an diesem möglichen Katastrophengebiet ihren Sitz...
30.01.2017 18:43:06
Thread-ID: 1538364
10 Beiträge
Excel VBA, Bestimmte Zeilen auswählen etc.
Chris

Hallo Franz, vielen vielen Dank für deine VBA-Programmierung. Diese hat mir bei meinem Problem sehr weitergeholfen. Nun gibt es noch drei kleine Probleme. Erstens: Im Moment wird für jede Ort-Ort-Beziehung eine neue Datei erstellt. Ich möchte jedoch pro Ort nur eine Datei. Die Spalte "F" zeigt...
31.01.2017 21:04:53
Thread-ID: 1538602
2 Beiträge
VBA: Zeile farbig markieren und anders...
Juergen

hallo,
ich habe hier ein Makro geklaut, welches noch nicht ganz das tut, was ich erwarte. Die betreffende Spalte und gross/kleinschreibung konnte ich mit meinen DAU Kenntnissen hinbiegen.
Das folgende ist aber Mangels VBA Input für mich nicht lösbar.
Evtl. kann mir jemand helfen.....
07.09.2017 17:57:10
Thread-ID: 1579212
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
1
9
4
2
10
11
9
1
7
7
4
1
6
1
9
8
9
1
4
24
6
9
2
7