VBA vereinfachen?
21.08.2018 09:41:15
ulki031
Ich bin es noch mal.
Kann es sein, dass paar Makros in meinen Worksheets mein Excel ständig überfordern und zum Absturz bringen?
Ich hab ca. 60 Checkboxen die, wenn sie angeclickt oder verändert werden auf einem zweiten Tabellenblatt Spalten aus oder eingeblendet.
Für jede der Checkboxen habe ich eine Code der so ähnlich wie dieser hier aussieht:
Private Sub CheckBox1_Change()
ThisWorkbook.Worksheets("Punktesystem").CheckBox1.Value = ThisWorkbook.Worksheets("Checkliste") _
.Rows("20:21").Hidden
ThisWorkbook.Worksheets("Punktesystem").CheckBox1.Value = False = ThisWorkbook.Worksheets(" _
Checkliste").Rows("20:21").Hidden = True
End Sub
Kann man das noch irgendwie vereinfachen so dass mein Excel nicht ständig stirbt sobald ich auch nur eine Box anklicke?Vielen Dank schon mal...bin echt am verzweifeln.
:(
Lg Ulli