ich habe folgendenes Sub:
Sub neu()
If Cells(5, 3) > Cells(5, 19) And Cells(5, 3) Cells(5, 20) And Cells(5, 3) Cells(5, 21) Then
Shapes("3").Visible = False
Shapes("2").Visible = False
Shapes("1").Visible = True
End If
End Sub
Von der Zelle B5 bis B16 (Cells(5, 2) bis Cells(16,2)) stehen die Monate (Januar, Februar, ... , Dezember)Ich möchte nun, dass Subb erweitern und zwar soll Excel nach jedem Monat in die nächste Zeile springen.
D.h. man müsste für jede im obigen Beispiel auftauchender "5" (=die Zeile vom Januar) einen Parameter erzeugen.
Ich freue mich auf eine Hilfe
LG Naklov