Excel Debug

calstudent

New Member
Joined
Feb 11, 2019
Messages
1
Having an issue trying to debug someone's work, don't know this style of coding well and so not sure what is wrong here exactly but the error it says is user-defined type not defined, and I tried fixing this by defining it as a different declaration and that didn't work.
' Connect to the Reference Section table
Dim DBConn As ADODB.Connection
Set DBConn = New ADODB.Connection
DBConn.connectionstring = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & m_Database & "; Persist Security Info=False;"
DBConn.Open
 

Some videos you may like

Excel Facts

Can you sort left to right?
To sort left-to-right, use the Sort dialog box. Click Options. Choose "Sort left to right"

Mentor82

Active Member
Joined
Dec 30, 2018
Messages
307
Hi,
I guess it's because you use early binding for declaring DBConn and there might not be set a reference for that. try one of two optooms:
1. In Visual Basic, from the Project menu, select References....
Select Microsoft ActiveX Data Objects x.x Library from the list. Verify that at least the following libraries are also selected:
Visual Basic for Applications
Visual Basic runtime objects and procedures
Visual Basic objects and procedures
OLE Automation
2. Change declararion from early binding to late bindimg declaration as shown below. In this case you no longer need the reference dll set but the disadvantage of that is that the code might work a bit slower and yhe intellisence will not work for late binding.
Let me know if that helped, cause I have not debugged your code because
I'm writing this thread on the mobile.

Code:
Dim DBConn as object
Set DBConn=CreateObject("ADODB.Connection")
 

Watch MrExcel Video

Forum statistics

Threads
1,100,193
Messages
5,473,071
Members
406,845
Latest member
JohnR123

This Week's Hot Topics

Top