Live-Forum - Die aktuellen Beiträge
Datum
Titel
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
25.04.2024 21:06:05
Duplikate entfernen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
892to896
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
892to896
892to896
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ein/Ausblenden von Zeilen

Ein/Ausblenden von Zeilen
09.08.2007 07:49:00
Zeilen
Moinsen!
Ich möchte gern mittels einer Schaltfläche ausgewählte Zeilen ein/ oder entsprechend ausblenden können. Dabei möchte ich nicht alle Zeilenbereiche einzeln auswählen, sondern möchte den Bereich festlegen - z.B.:
Ab Zeile 10 bis Zeile 250 sollen jeweils alle 1+2 Zeilen ein/ausgeblendet werden und nur die jeweils dritte Zeile bleibt erhalten. Also konkret:
Ausblenden: Zeile 10+11, 13+14 usw.
Sichtbar: Zeile 12, 15 usw.
Wie gehe ich dieses Problem am besten an? Danke schon mal im Voraus!
Timmi

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ein/Ausblenden von Zeilen
09.08.2007 07:52:00
Zeilen
Auch Moin,
mit dem Makrorekorder der ganzen Vorgang aufzeichnen und das so enstandene Makro einer Schaltfläche zuordnen.
Gruß
Klaus

AW: Ein/Ausblenden von Zeilen
09.08.2007 08:04:28
Zeilen
Hallo Klaus.
Ja, das kann ich natürlich machen. Aber ich möchte ja die ganzen Zeilen nicht alle manuell auswählen - würde gerne einen Code haben, der ist innerhalb des Intervalls automatisiert. Also in einem vorgegebem Intervall jeweils nur noch die 3ten Zeilen sichtbar lässt. Bei erneutem Klick auf die Schattfäche sollen diese dann wieder komplett eingeblendet werden.

AW: Ein/Ausblenden von Zeilen
09.08.2007 08:08:00
Zeilen
Hey Hajo.
Ich kann die Seite nicht öffnen. Leider! Sobald ich an die Datei komme irgendwie, gebe ich ein Feedback, ob es mir weiterhilft.

AW: Ein/Ausblenden von Zeilen
09.08.2007 08:10:13
Zeilen
Hallo Timmi,
sind Zip Dateien an Deinem Rechner blockiert?
Gruß Hajo

AW: Ein/Ausblenden von Zeilen
09.08.2007 08:13:04
Zeilen
Ja - ich darf auf die Seite quasi nicht zugreifen. Versuche aber gerade in der EDV jemanden zu kriegen, dass die es mir laden.

AW: Ein/Ausblenden von Zeilen
09.08.2007 08:10:00
Zeilen
Hi Timmi
Vielleicht so:

Sub AusEin()
Dim liZeile As Integer, liZaehler As Integer
Application.ScreenUpdating = False
With ActiveSheet
For liZeile = 10 To 250
liZaehler = liZaehler + 1
If liZaehler  3 Then
If .Rows(liZeile & ":" & liZeile).EntireRow.Hidden = False Then
.Rows(liZeile & ":" & liZeile).EntireRow.Hidden = True
Else
.Rows(liZeile & ":" & liZeile).EntireRow.Hidden = False
End If
Else
liZaehler = 0
End If
Next
End With
Application.ScreenUpdating = True
End Sub


Trage diesen Code in ein allgemeines Modul ein, und weise das Makro deiner Schaltfläche zu, die sich in DEM Tabellenblatt befinden muss, in dem du die Zeilen aus/einblenden willst.
Konnte ich helfen?
Ciao
Thorsten

Anzeige
AW: Ein/Ausblenden von Zeilen
09.08.2007 08:17:00
Zeilen
Hallo Torsten.
Ja, super. So etwas meinte ich. Funktioniert bestens. DANKE!

Etwas kürzer...
09.08.2007 09:13:00
Renee
Hi Timmi,

Sub HideUnhide()
Const lFrom = 10: Const lTo = 250: Const lEvery = 3
Dim lCnt As Long
Application.ScreenUpdating = False
For lCnt = lFrom To lTo
If lCnt Mod lEvery > 0 Then ActiveSheet.Rows(lCnt).EntireRow.Hidden = _
Not (ActiveSheet.Rows(lCnt).EntireRow.Hidden)
Next lCnt
End Sub


Greetz Renee (c/o TrashSoft...)

Oder ganz ohne IF
09.08.2007 09:22:30
Renee
Einen hab ich noch...

Sub HideUnhide()
Const lFrom = 10: Const lTo = 250: Const lEvery = 3
Dim lCnt As Long
Application.ScreenUpdating = False
For lCnt = lFrom To lTo
ActiveSheet.Rows(lCnt).EntireRow.Hidden = _
Not (ActiveSheet.Rows(lCnt).EntireRow.Hidden) = (lCnt Mod lEvery > 0)
Next lCnt
End Sub


Greetz Renee

Anzeige
AW: Oder ganz ohne IF
09.08.2007 09:39:28
Timmi
Danke! Super Unterstützung hier!

300 Forumthreads zu ähnlichen Themen

Löschen von Zeilen unter 1 Bedingung
Zeilen

Hallo,
ich habe in einer Excel Liste Produkte geführt, die den aktuellen Lagerbestand anzeigen.
Dort werden auch die Produkte aufgeführt, deren Produkte einen Lagerbestand von 0 haben.
Der Lagerbestand wird in Spalte B aufgeführt, die Produkte stehen in Spalte A. Der Datenbereich b...
08.08.2008 20:15:00
Thread-ID: 1000407
5 Beiträge
Anzeige
Formel immer nur in bestimmter Zelle
Katrin

Hallo Zusammen!
Folgendes Problem würde ich gerne lösen, weiß aber nicht wie :)
Ich habe in Spalte A in jeder Zeile Uhrzeiten stehen:
00:15:00
00:30:00
00:45:00
01:00:00
01:15:00
01:30:00
01:45:00
02:00:00
02:15:00
02:30:00
02:45:00
...
02.09.2008 10:30:00
Thread-ID: 1006672
3 Beiträge
Zeile ausblenden, wenn in einer Zelle ein bestimmt
Jakob

Hallo,
Ich habe folgendes Problem:
Ich möchte in den Tabellenblatt "Form3" die zeilen 39-50 ausblenden wenn die Zelle A37 ungleich "Pentax" und "Ciclox" ist. Der Wert der Zelle A37 kommt aus der Eingabe im Tabellenblatt "Eingabemaske" (B7).
Wie müßte der entsprechende VBA-Code ausse...
03.09.2008 17:24:21
Thread-ID: 1007176
6 Beiträge
Anzeige
Zeilen ausblenden wenn...
Andreas

Hi,
ich habe ein kleines Problem. Auf meinem Excel-Blatt sind von B4:B200 Datumswerte im Format TT.MM.JJJJ eingetragen. In der Zelle A1 gebe ich nun beispielsweise Januar ein. Ich will nun, dass alle Zeilen ausgeblendet werden, die nicht in der Spalte B ein Januar-Datum eingetragen haben. D...
04.09.2008 20:18:36
Thread-ID: 1007507
10 Beiträge
in einer Spaöte leere Zellen ausblenden
medion53

Hallo, vielleicht kann mir jemand helfen...
Ich habe eine Tabelle A, gefüllt mit Werten bzw Formeln, die Tabelle A verwende ich als Liste für Datengültigkeit. leider bekomme ich die Leerzellen nicht weg...habe gegoogelt und eine Formel gefunden.
http://www.excelformeln.de/formeln.html...
05.09.2008 10:40:00
Thread-ID: 1007607
7 Beiträge
bestimmte Zeilen per Makro ausblenden
Fritz_W

Hallo Forumsbesucher,
ich bitte die VBA-Kundigen unter euch um Hilfe.
Mit welchem Makro kann ich in einer geöffneten Tabelle alle Zeilen ausblenden, in denen in Spalte B ein Datumseintrag steht, der vor dem jeweils heutigen Tag liegt?
Vielen Dank für eure Hilfe
mfg
Fritz
05.09.2008 10:57:00
Thread-ID: 1007611
3 Beiträge
Formel in Zelle per VBA einfügen
Werner

Wie kann ich Statistikformeln (Mittelwert, Maximum, Minimum, Standardabweichung) per VBA in eine Zelle einfügen?
Der zu berechnende Bereich geht von "$J$1" bis "$J$n" wobei n mit ActiveCell.Row-2 zuvor berechnet wird.
Gruß Werner.
10.09.2008 14:17:46
Thread-ID: 1008801
5 Beiträge
Leere(nur Formel drin) Zellen in Diagramm
Volker

Hallo,
ich habe ein Problem und hoffe auf Eure Hilfe!
Ich habe mit Excel2007 (wahrscheinlich besteht das Problem auch in anderen Versionen) ein Diagramm erstellt. Es werden dabei 2 Datenreihen angezeigt. Soweit so gut...
Reihe 1 bildet sich aus 10 Werten, von denen der erste Teil vo...
25.09.2008 16:11:00
Thread-ID: 1012372
6 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
13
2
5
7
9
6
2
4
5
10
9
3
5
2
6
3
2
6
2
5
5
7
8
5