makro kopieren ?
17.08.2004 17:37:51
dieter-j
ich habe ein makro (es geht auch), das ich mit der rechten maustaste -code anzeigen- am tabellenblattreiter öffne.
Immer wenn ich die datei kopiere, wird dieses makro nicht mitkopiert. Wie kann ich das ändern? Wenn ich "code anzeigen"
klicke , öffnet sich das fenster und links steht "worksheet" rechts "change"
der text
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "H15" And [H15] = "x" Then
[d28:q28] = "e"
ElseIf Target.Address(0, 0) = "H15" And [H15] <> "x" Then
[d28:q28].ClearContents
End If
If Target.Address(0, 0) = "I15" And [i15] = "x" Then
[d33:q33] = "e"
ElseIf Target.Address(0, 0) = "I15" And [i15] <> "x" Then
[d33:q33].ClearContents
End If
End Sub
danke und gruss
dieter