Hi,
Can anyone please help. I am trying to create an Excel worksheet that will have a number of ActiveX controls on it including combo boxes that I would like to be populated with data in tables in an access 97 database.
Here is what I have attempted so far. I'm afraid I don't know if this is even close to being what I need to write:
Dim rs As Recordset
Dim strsql As String
Dim db As Database
Dim rsDatabasePath As String
Dim objAccess As New Access.Application
rsDatabasePath = "V:\Marketg\IM\Projects\ProductChange\ProductChangeDB28102003.mdb"
objAccess.OpenCurrentDatabase (rsDatabasePath)
Set db = "objAccess"
strsql = "SELECT [ProdID] FROM [Products]"
Set rs = db.OpenRecordset(strsql)
I don't even know if this was right how then I can populate my combo box using this recordset.
Any Help would be very much appreciated.
Pete
Can anyone please help. I am trying to create an Excel worksheet that will have a number of ActiveX controls on it including combo boxes that I would like to be populated with data in tables in an access 97 database.
Here is what I have attempted so far. I'm afraid I don't know if this is even close to being what I need to write:
Dim rs As Recordset
Dim strsql As String
Dim db As Database
Dim rsDatabasePath As String
Dim objAccess As New Access.Application
rsDatabasePath = "V:\Marketg\IM\Projects\ProductChange\ProductChangeDB28102003.mdb"
objAccess.OpenCurrentDatabase (rsDatabasePath)
Set db = "objAccess"
strsql = "SELECT [ProdID] FROM [Products]"
Set rs = db.OpenRecordset(strsql)
I don't even know if this was right how then I can populate my combo box using this recordset.
Any Help would be very much appreciated.
Pete