Active Cell setzen
04.12.2003 09:04:12
Jan
möchte über folgendes Makro eine Zeile oberhalb eines Formularbuttons einfügen.
Wie setze ich jetzt den Wert für die ActiveCell, so daß dieser dem Wert entspricht, den die MsgBox zurückliefert?
Sub Makro1(Zeile_einfuegen)
With ActiveSheet.Shapes("Button 1")
MsgBox .TopLeftCell.Address
End With
Selection.EntireRow.Insert
End Sub