Makro momentan stoppen
04.03.2008 07:51:00
serge
ich habe mir ein Makro gebaut das verhindert mehr als eine Spalte zu bearbeiten:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row >= 11 And Target.Column >= 4 Then
If Selection.Columns.Count > 1 Then
ActiveCell.Select
MsgBox ("Auswahl nur aus einer Spalte, bzw. einem Tag möglisch!")
End If
Dim cmt As Comment
For Each cmt In ActiveSheet.Comments
cmt.Visible = False
Next cmt
If Not Target.Comment Is Nothing Then
Target.Comment.Visible = True
End If
End If
End Sub
Jetzt möchte ich periodisch die Tabelle leeren und neu formatieren. Wie kann ich ich meine Einschränkung momentan ein dem neuen Makro ausschalten?
Danke für die Hilfe
Serge