Try

Dim oapp As Application

Set oapp = CreateObject("Access.Application")

HTH,

>Hello,
>i have Office Dev 2000 install on my PC whit Access runtime
>but i can't create object, is there a nother way whit out using Shell,
>I know that it's working with the full Access version.
>
> Dim acApp As Access.Application
>
> Set acApp = New Access.Application (don't work !)
>
> Tanks
>
> L-A