opening access database using macro

[rtphilips]

Hi

I have a access database "test.mdf"

While running a macro I want to open this database

Please provide some solution

Thanks

[Zack Barresse]

Hi there,

You can use the FollowHyperlink method, it will work for almost any program.
An example would look like ...


Option Explicit
Sub testingAccess()
Dim strPath As String, strName As String

'Change as desired..
strPath = "C:\YourFullPathNameHere\"
strName = "test.mdb"

On Error GoTo ExitSpot
ActiveWorkbook.FollowHyperlink strPath & strName, NewWindow:=True
Exit Sub

ExitSpot:
MsgBox Err.Description
End Sub


HTH

--
Regards,
Zack Barresse, aka firefytr, (GT = TFS FF Zack)



"rtphilips" <[email protected]> wrote
in message news:[email protected]...
>
> Hi
>
> I have a access database "test.mdf"
>
> While running a macro I want to open this database
>
> Please provide some solution
>
> Thanks
>
>
> --
> rtphilips
> ------------------------------------------------------------------------
> rtphilips's Profile:
> http://www.excelforum.com/member.php...o&userid=28114
> View this thread: http://www.excelforum.com/showthread...hreadid=476234
>

[code_hungry]

I have been looking for a "fit all" solution to opening files. I work in a
place where drive letters change depending on the department, so I have to
code for server paths. So far I have only been able to get huge amounts of
code to open an Office app within a diferent Office path. Yours was the
simpliest and the best.

Thanks. High Rating for you dude!!!
--



"Zack Barresse" wrote:

> Hi there,
>
> You can use the FollowHyperlink method, it will work for almost any program.
> An example would look like ...
>
>
> Option Explicit
> Sub testingAccess()
> Dim strPath As String, strName As String
>
> 'Change as desired..
> strPath = "C:\YourFullPathNameHere\"
> strName = "test.mdb"
>
> On Error GoTo ExitSpot
> ActiveWorkbook.FollowHyperlink strPath & strName, NewWindow:=True
> Exit Sub
>
> ExitSpot:
> MsgBox Err.Description
> End Sub
>
>
> HTH
>
> --
> Regards,
> Zack Barresse, aka firefytr, (GT = TFS FF Zack)
>
>
>
> "rtphilips" <[email protected]> wrote
> in message news:[email protected]...
> >
> > Hi
> >
> > I have a access database "test.mdf"
> >
> > While running a macro I want to open this database
> >
> > Please provide some solution
> >
> > Thanks
> >
> >
> > --
> > rtphilips
> > ------------------------------------------------------------------------
> > rtphilips's Profile:
> > http://www.excelforum.com/member.php...o&userid=28114
> > View this thread: http://www.excelforum.com/showthread...hreadid=476234
> >
>
>
>

[Zack Barresse]

Glad I could help you there.

Thanks for the note.

--
Regards,
Zack Barresse, aka firefytr, (GT = TFS FF Zack)



"code_hungry" <[email protected]> wrote in message
news:[email protected]...
>I have been looking for a "fit all" solution to opening files. I work in a
> place where drive letters change depending on the department, so I have to
> code for server paths. So far I have only been able to get huge amounts of
> code to open an Office app within a diferent Office path. Yours was the
> simpliest and the best.
>
> Thanks. High Rating for you dude!!!
> --
>
>
>
> "Zack Barresse" wrote:
>
>> Hi there,
>>
>> You can use the FollowHyperlink method, it will work for almost any
>> program.
>> An example would look like ...
>>
>>
>> Option Explicit
>> Sub testingAccess()
>> Dim strPath As String, strName As String
>>
>> 'Change as desired..
>> strPath = "C:\YourFullPathNameHere\"
>> strName = "test.mdb"
>>
>> On Error GoTo ExitSpot
>> ActiveWorkbook.FollowHyperlink strPath & strName, NewWindow:=True
>> Exit Sub
>>
>> ExitSpot:
>> MsgBox Err.Description
>> End Sub
>>
>>
>> HTH
>>
>> --
>> Regards,
>> Zack Barresse, aka firefytr, (GT = TFS FF Zack)
>>
>>
>>
>> "rtphilips" <[email protected]>
>> wrote
>> in message news:[email protected]...
>> >
>> > Hi
>> >
>> > I have a access database "test.mdf"
>> >
>> > While running a macro I want to open this database
>> >
>> > Please provide some solution
>> >
>> > Thanks
>> >
>> >
>> > --
>> > rtphilips
>> > ------------------------------------------------------------------------
>> > rtphilips's Profile:
>> > http://www.excelforum.com/member.php...o&userid=28114
>> > View this thread:
>> > http://www.excelforum.com/showthread...hreadid=476234
>> >
>>
>>
>>