Excel vba source control

• 
• VBForums
• Visual Basic
• Visual Basic 6 and Earlier
• Setting a comboBox’s controlSource in EXCEL *RESOLVED*

1. Feb 18th, 2004, 07:17 PM

   
   

   #1

   

   Thread Starter

   
   Lively Member
   

   

   

   ---

   Setting a comboBox’s controlSource in EXCEL *RESOLVED*
   

   I am doing some VBA in excel, and a comboBox on my form. How to i set the source of the combo box to a list of cells on my spreadsheet? I’m not sure how to format the value for the Combo.ControlSource. Any help? THanks.

   Last edited by Daniel McCool; Feb 19th, 2004 at 10:33 PM.

   «Some love is fire, some love is rust. But the finest, cleanest love is lust.» — James Bond

   ---

2. Feb 18th, 2004, 07:32 PM

   
   

   #2

   In code:

   VB Code:

   ComboBox1.ListFillRange = "A1:A10"

   Bruce.

   ---

3. Feb 18th, 2004, 07:34 PM

   
   

   #3

   In Design, specify the Range in the ListFillRange. Like A1:A10

   Note NO quotes if done in the IDE.

   ---

4. Feb 18th, 2004, 08:02 PM

   
   

   #4

   

   Thread Starter

   
   Lively Member
   

   

   

   ---

   There is no such value for the combo box. I’m doing it in a form, not the spreedsheet, by the way.

   «Some love is fire, some love is rust. But the finest, cleanest love is lust.» — James Bond

   ---

5. Feb 18th, 2004, 08:05 PM

   
   

   #5

   Sorry I saw the word VBA and assumed that your Form was in VBA too.

   No matter… watch this space.

   ---

6. Feb 18th, 2004, 08:19 PM

   
   

   #6

   You could go at least two ways.

   1. Iterate past each Cell (by opening an instance of the .xls in VB) and using the .AddItem property, Or

   2. Load the .xls (as you would an .mdb!) using the JetEngine, so you can treat the
   data as if it were a Table, and load the Combo with its .DataSource and .DataField properties.

   Preference?

   Bruce.

   ---

7. Feb 18th, 2004, 09:57 PM

   
   

   #7

   I have played with that option 2 of my previous post, but don’t beleive its possible with a VB ComboBox with out the use of .Additem.

   So, rolling over to Item 1 of my previous post:

   VB Code:

   Option Explicit
   'Note: NO reference to MS Excel Object Library x.x is required in this example
   Private Sub Command1_Click()
   Dim objExcel As Object
   Dim lngCnt As Long
   Dim lngRowCount As Long
   On Error GoTo Err_Handler
       'Craete an Instance of Excel
       Set objExcel = CreateObject("Excel.Application")
       'Open your Excel File
   
   
   
   
     
   
   
                          
     
   
   
   
       objExcel.Workbooks.Open "C:test.xls", , True   'Open Read-Only
       'Show the SpreedSheet
       'objExcel.Visible = True
       lngRowCount = objExcel.ActiveSheet.UsedRange.Rows.Count
       Combo1.Clear
       For lngCnt = 1 To lngRowCount
           Combo1.AddItem objExcel.Range("A" & lngCnt).Value
       Next
       Set objExcel = Nothing
   Exit Sub
   
   
   
   
     
   
   
                          
     
   
   
   
   Err_Handler:
       'quit Excel
       If Not (objExcel Is Nothing) Then objExcel.Application.Quit
       If Not (objExcel Is Nothing) Then Set objExcel = Nothing
       MsgBox "Number: " & Err.Number & vbCrLf & _
       "Description: " & Err.Description, vbOKOnly + vbCritical, "Error!"
   End Sub

   Bruce.

   ---

8. Feb 19th, 2004, 01:35 AM

   
   

   #8

   

   Thread Starter

   
   Lively Member
   

   

   

   ---

   No. The comboBox IS in VBA. It’s in a VBA form that is in an Excel worksheet. What I meant is that the comboBox is on this form and not in a cell. Sorry for the confusion. If you still want to help me I’d greatly appreciate your time.

   In Excel, the comboBoxs have no .DataSource/.DataField values. Only .RowSource and .ControlSource.

   «Some love is fire, some love is rust. But the finest, cleanest love is lust.» — James Bond

   ---

9. Feb 19th, 2004, 03:17 PM

   
   

   #9

   for a range of data, use:

   VB Code:

   ComboBox1.RowSource = "A1:A10"

   If you want to capture the entire used row data, then:

   VB Code:

   ComboBox1.RowSource = "A1:A" & ActiveSheet.UsedRange.Rows.Count

   Your right, you wont find any .DataSource etc properties

   Unfortunatly, M$ never had the forsight to make all THEIR apps standard…. now there is a nasty word (Note that Excel and Access are developed in different countires).
   ie. Excel VBA syntax even varies to Access VBA synatx, let alone syntax in Excel itself (Combo on a Form v a Combo on a SpreedSheet)!!!

   Bruce

   Last edited by Bruce Fox; Feb 19th, 2004 at 03:20 PM.

   ---

10. Mar 31st, 2017, 05:40 PM

    
    

    #10

    

    
    New Member
    

    

    ---

    Re: Setting a comboBox’s controlSource in EXCEL *RESOLVED*
    

    Question, I just signed up, I’m a novice and I’ve got a question that’s been bugging me for a while. I’m not a VB expert, I just play around with it, but here is my problem. I’ve created a form. On the form I’ve got a combo box. For that combobox (ComboBox1), I’ve set the «RowSource» in the properties, to a named range from one of my worksheets. Here comes the problem. I’ve set the «ControlSource» to a cell in my master worksheet; and everything works as long as the form loads when the user is on that worksheet; but if they load the form from another worksheet, then the ControlSource value populates from the active worksheet rather than the worksheet where I want it to populate. I’m sure that this is an easy fix; but I haven’t found a solution looking online.
    In the «Properties» section, I can’t manually enter the worksheet name and cell value; it keeps giving me the following error: «Could not set the ControlSource property. Invalid property value.»
    So, how do I link it to a specific worksheet and a specific cell in that worksheet?

    ---

11. Mar 31st, 2017, 07:55 PM

    
    

    #11

    Re: Setting a comboBox’s controlSource in EXCEL *RESOLVED*
    

    MolarP…..first, welcome to the site…but I am not certain you are in the CORRECT forum here. It appears you MAY be using Microsoft Excel (you mentioned ‘master worksheet’). IF so, you MAY be attempting to use VBA (Visual Basic for Applications)—similar to VB6, but really a different animal. If that is true (you’re trying to do something ‘within Excel’, let us know and one of us will ask a Moderator (the Forum police) to move this thread to the proper forum.

    If indeed, you ARE using VB6 (Visual Basic 6.0), then I think I need a bit more information on what you are trying to do…maybe explain it once again, a bit differently (and slowly…I live in the south).

    And lastly, if you have a question, it is MUCH better if you start your own thread rather than dig up an old one…and this one is REAL old…13 years old!

    What I’d do if I were you, is go ahead and start a NEW Thread and restate your problem/question…AND, let us know what VB product you are using (VBA (which is integrated in MS Office products), VB6, or even a VB.NET product).

    Sammi

    ---

• 
• VBForums
• Visual Basic
• Visual Basic 6 and Earlier
• Setting a comboBox’s controlSource in EXCEL *RESOLVED*

Posting Permissions