Herbers Excel-Forum - das Archiv

Hilfe: Makro mit Endlosschleife?

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Hilfe: Makro mit Endlosschleife?
von: Rainer Bär

Geschrieben am: 20.04.2005 10:45:04
Hallo Community,
ich habe für folgende Aufgabe testweise ein Makro geschrieben (siehe Anlage):
Immer wenn in der Zeile keine Werte stehen, sollen diese ausgeblendet werden. Das Makro funktioniert soweit auch, nur das beim Aufrufen der Datei, der Bildschirm zum "Zittern" anfängt und nach Ausführung das Makro immer weiterlaufen zu scheint. Es muß sowhl vor wie auch nach Ausführung immer über ESC abgebrochen werden. Woran liegt es?
Vielen Dank schon im voraus.
Grüße
Rainer
https://www.herber.de/bbs/user/21399.xls
Bild

Betrifft: AW: Hilfe: Makro mit Endlosschleife?
von: Rolf Beißner

Geschrieben am: 20.04.2005 11:45:00
Hallo Rainer,
versuch's mal mit dem Click_Ereignis
deiner ComboBox
fG
Rolf
Private Sub ComboBox1_click()
Dim Zelle
For Each Zelle In Range("b5:b11")
If Zelle.Value < 1 Then
Zelle.EntireRow.Hidden = True
Else
Zelle.EntireRow.Hidden = False
End If
Next
End Sub

Bild

Betrifft: AW: Hilfe: Makro mit Endlosschleife?
von: Rainer Bär
Geschrieben am: 20.04.2005 11:59:58
Hallo Rolf,
vielen Dank für die schnelle Hilfe, mit Deinem Makro funktioniert alles perfekt.
Dieses Forum ist einfach Gold wert!!!!
Grüße
Rainer
 Bild