ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Opening Access From Excel (https://www.excelbanter.com/excel-discussion-misc-queries/81039-opening-access-excel.html)

Kieron White

Opening Access From Excel
 
I have an excel spreadsheet and I would like to know whether or not it is
possible to open an Access database from excel using VBA?

Any help would be appreciated.

Many thanks,

Kieron White


Ron de Bruin

Opening Access From Excel
 
Hi Kieron

Only open or get information from it into Excel

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Kieron White" wrote in message ...
I have an excel spreadsheet and I would like to know whether or not it is
possible to open an Access database from excel using VBA?

Any help would be appreciated.

Many thanks,

Kieron White




Ron de Bruin

Opening Access From Excel
 
Here do you have a few tips

To open a file

Sub test()
Dim ac As Object
On Error Resume Next
Set ac = GetObject(, "Access.Application")
If ac Is Nothing Then
Set ac = GetObject("", "Access.Application")
ac.OpenCurrentDatabase "C:\OrderDatabase.mdb"
ac.UserControl = True
End If
AppActivate "Microsoft Access"
End Sub


To get info form the file see
http://www.rondebruin.nl/accessexcel.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ron de Bruin" wrote in message ...
Hi Kieron

Only open or get information from it into Excel

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Kieron White" wrote in message ...
I have an excel spreadsheet and I would like to know whether or not it is
possible to open an Access database from excel using VBA?

Any help would be appreciated.

Many thanks,

Kieron White






Kieron White

Opening Access From Excel
 
Ron,

Many thanks for this. It works a treat.

Thank You

"Ron de Bruin" wrote:

Here do you have a few tips

To open a file

Sub test()
Dim ac As Object
On Error Resume Next
Set ac = GetObject(, "Access.Application")
If ac Is Nothing Then
Set ac = GetObject("", "Access.Application")
ac.OpenCurrentDatabase "C:\OrderDatabase.mdb"
ac.UserControl = True
End If
AppActivate "Microsoft Access"
End Sub


To get info form the file see
http://www.rondebruin.nl/accessexcel.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ron de Bruin" wrote in message ...
Hi Kieron

Only open or get information from it into Excel

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Kieron White" wrote in message ...
I have an excel spreadsheet and I would like to know whether or not it is
possible to open an Access database from excel using VBA?

Any help would be appreciated.

Many thanks,

Kieron White








All times are GMT +1. The time now is 01:21 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com