Re: Makro stop
10.04.2002 11:42:30
Uwe
Versuch mal:
Makro:Sub Rechnung()
On Error goto ende
Cells.Select
Application.Dialogs(xlDialogFormulaFind).Show
Cells(ACTIVECELL.Row, 1).Formula = Date
Cells(ACTIVECELL.Row, 1).Select
ende:
End Sub