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

wenn Spalte F nicht leer, ganze Zeile markieren

Forumthread: wenn Spalte F nicht leer, ganze Zeile markieren

wenn Spalte F nicht leer, ganze Zeile markieren
19.11.2008 18:37:00
maxx_1985
Hallo mit'mander
Ich hab ein kleines VBA Probelem. Naemlich das fogende:
Wenn Zelle in Spalte F NICHT leer, dann die ganze Zeile markieren (einfach markieren, keine Farbe und nichts).
Bin gerade dabei mit dem Recorder was zu basteln (da ich noch kein vba kann) und bin an ganau dieser Stelle (select if ...) irgendwie hangengeblieben.
Waere nett, wenn mir jemand weiterhelfen koennte.
vielen dank! :-))
denis
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
meine Idee
19.11.2008 18:43:00
maxx_1985 

Sub correct_range()
Dim i As Long
If Cells(i, 6)  "" Then
Cells(i, 6).EntireRow.Select
End If
Next i
End Sub


warum geht das nicht? :-)) was hab ich vergessen?

AW: meine Idee
19.11.2008 18:50:00
Lars
Hi,
die Schleif ist unvollständi, das For i = ? to ? fehlt.
mfg Lars
Anzeige
AW: meine Idee
19.11.2008 18:50:00
robert
hallo,
meinst du so ?
gruß
rofu

Sub correct_range()
Dim i, lz As Long
lz = Cells(Rows.Count, 6).End(xlUp).Row ' letzte zeile in Spalte F ermitteln
For i = 1 To lz
If Cells(i, 6)  "" Then
Cells(i, 6).EntireRow.Select
Exit For
End If
Next i
End Sub


Anzeige
AW: meine Idee
19.11.2008 18:58:00
maxx_1985
mann seid ihr gut! :-) danke!
Cells(Rows.Count, 6).End(xlUp).Row - kann mir das bitte jemand uebersetzen? Zaehlt er hier durch? Bis 65500 runter?
rufu, er markiert mir aber nur die erste zeile. wenn ich i =2 sage, dann die zweite. er soll aber den ganzen datenbereich markieren. was meinst du?
vielen dank
gruss
denis
Anzeige
AW: meine Idee
19.11.2008 19:10:00
robert
hallo,
was bedeutet dieser satz?
er markiert mir aber nur die erste zeile. wenn ich i =2 sage, dann die zweite. er soll aber den ganzen datenbereich markieren
lz = Cells(Rows.Count, 6).End(xlUp).Row ' letzte gefüllte zeile in Spalte F ermitteln
in diesem makro sucht er die erste nichtleere zelle in spalte F un markiert die zeile - soll es nicht so sein?
bitte um klärung
gruß
rofu
Anzeige
AW: meine Idee
19.11.2008 19:32:00
maxx_1985
ups, hab mich ein bisschen unverstaendlich ausgedrueckt.
er soll, wenn in der Spalte F etwas steht, die gesamte Zeile markieren. Und das eben nicht nur fuer Zeile 1, sonder fuer den kompletten Datenbereich.
also in etwa so:

Sub correct_range()
Dim i, lz As Long
lz = Cells(Rows.Count, 6).End(xlUp).Row ' letzte zeile in Spalte F ermitteln
For i = 1 To lz
If Cells(i, 6) = "" Then
Exit For
End If
Next i
Range("A2", Cells(i - 1, 43)).Select
Selection.SpecialCells(xlCellTypeVisible).Select
Application.DisplayAlerts = False
Selection.Delete
End Sub


Anzeige
AW: @maxx_1985
19.11.2008 19:43:39
robert
hallo,
lies doch einmal was du in deinem ersten beitrag verlangt hast !!!!!!!!!
das was du jetzt machst war doch nicht gefragt !!!!
bitte in zukunft wunsch genauer definieren
gruß
rofu
AW: Alle nichtleeren markieren?
19.11.2008 19:34:25
Erich
Hallo Denis,
tut Roberts Code das gewünschte, wenn du das "Exit For" weglässt?
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige
AW: Alle nichtleeren markieren?
19.11.2008 19:42:28
maxx_1985
hey erich,
ja, funktioniert auch. Er loescht aber leider zu viel. Denn unten hab ich nochmals Daten stehen. Mit dem "exit for" bleiben sie stehen, ohne exit for sind sie leider weg. Kein Plan warum - hab viel zu wenig Ahnung von vba. :-)
gruss
denis
AW: Alle nichtleeren markieren?
19.11.2008 19:50:00
Erich
Hi Denis,
wo steht hier irgend etwas von löschen? Hier wird bisher nur selektiert.
Du schreibst "Denn unten hab ich nochmals Daten stehen."
Soll das bedeuten, dass der Code nur auf einen Teil der Spalte F wirken soll?
Dann müsstest du genau angeben, über welchen Zeilenbereich das Makro laufen soll.
Oder du beschreibst, wie VBA erkennen kann, dass der Zeilenbereich zuende ist.
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige

Forumthreads zu verwandten Themen

Zellen kopieren wenn Ziel nicht leer
Tom

Guten Morgen!
Ich suche mittels VBA folgende Möglichkeit
Suche Zeile für Zeile (Beginnend ab Zeile 4) die Spalte H ab ob etwas drinn steht.
Kopiere den Inhalt in die gleiche Zeile, aber in die Spalte P
Wichtig! Ist die ZIEL-Zelle bereits befüllt (es steht also etwas drin), dann...
18.08.2008 11:18:24
Thread-ID: 1002534
4 Beiträge
Zelle nichtleer, dann Spalten ausblenden
kellerkind42

hallo.
Ich tue mich sehr schwer mit folgendem Wunsch:
Im Spaltenbereich A-Z:
Im Zeilenbereich 10 -20:
z.B:
Steht in Spalte C etwas in Zeile 10 oder 11 oder 12.... dann Blende diese Spalte aus!
Kann mir bitte jemand auf die Sprünge helfen?
Gruß Reinhardt.
20.08.2008 07:29:00
Thread-ID: 1003062
6 Beiträge
Anzeige
Wenn nur Text in Zelle...
MichiM

Hallo,
ich habe eine umfangreiche Artikelliste (ca. 250.000 Artikel) aus einer Datanormdatei erstellt.
Aus dieser muss ich jetzt alle Artikel entfernen, dessen Artikelnummer (in Spalte A; als Text formatiert, damit führende Nullen nicht gelöscht werden) keinerlei Zahlen enthalten.
E...
22.08.2008 16:24:44
Thread-ID: 1003960
4 Beiträge
Anzeige
Zählen wenn Zelle nicht leer
Tim

Hallo Forum,
wie kann ich in einem Bereich (z.B. A1:A50) die Anzahl der Zellen, in denen ein Eintrag vorhanden ist (Text oder Zahl) zählen?
Gruß
Tim
20.10.2008 11:47:00
Thread-ID: 1017617
3 Beiträge
Summe berechnen mit einer Matrixformel
Sibylle

Hallo,
kann man die Summe der Nettobeträge mit einer Matrixformel ermitteln.
Wenn ja, wie muss diese dann aussehen?
Besten Dank im voraus.
Gruß
Sibylle

11.11.2008 10:18:00
Thread-ID: 1023446
12 Beiträge
Leere zellen nicht leer und Zahlen keine Zahlen
P.Mackes

Per google bin ich zwar auf einige themen gestoßen, die sich mit diesen oder ähnlichen Probleme beschäftigen, aber so richtig gepasst hat für mich nichts oder die lösungen waren vba basiert und das kann ja nicht der stein der Weisen sein.
https://www.herber.de/bbs/user/56887.xls
es tre...
18.11.2008 11:08:00
Thread-ID: 1025551
10 Beiträge
summenprodukt mit 2 wenn's geht nicht?
Silvi


Moin zusammen,
muß eine ziemlich komplexe Abfrage machen und habe mir untenstehende ellenlange Formel ausgedacht, die leider nicht funktionert... :o( Hat von Euch jemand eine Idee, wie man das eleganter lösen könnte (ohne Makro?). Vielleicht ist nur eine Klammer falsch? Ich komm nicht...
23.01.2009 10:30:18
Thread-ID: 1042851
8 Beiträge
Wieviele Zellen im Range sind NICHT leer
Mandy

Hi.
wie kann ich denn ein Range C3:C13 auf meinem Sheet "Daten" so abfragen, damit ich in einem Label stehen habe, wieviel von diesen Zellen noch leer sind, sprich noch keinen Inhalt haben ?
Danke Mandy
12.02.2009 14:48:00
Thread-ID: 1050080
6 Beiträge
Summe wenn mit Bedingungen geht nicht
Andreas

Hallo,
ich habe folgendes Problem. Es existieren 2 Tabellenblätter. Auf einem der Tabellenblätter findet eine Art Auswertung statt. Das Haupttabellenblatt hat 12 benutzte Spalten, von denen ich nun Spalte B und F auf eine Übereinstimmung abprüfen will. Dazu habe ich auch ein Beispiel gefun...
25.03.2009 15:30:11
Thread-ID: 1063848
5 Beiträge
WENN,DANN,SUMME
Castor-Pollux

Hallo,
ich habe mal wieder ein Problem.
Was ist an dieser Formel falsch: =WENN(H23>"40:00";(H23-"40:00");"")
Hintergrund:
Ich habe eine Tabelle, in der ich meine Arbeitsstunden berechne.
Wenn ich über 40 Stunden kommen, soll mit der Formel nur die Überstunden berechnet we...
27.03.2009 09:55:37
Thread-ID: 1064503
9 Beiträge
Anzeige
"summewenn" in Zeiterfassung funktioniert nicht
Gernot

Die Datei https://www.herber.de/bbs/user/61213.xls wurde aus Datenschutzgründen gelöscht
Liebe Forumsexperten
Ich habe so ziemlich alle "summewenn" und "summenprodukt"-Lösungen probiert, die im Forum so gut beschrieben sind. Leider funktioniert keine der Lösungen. Die Exceldatei habe i...
15.04.2009 18:40:21
Thread-ID: 1068933
6 Beiträge
Leere und Nichtleere Zellen einer Spalte rechnen
Urmila

Hallo,
habe ien Problem, ich habe eine Liste, in Spalte A stehen Werte (Zahlen), in der Spalte B stehen Namen.
Nun will ich, dass er mir in der Zelle D1 alle Werte aus spalte A ausrechnet, wo die Zellen in Spalte B Inhalte haben, und in Zelle E1 wo kein Inhalt steht.
Ich hoffe ich k...
30.06.2009 12:41:41
Thread-ID: 1085323
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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