Beim Null Wert in der Zelle komplette Zeile nicht drucken
Hallo zusammen,
ich suche nach einer Lösung (gerne auch VBA) für folgenes Problem.
Beispiel:
Wenn z.B.die Zellen D2, D6, D10 einen Nullwert aufweisen, dann soll beim Drucken die Zeilen 2, 6 und 10 automatisch ausgebleden werden.
Umstädlich kann man immer wieder mit dem Filter machen, indem "0" ausgebledet wird.
Vielen Dank im Voraus
ich suche nach einer Lösung (gerne auch VBA) für folgenes Problem.
Beispiel:
Wenn z.B.die Zellen D2, D6, D10 einen Nullwert aufweisen, dann soll beim Drucken die Zeilen 2, 6 und 10 automatisch ausgebleden werden.
Umstädlich kann man immer wieder mit dem Filter machen, indem "0" ausgebledet wird.
Vielen Dank im Voraus
Please also mark the comments that contributed to the solution of the article
Content-Key: 289114
Url: https://administrator.de/contentid/289114
Printed on: April 27, 2024 at 04:04 o'clock
6 Comments
Latest comment
Sub LeerAusblenden()
Dim f As Range
With ActiveSheet.Range("D:D")
Set f = .Find(0, LookIn:=xlValues, LookAt:=xlWhole)
If Not f Is Nothing Then
Do
f.EntireRow.Hidden = True
Set f = .FindNext(f)
Loop While Not f Is Nothing
End If
End With
End Sub
Naja starten musst du das Makro schon Geht problemlos ...
Willst du das vor dem Druck automatisch ausführen lassen musst du folgenden Code in den Workbook-Codeabschnitt einfügen:
http://we.tl/fklbXU1kFO
Willst du das vor dem Druck automatisch ausführen lassen musst du folgenden Code in den Workbook-Codeabschnitt einfügen:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
LeerAusblenden
End Sub
Sub LeerAusblenden()
Dim f As Range
With ActiveSheet.Range("D:D")
Set f = .Find(0, LookIn:=xlValues, LookAt:=xlWhole)
If Not f Is Nothing Then
Do
f.EntireRow.Hidden = True
Set f = .FindNext(f)
Loop While Not f Is Nothing
End If
End With
End Sub
http://we.tl/fklbXU1kFO
Zitat von @winget:
Was ich eigentlich suche, ist eine Lösung, die nur beim Drucken startet.
d.H. Wenn ich den Druck-Button betätige, soll den Bereich wie oben ausgebledet werden. Aber nur für den Druck. Der Bereich soll nicht ausgebledet bleiben (nach dem Druck).
Kannst du ja hinterher sofort wieder einblenden, auch via Code ...Was ich eigentlich suche, ist eine Lösung, die nur beim Drucken startet.
d.H. Wenn ich den Druck-Button betätige, soll den Bereich wie oben ausgebledet werden. Aber nur für den Druck. Der Bereich soll nicht ausgebledet bleiben (nach dem Druck).