THIS ONE WORKS!!!!!!
I've played around with it, but for some reason, this one does it.
Thanks for all your help.

Sub ShowForm()
Range("AS1").Select
ActiveSheet.ShowDataForm
End Sub



"ufo_pilot" wrote:

Hello all
I am trying to have the Data Form show upon a click of a button so that a
list can be updated, but the codes below do not seem to work.
Is it possible to have the ready made Form in Data Form
pop up with a code?

Sub ready()
Range("AS1").Select
frmDataForm.Show
End Sub

Thanks a bunch in advance











Sub ready()
Range("AS1").Select
ActiveSheet.ShowDataForm
End Sub