Data Forms

I dont know if i am posting this in the correct forum but here it goes. My code reads like this

Sub()
      ActiveSheet.ShowDataForm
End Sub

This works great but it always goes to the last entry that i put in using the form. What i would like it to do is always start with a new entry instead of having the user have to press the new button on the Data Form.

Just wondering if this is possible

umrebelfan69