Fehler bei "Range"
28.02.2003 10:29:21
Andreas
hab ein kleines problem,
dieser Code macht mir an der Stelle "Range" einen Fehler, hab aber keine Ahnung warum.
Private Sub CommandButton2_Click()
Sheets("Ausschnitte").Range("A65000").End(xlUp).Offset(1, 0).Select
ActiveCell = "Innenkontur"
ActiveCell.Offset(1, 0) = "Rund"
ActiveCell.Offset(2, 0) = TextBox5
ActiveCell.Offset(6, 0) = (TextBox5 * 3.1415)
End Sub
Vieleicht wisst Ihr dass ja.
Gruß
Andreas