Laufzeitfehler 13
01.11.2006 08:50:49
oscar
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Value = "Bool" Then
ActiveCell.Columns("A:A").EntireColumn.Select
Selection.EntireColumn.Hidden = True
End If
End Sub
Ich möchte in Abhängigkeit eines Zelleintrags eine Spalte ausblenden. Ich bekomme immer die Meldung Laufzeitfehler 13.
In hoffnungsvoller Erwartung Oscar