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
1424to1428
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
1424to1428
1424to1428
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen ein- /Ausblenden, Bestimmte Zeilen Färben

Zeilen ein- /Ausblenden, Bestimmte Zeilen Färben
22.05.2015 11:46:51
Alex
Hallo liebe Excel-Experten,
Ich versuche es seit Tagen alleine mit VBA, ich Kriege es aber einfach nicht hin.
1-Ich habe viele ähnliche Tabellen mit jeweils ab ca. 500 Zeilen.
Unter Spalte "B" wiederholt sich immer eine Zahl, z.B. von der Zeilen 11 bis 19 steht die zahl "2200.01717.01.C.10.0000", danach ab Zeile 20 gibt es eine neue Zahl die sich auch in den nächsten Zeilen wiederholen wird.
Da der Titel sich immer in der ersten Zeile befindet, brauche ich bitte einen Makro, der immer nur die erste Zeile der jeweils sich "unter Spalte B" wiederholende Zahl einblendet, alle anderen Zeilen "Untertitel" möchte ich ausblenden. Somit könnte ich also nur die Zeile 11 sehen, alle anderen Zeilen bis 19 werden ausgeblendet usw.
2-Unter Spalte "H" ist der Titel geschrieben, nach dem ich jetzt nur die Titel sehe, möchte ich einen davon mit einem Bestimmten Text z.B. "Ausführungsphase/Details" eine Blaue Farbe geben.
herzlichen Dank im Voraus
Alex

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen ein- /Ausblenden, Bestimmte Zeilen Färb
22.05.2015 12:29:16
Daniel
Hi
probier mal folgenden Code.
der text für Spalte H muss richtig geschrieben sein, sonst gibts nen Fehler.
Wenn du den code wiederholt laufen lässt, musst du vorher die bestehende Gruppierung löschen.
Ich habe mich für die Methode der Gruppierung entschieden, weil du damit nicht nur alle Untertitel ein/ausblenden kannst, sondern auch einzelne.
bevor du den Code laufen lässt, musst du im Blatt noch folgende Einstellung ändern:
DATEN - GLIEDERUNG - EINSTELLUNGEN (beim Menü "Gliederung" auf die rechte untere Ecke klicken) und hier das Häkchen bei "Hauptzeilen unter Detaildaten" entfernen.
Sub Makro1()
Dim Zelle As Range
Dim Ber As Range
Columns(8).Find(what:="Ausführungsphase/Details").Interior.Color = vbBlue
For Each Zelle In Range(Cells(11, 2), Cells(11, 2).End(xlDown).Offset(1, 0))
If Zelle.Value = Zelle.Offset(-1, 0).Value Then
If Ber Is Nothing Then
Set Ber = Zelle
Else
Set Ber = Union(Ber, Zelle)
End If
ElseIf Not Ber Is Nothing Then
Ber.EntireRow.Group
Set Ber = Nothing
End If
Next
End Sub
Gruß Daniel

Anzeige
AW: Zeilen ein- /Ausblenden, Bestimmte Zeilen Färb
22.05.2015 12:56:31
Alex
hallo Daniel,
erstmal vielen Dank für die Antwort, Makro Funktioniert Super.
Die Anzahl der Zeilen nach jedem Titel variiert Stark von einer Tabelle zu einem anderen, deswegen möchte ich mich lieber auf die Nummer in der Spalte "B" für das Ausblenden Beziehe, denn diese Nummer bei jeder Tabelle immer für den Selben Titel steht.
Wäre nett wenn sie dafür ne Lösung habe.
Gruß Alex

AW: Zeilen ein- /Ausblenden, Bestimmte Zeilen Färb
22.05.2015 14:56:05
Daniel
HÄ nix verstehen was du wolle.
mein Code geht die Liste in Spalte B durch und immer wenn die Nummer wechselt, wird der Block ausgeblendet, also mach ich genau das was du wünscht.
Was ist denn deine Annahme, was mein Code macht?
(nur so zur Info, die Spalte B hat die Nummer 2 und die Spalte steht in Cells() an zweiter Stelle).
Bitte um Aufklärung, was du konkret meinst.
Gruß Daniel

Anzeige
AW: Zeilen ein- /Ausblenden, Bestimmte Zeilen Färb
22.05.2015 16:09:12
Alex
Hallo Daniel,
Da ich Anfänger bin, habe ich es net direkt geschnallt. Du hast recht, der Code ist Perfekt. :))
Vielen Dank.
Ein Problem habe ich jetzt bemerkt "in den anderen Tabellen", für manche Titeln gibt es in der Spalte "B" 2 verschiedene Nummern, das heißt ich bekomme diese Titeln 2 mal übereinander zu sehen.
kann man da was machen in dem Code?
Danke noch mal in Voraus
Gruß Alex

AW: Zeilen ein- /Ausblenden, Bestimmte Zeilen Färb
22.05.2015 16:11:15
Daniel
Hi
watt wilste da machen?
andere Nummer ist andere Nummer, woher soll das makro wissen, das die zusammen gehören?
Gruß Daniel

AW: Zeilen ein- /Ausblenden, Bestimmte Zeilen Färb
22.05.2015 16:25:04
Alex
sorry, bin Total Verwirt und habe dich auch verwirt, ich meinte
in der Spalte "H" gibt es Titeln die sich Wiederholen, z.B. in H4 & H5 habe ich den Titel "Eigenleistungen Basisplanungsphase" 2 mal übereinander wiederholt, eine von den wiederholten Zeilen möchte ich gerne löschen, brauche ich jetzt einen anderen Code der die wiederholten Zeilen Löscht?

Anzeige
AW: Zeilen ein- /Ausblenden, Bestimmte Zeilen Färb
22.05.2015 16:29:53
Daniel
Hi
dieser Code blendet nur aus.
zum löschen von Zeilen brauchst du anderen Code.
wie man Zeilen löscht, habe ich aber grade in einem anderen Beitrag erklärt.
Den kannst du dir anschauen und das für dich übernehmen.
Gruß Daniel

AW: Zeilen ein- /Ausblenden, Bestimmte Zeilen Färb
22.05.2015 16:36:04
Alex
Habs gefunden :)
Vielen Dank Danie.
Wünsche dir ein schönes Pfingsten Wochenende. :)

306 Forumthreads zu ähnlichen Themen

VBA - Zelle kopieren bis Wert einer Zelle null ist
Schulze

Halli Hallo,
ich bin ziemlicher Neuling in VBA. Daher würde ich euch bitten mir bei meiner Fragestellung zu helfen und zwar wie folgt: Ich möchte aus einer Tabelle aller Zellen kopieren, bis der Wert einer Zelle 0 annimmt. Diesen bestimten Bereich möchte ich in einer neuen Datei abspeichern...
19.08.2008 08:39:35
Thread-ID: 1002782
17 Beiträge
Anzeige
Mit VBA In Zelle Excelformel schreiben
Gho-Reg

Hi Leute
Ich habe hier diesen netten VBA Code geschrieben und leider wie solls auch anders sein kommt dauernd eine Fehlermeldung :)
CODE:
rowbeforeinteger = 2
Dim text As String
text = "=IF(" & epsoldcolumn & rowbeforeinteger & "=""x"";1;0)+IF(" & emailsoldco...
25.08.2008 11:08:33
Thread-ID: 1004403
6 Beiträge
Summen in bestimmte Zeilen
Thomas

Hallo,
ich suche eine sicherlich einfache Möglichkeit Summen in einer bestimmten Zeile bilden zu lassen. Das Problem ist das die Bereiche unterschiedlich groß sind.
Zur besseren Erläuterung habe ich eine Bsp-Datei angehängt.
Vielen Dank!
MfG Tom
Die Datei https://www.herber....
27.08.2008 14:19:00
Thread-ID: 1005088
13 Beiträge
Anzeige
Zelleninhalt mit VBA suchen
Tom

Hallo
zum Feierabend noch mal fix ne Frage
ich möchte in einem anderen sheet, in einer anderen Tabelle etwas suchen und danach 4 Zellen nach links gehen und den Wert kopieren...
Dim strActiveCell As String
Dim rFound As Range
Tabellenname = ActiveSheet.Name
Tabellenname...
04.09.2008 16:41:17
Thread-ID: 1007457
4 Beiträge
In Textfile bestimmte Zeile suchen
Pascal

In einem Textfile soll nach einer bestimmten Zeile (immer der gleiche Text) gesucht werden.
Wird dieser Text gefunden, so soll alles vom Beginn weg des Textfiles bis und mit dieser Zeile (plus zusätzlich noch die nächste Zeile) gelöscht werden.
Geht das irgendwie ?
Wenn ja, wie ?
24.09.2008 16:14:00
Thread-ID: 1012111
8 Beiträge
aktive Zelle soll in Spalte "L" springen
Karsten

Hallo... ,
Suche folgenden Makrobefehl:
Die aktive Zelle soll in der Zeile bleiben, in der sie sich befindet, allerdings nach Spalte "L" springen.
Danke für eure Hilfe!
Gruß
Karsten
03.10.2008 16:34:44
Thread-ID: 1014058
3 Beiträge
Zelle einer Spalte in bestimmte Zelle kopieren
Fred

Wie kann man irgendeine Zelle, die in einer bestimmten Spalte befüllt wird, in eine fixe Zelle einer andere Excel-Tabelle übertragen?
Danke für eure Unterstützung!
08.10.2008 09:43:47
Thread-ID: 1014907
3 Beiträge
Von aktiver Zelle in Spalte A springen
Susi

Hallo liebe Excel-Freunde,
wie ich in einer Tabelle die aktive Zelle ermitteln kann, weiß ich schon.
Von dieser aktiven Zelle aus (z.B. D10) soll nun der Wert in Spalte A dieser Zeile (hier also A10) ermittelt werden und in eine andere Zelle (z.B. A1) übertragen werden.
Leider kann...
16.10.2008 12:36:20
Thread-ID: 1016826
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
16
4
5
12
2
3
7
2
2
2
2
4
5
6
1
4
2
5
9
9
2
2
5
4
2