Display a Data form

Hi All,

I have a database with a few hundred records. I can display the Data Form using Excel but receive the following error when I try display the DataForm with VBA? "ShowDataForm method of Worksheet class failed"

Sub DisplayDataForm()
    Sheets("Data").Activate
    Range("A4").Select
    ActiveSheet.ShowDataForm
End Sub

Thank You