Can't Set object

A

augustus

Hi,

THis is my code:

Private Sub Document_Open()
Dim strSQL As String, strColumnLocation As String
Dim objCbx As ComboBox

strSQL = "SELECT JobNo FROM [JobNo_JobName$]"
Set objCbx = ThisDocument.cbxJob 'cbxJob, a combobox on
ThisDocument
Call Module1.LoadDatabase(objCbx, "JobNo", strSQL)

End Sub

but I can't set objCbx, I get nothing. Could someone tell me how to Set the
object?

Regards
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Passing object as parameter 3
Word macro that can call cells out of Excel for a find and replace 0
Closing PDF file from Excel VBA (Adobe Reader, Adobe Acrobat, Browser) 0
VBA works in orignal but fails in copy of database 1
VBA Coding Help for Beginner 0
VBA - exporting serial letters to single documents 0
Switchboard & functions 3
export excel data to access table using ADO 0

Top