Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zeilen ausblenden

Forumthread: Zeilen ausblenden

Zeilen ausblenden
27.03.2007 12:12:15
Max
Hallo Excel-Experten,
ich schildere jetzt mal mein Problem.
Ich will ein Makro schreiben, dass Zeilen ausblendet, wenn in der 3. Spalte #NV steht.
Kann mir da jemand helfen.
Beste Grüsse Max
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zeilen ausblenden
27.03.2007 12:21:34
Max
Hallo,
hab durch googeln und mit meinen bescheidenen Kenntnissen, jetzt mal folgendes Makro geschrieben

Private Sub Worksheet_Activate()
Dim i As Integer
For i = 5 To 32
If Cells(i, 3).Value > "0" Then
Rows(i).EntireColumn.Hidden = False
Else
Rows(i).EntireColumn.Hidden = True
End If
Next
End Sub
Jedoch gibt er mir einen Fehler aus. Die Zeile mit Cells wird dann gelb markiert.
Was mach ich noch falsch.
Gruss Max
Anzeige
AW: Zeilen ausblenden
27.03.2007 12:22:00
mpb
Hallo Max,
unter folgenden Voraussetzungen erledigt das das unten stehende Makro:
1. #NV ist das Ergebnis einer Formelberechnung.
2. Es gibt in der Spalte C keine anderen Fehlermeldungen aufgrund von Formelergebnissen.

Sub Ausblenden()
Columns("C:C").SpecialCells(xlCellTypeFormulas, 16).EntireRow.Hidden = True
End Sub

Anzeige
AW: Zeilen ausblenden
27.03.2007 12:28:00
Rudi
Hallo,

Sub tt()
Dim rng As Range
For Each rng In Range("A1").CurrentRegion.Rows
rng.Hidden = IsError(rng.Cells(1, 3))
Next
End Sub

Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe
AW: Zeilen ausblenden
27.03.2007 12:40:41
mpb
Hallo Rudi,
das setzt aber voraus, dass im relevanten Bereich keine Leerzeilen oder Leerspalten vorhanden sind.
Persönlich finde ich es besser, auf Schleifen zu verzichten, wenn Sie nicht notwendig sind (bessere Performance und eleganter).
Gruß
Martin
Anzeige
AW: Zeilen ausblenden
27.03.2007 13:24:08
Rudi
Hallo,
hast ja recht.
Erst Hirn einschalten, dann posten. ;-)
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige