Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1084to1088
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
1084to1088
1084to1088
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen ohne Färbung löschen

Zeilen ohne Färbung löschen
Wolle
Hallo zusammen,
habe mal wieder ein Problem wo ich Hilfe brauche.
Habe eine Tabelle mit gaaaanz vielen gefüllten Zeilen. Einige der Zeilen sind gefärbt von Spalte A bis E (danach ist auch nichts mehr in den Zellen).
Nun möchte ich alle ZEILEN die NICHT gefärbt sind löschen. Das ganze als Makro zu starten.
WICHTIG WICHTIG: Arbeitsbereich: Spalte A-E und Zeile 5 bis Ende
Gibt es da eine schöne Lösung für. Habe schon viel gesucht, aber nicht gefunden ;-(
Danke für Eure Hilfe

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

Betreff
Benutzer
Anzeige
wie sind die Zellen gefärbt, ...
08.07.2009 11:07:42
Tino
Hallo,
, durch die Bedinge Formatierung?
Falls ja, wie ist die Bedingung?
Hättest Du vielleicht ein Beispiel?
Gruß Tino
AW: wie sind die Zellen gefärbt, ...
08.07.2009 11:12:23
Wolle
Habe ich über vba gefärbt:
' Auswahl der "Fett" formatierten Zellen und Markierung der Zeile in grau
If cell.Font.FontStyle = "Fett" Then cell.EntireRow.Select
Selection.Interior.ColorIndex = 15
Selection.Font.FontStyle = "Fett"
' Auswahl des BLA BLA BLA 3 und Markierung in "Fett"
If cell.Value = "2300111-000000.000.0" Then cell.EntireRow.Font.FontStyle = "Fett"
If cell.Value = "2300111-000000.000.0" Then cell.EntireRow.Interior.ColorIndex = 14
' Auswahl der DIREKT betroffenen Teile
If cell.Value = "1" Then cell.EntireRow.Interior.ColorIndex = 6
Anzeige
vielleicht geht es hiermit...
08.07.2009 11:36:47
Tino
Hallo,
Sub test()
Dim rZelle As Range
Dim Bereich As Range
Dim A As Long

'Bereich ab A1 bis zur letzten gefüllten in Spalte A Offset auf Spalte E 
Set rZelle = Range("A1", Cells(Rows.Count, 1).End(xlUp).Offset(0, 4))

    For A = 1 To rZelle.Rows.Count
     If rZelle.Rows(A).Interior.ColorIndex = xlNone Then
      If Bereich Is Nothing Then
       Set Bereich = rZelle(A, 1).EntireRow
      Else
       Set Bereich = Union(Bereich, rZelle(A, 1).EntireRow)
      End If
     End If
    Next A

    If Not Bereich Is Nothing Then
     Bereich.EntireRow.Delete
    End If


End Sub


Gruß Tino

Anzeige
AW: vielleicht geht es hiermit...
08.07.2009 11:53:12
Wolle
Hy Tino,
bist mal wieder mein Retter. Wahr ja nicht das erste mal ;-))
Hat wunderbest gefunzt.
Danke Danke mit großer Verneigung.

238 Forumthreads zu ähnlichen Themen

VBA- Autofilter - leere Zeilen löschen
Asits

Hallo,
ich habe in der Spalte "A" Kundennummern stehen.
Ich will per Makro / Autofilter die kompletten Zeilen
derjehnigen Kunden löschen, die noch keine Kundennummer haben.
wie mache ich das ?
Vielen Dank vorab!
17.09.2008 08:48:00
Thread-ID: 1010225
5 Beiträge
Anzeige
Formate in Zellen per Makro entfernen.
Joachim

Hi,
gibt es in VBA einen Befehl, mit dem man zB Spalte D so bearbeiten kann, dass alle Formateinstellungen rausfliegen, also alles sozusagen auf Standard steht.
Danke
Joachim
25.03.2009 18:56:49
Thread-ID: 1063929
4 Beiträge
vba Leere zellen löschen wenn
Carmen

Hallo liebe Wissenden,
möchte gerne wenn die zellen in Spalte B UND C leer sind dass die gesamte Zeile gelöscht wird, aber vba will keine überlappung.
Sub Leerzeilen_löschen() Range("B1:C100").SpecialCells(xlCellTypeBlanks).EntireRow.delete End Sub
hab das ganze mit if davor und...
06.04.2009 21:26:03
Thread-ID: 1067195
8 Beiträge
Anzeige
Hyperlink entfernen und Zelle einfärben / Wert ?
Selma

Hallo Leute,
was muss ich in unten stehendem Makro anpassen, damit nicht nur der Hyperlink in Spalte C entfernt wird, sondern auch der Wert der nach dem Entfernung des Hyperlinks stehen bleibt ?
Sub Hyperlink_Makro() 'Wenn in Spalte C die Zelle die Füllfarbe 22 und ein Hyperlink hat d...
07.05.2009 15:13:04
Thread-ID: 1073652
17 Beiträge
VBA - Zellen löschen
gegs2

Hallo,
ich bin auf der Suche nach einem Makro welches mir Zellen aus meiner Tabelle löscht. Es soll bei Spalte C von oben her anfangen zu suchen (bis Spalte AF), und alle Zellen löschen und nach oben verschieben bei welchen der Inhalt der Zelle nicht mit einem kleinen "c" beginnt.
Ist s...
22.06.2009 16:24:03
Thread-ID: 1083531
5 Beiträge
Makro doppelte Zeilen löschen
Christian

Hallo allerseits,
ich habe folgendes Makro, welches Zeilen ahand von doppelten Einträgen in einer spalte löscht.
Allerdings wird immer die zweite Zeile (von oben gesehen) gelöscht, ist es auch möglich die erste zeile zu löschen und die zweite zu behalten?
hier das makro: Sub supp_d...
22.07.2009 10:44:51
Thread-ID: 1090433
5 Beiträge
leere Zellen löschen
Udo

Hallo zusammen,
ich hab folgendes Problem:
In Spalte A und B stehen Zahlen drin, wenn in Spalte A eine Zelle leer ist, steht in Spalte B eine Zahl und umgekehrt. Nun möchte ich die Werte der Spalten A und B zusammenführen, so dass ich nur eine Spalte mit den Zahlen habe ohne leere Zelle...
25.07.2009 21:51:47
Thread-ID: 1091320
20 Beiträge
Leerzeilen löschen
Frank

Hallo zusammen,
ich habe eine Exceltabelle mit Datensätzen (Spalten A und B) in der ich Leerzeilen (die in Spalte A vorkommen) KOMPLETT löschen möchte, aber nur wenn in Spalte B nicht auch noch Datensätze stehen.
Kann mir da jm. bitte weiterhelfen?
Vielen Dank!
Gruß
Frank
06.08.2009 09:29:15
Thread-ID: 1093917
3 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
4
7
3
7
7
16
4
4
19
2
7
4
6
5
3
2
4
4
4
9
6
7
14
2
2