Can i make a button on a sheet to ad a row under the row where the button
in is? And by using the same button again another row under the earlier
inserted row? And if possible with auto numbering.

How does that works?

--
Using Opera's revolutionary e-mail client: http://www.opera.com/mail/

If you use a button from the Forms toolbar you can assign this macro to it

Sub test()
Dim Rw As Long
Rw = ActiveSheet.Shapes(Application.Caller).TopLeftCell.Row
End Sub

Rw is the row number of the topleftcell now
See if you can use this

--
Regards Ron de Bruin
http://www.rondebruin.nl



"Dennis" <(E-Mail Removed)> wrote in message newsp.tilzfgdjgj945k@y9a2q7...
> Can i make a button on a sheet to ad a row under the row where the button in is? And by using the same button again another row
> under the earlier inserted row? And if possible with auto numbering.
>
> How does that works?
>
> --
> Using Opera's revolutionary e-mail client: http://www.opera.com/mail/

I can`t get it working. I attached the code to the button but it won`t
work so i do something wrong. How do i assign the macro best to the button?

> If you use a button from the Forms toolbar you can assign this macro to
> it
>
> Sub test()
> Dim Rw As Long
> Rw = ActiveSheet.Shapes(Application.Caller).TopLeftCell.Row
> End Sub
>
> Rw is the row number of the topleftcell now
> See if you can use this
>



--
Using Opera's revolutionary e-mail client: http://www.opera.com/mail/