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

Aus- und einblenden mit einem Steuerelement

Forumthread: Aus- und einblenden mit einem Steuerelement

Aus- und einblenden mit einem Steuerelement
29.01.2009 13:19:00
Maris
Hallo zusammen,
brauche mal euere Hilfe?!? Wie kann ich mit diesem Makro zeilen ein- und ausblenden mit nur einer Schaltfläche?

Public Sub Zeilen_ausblenden()
Application.ScreenUpdating = False
For i = 1 To 100
If Cells(i, 1).Value = "" Then
Rows(i).Hidden = True
End If
Next i
Application.ScreenUpdating = True
Range("A1").Select
End Sub


Gruß
Maris

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aus- und einblenden mit einem Steuerelement
29.01.2009 13:24:09
Reinhard
Hi Maris,
evtl. so:

Public Sub Zeilen_ausblenden()
Dim i As Long
Application.ScreenUpdating = False
For i = 1 To 100
Rows(i).Hidden = Cells(i, 1).Value = ""
Next i
Range("A1").Select
Application.ScreenUpdating = True
End Sub


Gruß
Reinhard

Anzeige
AW: Korrektur
29.01.2009 13:30:53
Chris
Servus Reinhard,
dein Makro blendet aber auch nur aus:
Ich denke mal so gehts dann:

Public Sub Zeilen_ausblenden()
Dim i As Long
Application.ScreenUpdating = False
For i = 1 To 100
Rows(i).Hidden = Cells(i, 1).Value = "" = Not Rows(i).Hidden
Next i
Range("A1").Select
Application.ScreenUpdating = True
End Sub


Gruß
Chris

Anzeige
AW: Korrektur
29.01.2009 13:43:00
Maris
klappt wunderbar! Danke!!!!
AW: Korrektur
29.01.2009 13:48:39
Reinhard
Hallo Chris,
nein, mein Makro blendet auch ausgeblendete Zeilen wieder ein wenn in Ax was steht.
Gruß
Reinhard
AW: @Reinhard
29.01.2009 13:54:00
Chris
Servus Reinhard,
das ist korrekt, aber es sollen ja die Zeilen eingeblendet werden, die vorher ausgeblendet wurden (Bedingung = ""), also werden diese Zeilen nicht mehr eingeblendet, weil ja die Zelle leer ist.
Somit werden in diesem Fall nur Zeilen ausgeblendet.
Gruß
Chris
Anzeige
AW: Aus- und einblenden mit einem Steuerelement
29.01.2009 14:26:00
D.Saster
Hallo,
nimm einen ToggleButton.

Private Sub ToggleButton1_Click()
Dim i As Long
Application.ScreenUpdating = False
For i = 1 To 100
Rows(i).Hidden = Cells(i, 1) = "" And ToggleButton1
Next i
ToggleButton1.Caption = IIf(ToggleButton1, "einblenden", "ausblenden")
Range("A1").Select
Application.ScreenUpdating = True
End Sub


Gruß
Dierk

Anzeige

Forumthreads zu verwandten Themen

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
Spalten ein und ausblenden
Marion65

Hallo zusammen, ich habe hier eine ExcelTabelle welche zum Ein- und Ausblenden der Spalten kleine + bzw. - Zeichen hat. Wie kann ich diese selber erstellen? Vielen Dank, Marion. https://www.herber.de/bbs/user/55401.xls
15.09.2008 20:09:56
Thread-ID: 1009885
4 Beiträge
Anzeige
Dateien aus- und einblenden
StKr69

Guten Morgen liebes Forum,
ich habe das Problem, gleichzeitig mehrere Dateien offenhalten zu müssen.
Um den Überblick nicht völlig zu verlieren, blende ich Dateien aus und sobald ich sie bearbeiten will wieder ein.
Über Fenster/Ein- bzw. Ausblenden kann ich das immer nur für eine Da...
04.12.2008 09:24:00
Thread-ID: 1030046
3 Beiträge
über userform spalten auswählen und kopieren
thomas

hallo zusammen
Leider kenne ich mich nicht so gut mit userforms aus. Vielleicht kann mir jemand weiterhelfen.
Ich habe folgende rießige Exceltabelle.
In der ersten Zeile in Tabellenblatt 1 sind die Überschriften (Spalte A bis CG)
Ab der 2. Zeile Zahlen und Text.
Wenn ich jet...
19.03.2009 22:02:02
Thread-ID: 1061993
7 Beiträge
Spalten mit Makro nach Vorgabe ein und ausblenden
Christoph

Hallo,
will mit Hilfe eines Makros eine bestimmte Anzahl an Spalten ein- bzw. ausgeblendet haben. Habe selbiges mal für Zeilen selbst programmiert:
Sub Zeilenausblenden() Rows("9:209").Hidden = True Rows("9:" & (9 + Range("A4").Value)).Hidden = False End Sub
Für Spalten klapp...
09.04.2009 14:44:26
Thread-ID: 1068032
3 Beiträge
Spalten mit farbigen Zellen ausblenden
Robert

Hallo,
stehe momentan voll auf dem Schlauch und komm nicht weiter.
Könnte Ihr mir bitte helfen?
Ich müsste alle Spalten, in denen eine oder mehrere farbige Zellen sind, ausblenden.
- und das wenn möglich mit VBA.
Vielen Dank schon mal.
Gruß Robert
11.06.2009 19:25:52
Thread-ID: 1080829
3 Beiträge
Spalten zählen und ausblenden
Sophie

Hallo liebe Forum-Leser!
Ich versuche in Excel sowas ähnliches wie MS Project darzustellen (weil das so gewünscht wird, fragt aber nicht warum).
Durch Datumseingabe (für Anfang und Ende des Projekts) will ich nur den Zeitstrahl (in Kalendeswochen) darstellen, so dass man die einzelne Sc...
15.06.2009 19:17:19
Thread-ID: 1081675
9 Beiträge
Anzeige
Lösungsvorschlag Ausblenden bei verbund. Spalten ?
alexander

Hallo,
ich würde vor der eigentlichen Problemstellung gerne erst einmal das zu bearbeitende Projekt beschreiben.
Es handelt es sich hierbei:
http://rapidshare.com/files/258656780/datei.xls.html
um eine Tabelle in der dynamisch über ein Dropdownfeld Spalten ausgeblendet werden s...
23.07.2009 13:13:34
Thread-ID: 1090706
8 Beiträge
Automatisch Spalten ausblenden - mit einem Makro?
Jan

Hallo nochmal!
Ich wurde gerade schon einmal in Weltrekordzeit bei meinem anderen Problem geholfen. Vielen herzlichen dank! Nun stehe ich aber erneut vor einer für mich schwierigen Aufgabe. Folgendes Problem:
Wir sind mehrere Gewerke die an einer Excel Tabelle arbeiten. Die Excel Tabell...
28.07.2009 15:46:49
Thread-ID: 1091988
7 Beiträge
Zeilen/Spaltentausch und Ranking
Holger

Guten Morgen Excel-Experten.
Ich benötige euren Ratschlag bzw. eure Hilfe. Ich habe ein Tabellenblatt als Basis. Dort sind in Spalten Städte und in Zeilen Werte.
In einem zweiten Tabellenblatt soll ein Verweis auf das 1. Blatt, aber die Spalten und Zeilen müssen getauscht sein. Quasi wi...
16.09.2009 11:35:08
Thread-ID: 1103162
3 Beiträge
Anzeige
Spalten aus-einblenden
Fritz

Hallo, kann mir jemand helfen?
Wie kann ich aus ausgeblendeten Spalten gezielt mit einem Dropdownmenü einzelne Spalten wieder einblenden?
So wie bei "Blatt" aus und einblenden.
Für die Hilfe bereits im Voraus vielen Dank
Gruß
Fritz
29.11.2009 19:59:29
Thread-ID: 1120786
2 Beiträge
Nicht benötigte Spalten löschen
Martin

Hallo miteinander
Ich habe eine Excel-Tabelle mit etwa 80 Spalten. In Zeile 1 ist jeweils der Titel der Spalte, z.B. Name, Vorname, Strasse, Ort, Nummer etc.
Für gewisse Auswertungen braucht's jedoch nur einen kleinen Teil der vielen Spalten, alle anderen können gelöscht werden.
Ich...
11.12.2009 15:24:34
Thread-ID: 1123354
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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