Ich brauche mal wieder etwas Hilfe von euch.
Ich hab hier ein kleines Makro, das viel zu langsam läuft.
Kann es mir jemand umschreiben?
If TextBox29 "" Or TextBox39 "" Or TextBox49 "" Then Sheets("Liste Gruppe").Range("D10") = 1 _
Else Sheets("Liste Gruppe").Range("D10") = ""
If TextBox30 "" Or TextBox40 "" Or TextBox50 "" Then Sheets("Liste Gruppe").Range("D11") = 2 _
Else: Sheets("Liste Gruppe").Range("D11") = ""
If TextBox31 "" Or TextBox41 "" Or TextBox51 "" Then Sheets("Liste Gruppe").Range("D12") = 3 _
Else Sheets("Liste Gruppe").Range("D12") = ""
If TextBox32 "" Or TextBox42 "" Or TextBox52 "" Then Sheets("Liste Gruppe").Range("D13") = 4 _
Else: Sheets("Liste Gruppe").Range("D13") = ""
If TextBox33 "" Or TextBox43 "" Or TextBox53 "" Then Sheets("Liste Gruppe").Range("D14") = 5 _
Else Sheets("Liste Gruppe").Range("D14") = ""
Schon mal vielen Dank und
Gruss Werner
PS. Kann ev. erst morgen abend Antworten!