VBA Problem
01.06.2018 04:37:43
Stephen
Ich habe folgenden Code adaptiert um damit Spalten auszublenden:
Private Sub ShowHideStephen_Click()
Dim MyC As String
MyC = "G"
If ShowHideStephen.Value Then
Application.ActiveSheet.Columns(MyC).Hidden = True
Else
Application.ActiveSheet.Columns(MyC).Hidden = False
End If
End Sub
Soweit so gut, aber ich möchte mehrere nicht zusammenhängende Spalten gleichzeitig mittels TooggleButton ausblenden. Wenn ich so versuche;
MyC = "A;G;X;Y" oder mit "A,G,X,Y" bekomme ich einen Laufzeitfehler "13": Typenunverträglich
Wie mache ich das richtig?
Beste Grüsse
Stephen