Ereignismakro will nicht
24.11.2004 10:54:25
Heinz
ich habe eine Workbook_Open-Prozedur in einer Vorlage stehen.
Diese funktioniert im Prinzip auch normal.
Wenn ich jedoch nachstehendes - einfaches - Makro laufen lasse, funktioniert danach das mit Worbook_Open nicht mehr, d.h. wenn ich eine neue Kopie dieser Vorlage öffne.
Ich bin ratlos.
Sub Test()
Dim s%, lz%
s = ActiveCell.Column
lz = ActiveSheet.Cells(Rows.Count, s).End(xlUp).Row
If lz > 5 Then
With ActiveSheet.Cells(1, s)
.Value = ActiveSheet.Name
.Font.Bold = True
End With
' ... weiterer Code
End If
End Sub
Danke für Eure Bemühungen
Heinz
Anzeige