nach der erfolgreichen Hilfe von gestern (Bestimmte Wiederholungszeilen auf 2.ter Seite ausblenden), möchte ich zwischen meinen festgelegten Wiederholungszeilen auf der 1.ten Seite Leerzeilen ausblenden
Sub Ausdruck()
Dim A As Integer
For A = 1 To 2
Tabelle1.Cells.EntireRow.Hidden = False
'Zeilen die beim zweiten Ausdruck ausgeblendet werden sollen
If A = 2 Then Range("12:31").EntireRow.Hidden = True
'hier die entsprechende Seite anpassen
'1, 1 ist Seite 1 bis 1
Tabelle1.PrintOut A, A
Next A
Tabelle1.Cells.EntireRow.Hidden = False
End Sub
Meine Frage:
Jetzt möchte ich zusätzliche die Zeilen von 12:31 nicht drucken, wenn LEERZELLEN von C12-C31 (Bereich/Tabelle A12-L31 als "Teilnehmerliste" definiert) vorhanden sind, kann man das im o.g. Makro unterbringen, neben der Teilnehmerliste sind noch ausgeblendete Texte hinterlegt, deshalb sollte es sich nicht auf die Zeilen 12:31, sondern auf die Leerzellen beziehen.
Vielen Dank für die Hilfe im Voraus!