Access data form through command button

[aet-inc]

Hi:

Can anyone please let me know if its possible to have a command button
cause the data form to appear?

Thank you in advance for your help.

 

[Ron de Bruin]

Try this

Range("A1").Select
ActiveSheet.ShowDataForm

 

[Tom Ogilvy]

Private Sub Commandbutton1_Click()
me.ShowDataForm
End Sub

If you data isn't in the first two rows (for example the top left cell of
the data was D20 and the data table was offset by at least one blank
row/column all around)


Private Sub Commandbutton1_Click()
me.Range("D20").CurrentRegion.Name = "Database"
me.ShowDataForm
End Sub


--
Regards,
Tom Ogilvy

Hi:

Can anyone please let me know if its possible to have a command button
cause the data form to appear?

Thank you in advance for your help.


------------------------------------------------



~~Now Available: Financial Statements.xls, a step by step guide to

creating financial statements