Button to call ext file

Nora · Oct 3, 2015

Hi Experts!

I would like to know how can I open another ms access file with a click of a button using macro (of course in the current db). :banghead:

arnelgp · Oct 3, 2015

i don't know with macro but through code, yes.

Nora · Oct 4, 2015

Hi arnelgp

Please share with me the code. Thanks in advance...

Anyway, at the moment, I tried with hyperlink. It works fine but security message keeps popping up...

arnelgp · Oct 4, 2015

put this in a Class Module and name the class clsAccess:

Code:

Option Compare Database
Option Explicit

Private objAccessApplication As Access.Application

Private Sub Class_Initialize()
    Set objAccessApplication = New Access.Application
End Sub

Public Sub OpenDatabase(Optional ByVal sDatabase As String)

    With objAccessApplication
        If sDatabase <> "" Then .OpenCurrentDatabase sDatabase, False
        .Visible = True
    End With
    
End Sub

Private Sub Class_Terminate()

    If objAccessApplication Is Nothing Then
        objAccessApplication.Quit
        Set objAccessApplication = Nothing
    End If
    
End Sub

to use create a public function in a module

Code:

Private objAccess As clsAccess

Public Function fnOpenDataBase(Byval sDatabase as string)

    set objAccess = New clsAccess
    objAccess.OpenDatabase sDatabase

End Function

sDatabase is the complete path and name (including ext) of the database you want to open.
Now you can run the function in a macro, or directly through VBA.
to run in macro, use RunCode: fnOpenDatabase("yourDatabasefile").

Nora · Oct 4, 2015

Hi arnelgp

Thanks! I will try and update here on the results.

HiTechCoach · Oct 5, 2015

Nora said:
Hi arnelgp

Please share with me the code. Thanks in advance...

Anyway, at the moment, I tried with hyperlink. It works fine but security message keeps popping up...

The security warnings can easily be turned off.

The best solution depends on what you are trying to do.

Will you keep both databases opened?

Nora · Oct 6, 2015

Hi TechCoach!

Yes both db open. I did go thru all the settings but, security notices keep on coming

HiTechCoach · Oct 6, 2015

Nora said:
Hi TechCoach!

Yes both db open. I did go thru all the settings but, security notices keep on coming

When following a hyperlink the security settings are actually in the Interest Options. You will need to add a LAN location to your Intranet Zones.

Youtube video: Adding LAN location to your Intranet Zones

Nora · Oct 6, 2015

Thank you TechCoach.

I will set up my Int Opt. But, if I'm sharing the files with others, they too have to set up their Internet Options, am I right?

HiTechCoach · Oct 7, 2015

Nora said:
Thank you TechCoach.

I will set up my Int Opt. But, if I'm sharing the files with others, they too have to set up their Internet Options, am I right?

Yes you will have to set it for each user profile on each PC just like you would trusted locations.

If you are using Active Directory you could push the settings.

Nora · Oct 7, 2015

Thank you

HiTechCoach · Oct 9, 2015

I forgot to mention the method I prefer to use.

I find it best to use the ShelExec API to open the files.

Here is an example, with code you can use, of how it works: Document Links (Click Here)

The ShelExec API avoids the issues caused by using FollowHyperlink with files. I find it best to only use FollowHyperlink with actual web site URLs.

Button to call ext file

Nora

Registered User.

arnelgp

..forever waiting... waiting for jellybean!

Nora

Registered User.

arnelgp

..forever waiting... waiting for jellybean!

Nora

Registered User.

HiTechCoach

Well-known member

Nora

Registered User.

HiTechCoach

Well-known member

Nora

Registered User.

HiTechCoach

Well-known member

Nora

Registered User.

HiTechCoach

Well-known member

Similar threads

Users who are viewing this thread