Hallo,
ich habe eine User-Form erstellt, die mir in einer Listbox alle in einem Diagramm dargestellten Datenreihen anzeigt.
Selektiere ich jetzt die Einträge in der Listbox, so werden die im Worksheet dazugehörigen Spalten ausgeblendet und erscheinen somit auch nicht mehr im Diagramm (die dazugehörige Datenreihe "verschwindet").
Das ganze sieht wie folgt aus:
For i = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(i) Then
ActiveWorkbook.Worksheets(1).Columns(i + 2).Hidden = True
Else
ActiveWorkbook.Worksheets(1).Columns(i + 2).Hidden = False
End If
Next i
Dummerweise dauert das ganze bei 14 Datenreihen recht lange und bei jeder abgearbeiteten Datenreihe "blitzt" der Bildschirm.
Kann ich das vermeiden ?
Danke, Matthias