Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1456to1460
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
Inhaltsverzeichnis

Makro: Bestimmte Zeilen ausblenden

Makro: Bestimmte Zeilen ausblenden
06.11.2015 10:11:02
Basti
Hallo zusammen,
ich würde gerne per Button alle Zeilen in einem bestimmten Bereich (Zeilen 8 bis 111) ausblenden, die in Spalte A den Wert -1 haben. Kann mir jemand mit dem zugehörigen Makro helfen?
Gruß Basti

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro: Bestimmte Zeilen ausblenden
06.11.2015 10:14:49
MCO
Hallo!
Probier das mal.
Gruß, MCO
Sub ausblenden()
For zl = 111 To 8 Step -1
If Cells(zl, "A") = "-1" Then
Rows(zl).Hidden = True
End If
Next zl
End Sub

AW: Makro: Bestimmte Zeilen ausblenden
06.11.2015 10:37:26
CK
Hallo Basti,
mehr Code aber schneller ;)
Option Explicit
Sub blendomat()
Dim rngB As Range
Dim intC As Integer
Dim ws As Worksheet
Set ws = ActiveSheet 'anpassen
With ws
For intC = 8 To 111
If .Cells(intC, 1).Value = -1 Then
If rngB Is Nothing Then
Set rngB = .Cells(intC, 1)
Else
Set rngB = Union(rngB, .Cells(intC, 1))
End If
End If
Next
End With
If Not rngB Is Nothing Then
rngB.EntireRow.Hidden = True
End If
Set rngB = Nothing
End Sub

Anzeige
AW: Makro: Bestimmte Zeilen ausblenden
06.11.2015 14:46:16
Basti
Danke!

AW: Makro: Bestimmte Zeilen ausblenden
06.11.2015 14:47:05
Basti
Funktioniert wunderbar. Danke!

Ups, sry Beitrag falsch angehängt__ot
06.11.2015 10:39:54
CK
.

310 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige