I have a couple of combo boxes. I want to use a macro to control them: when I run the macro, all the combo boxes select the first item in the drop down list. My code is:
Sub test()
ComboBox1.ListIndex = 0
End Sub
run-time error 424, object required.
I am building an excel application that will allow the users to tick boxes which acknowledge completition of tasks. I then count up all the tickboxes to give them a score. However, I want to have multiple modes, so users can have different sets of tickboxes. Ideally, I would have a drop-down menu/ combo box at the top of the page with the 4 modes in, and then when selected the appropriate tick-boxes are shown. I considered creating 4 tickboxes in every location, and just showing them (object.hide/.show) when the option was selected in the combo box. I am currently using Excel Form Tickboxes, and counting themall, but if I did this method I would need to count them for each mode. would I need an array?
View 2 Replies View RelatedI have a combo box(form control) and have it populated with data.
I want each item to do something so that when one is selected it triggers and event.
the items are:
Rounds 1 - 5
Rounds 6 - 10
Rounds 11 - 15...just like that all the way to 30
the worksheets are labeled "Rd 1", "Rd 2", "Rd 3" ...etc
When I click "Rounds 1 - 5" in the combo box, besides the "Summary" worksheet (which is where the combo box resides) only "Rd 1 - Rd 5" should be visible, I want all other sheets hidden, and when I click "Rounds 6 - 10" I want "Rd 6 - Rd 10" visible and all else hidden.
I simply added a combo box to my sheet and or word doc. I have tried using .additem, but I get nothing in the drop down. I am on 2003 SP 2.
I have tried the following:
Private Sub combobox1_form_initialize()
ComboBox1.AddItem "Computer"
ComboBox1.AddItem "Internet"
ComboBox1.AddItem "Book"
ComboBox1.Text = ComboBox1.List(0)
End Sub
and
Private Sub combobox1_userform_initialize()
ComboBox1.AddItem "Computer"
ComboBox1.AddItem "Internet"
ComboBox1.AddItem "Book"
ComboBox1.Text = ComboBox1.List(0)
End Sub
Neither gives me anything in the list.
I use ComboBox to add items to the ListBox in userform
I am tring to loop through the ListBox to check each name in the ListBox, so ifthe name chosen by the ComboBox exists in the ListBox then donot add it,
but both codes do check the number of the item in the ListBox.
I need to check the name of the item?
With ListBox1
For i = 1 To ListBox1.Value
If i = ComboBox1.Value Then MsgBox "u cannot add this item"
Exit Sub
Next i
For i = LBound(ListBox1.List) To UBound(ListBox1.List)
If i = ComboBox1.Value Then MsgBox " u cannot add this item"
Exit Sub
Next i
.AddItem tot.Value
.List(.ListCount - 1, 1) = ComboBox1.Value
End With
Im using code from website: http://www.contextures.com/xlDataVal11.html
to display a combobox when I double click any cell that contains a validation list in it. I'm not great with VBA so I am having problems finding what each part of the code does. This is causing problems for another bit of code that I use to display a msgbox when certain values are selected from the list.
The MsgBox shows up great when I select an item from the validation list but does not work at all when I select the same item from the double-clicked combo box. It would be great if I could get the MsgBox to work both ways. This is the code that displays the MsgBox when target value is selected from list
Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.AddressLocal(False, False)
Case Is = "B4", "B5", "B6", "B7", "B8", "B9", "B10", "B11", "B12"
If Target.Value = "H" Then
MsgBox "This is a pop for extra information. Savvy?", vbYesNo, "Yo!"
End If
End Select
End Sub...............
I am trying to create a combo box whereby i need to populate a list of name into the box and when user click on the name, it will linked it to the corresponding letter in MS Word.
Have tried a number of codes available in this forum (to populate the combo box) but were not successful.
I want to make a combo box in excel that, if i select it the sheet inside the combo box will appear.
Example:
Inside of combox are: Sheet1
Sheet2
Sheet3
If i click combo box and i choose sheet3 the sheet3 will appear.
How can i do this? theirs a macro code to use?
The first combo box is on a userform so that a subject can be selected
View 3 Replies View RelatedExcel Userform
VB:
'enables user to click [U]highlight and select[/U] an item in ListBox1 and ListBox2 item (same row in index) is also [U]highlighted[/U] (highlighted only not selected)
Private Sub ListBox1_Click()
ListBox2.ListIndex = ListBox1.ListIndex
End Sub
Question: Is it also possible to enable a user to click to select an item in ListBox1 and ListBox2 item is also selected simultaneously (same row in index). Is there excel vb code to do this?
I think the code may be along the lines of the ListBox SelectedIndex property. What would be the Excel VB code equivilant for the ListBox SelectedIndex property, if so?
numberdesc
1_______yellow
1_______yellow
1_______blue
2_______purple
2_______purple
3_______green
3_______orange
4_______black
I need some way that can identify when the item in the description column doesnt match the first item of the same number- for example, here the 1-blue and 3-orange would be flagged because they should match the 1-yellow and 3-green.
I need to do this on a much larger scale (approximately 20,000 data points), so I wanted to create a formula or macro that could do this for me.. I thought making a reference page with would work but I keep getting an error.. I haven't done VBA in a while, so I may have syntax errors.
If Range("A2:A9").Sheets("Sheet1") = Range("A2:A6").Sheets("Ref") And Range("B2:B9").Sheets("Sheet1") = Range("B2:B6").Sheets("Ref") Then
Range("C2:C9").Sheets("Sheet1") = "x"
End If
I am getting close to finishing the drop down menu capability when filling in column L in tab Transactions. However, there is a snag. When I enter part of account say "fin" (the important part here is that the part of the word should not be the beginning of the account name) - then I select an account from the menu - but it does not stay in the cell if the part of the name is the beginning of the account name - all is fine.
View 4 Replies View RelatedI am using a vlookup and have a problem. I am assigning a category to an item number based on the first two characters of the item number. For example item number 60123 would equal scrap because of the first two characters of 60. But the item number can begin with either a number or letter. Here is the formula I am using that works for item numbers that begin with numbers:
=VLOOKUP(VALUE(LEFT(E2,2)),Sheet3!A:B,2,FALSE)
It works fine until I reach a item number that begins with a letter, then I get the dreaded #Value error. If I take the value out of the formula then it works for the letter based number items but not for the number based item numbers.
I have to create two combo boxes and when a user selects a value from one combo box, the values should get changed in the other combo box.
For example : if one combo box has values like "c/c++ programming" "java programming" and so on.. ... i would like to display the authors recommended (corresponding to combo box1) in the combo box 2.
Here I would like to get your valued guidance for the usage of "IF" formula. I am having two sheets one is new XL-1 and other is old XL-2. I want to have a item number from the old file corresponding to the same item descprition in the new file. I am attaching the snap shots of two files which is more explanatory than describing in words here.
View 2 Replies View RelatedI am using Vlookup to compare our item number with the suppliers item number but the result is removing the decimal point on some but not all items.I have included a small sample but it concerns almost 10.000 items.
View 9 Replies View RelatedI would like to create a combo box however the contents of the combo box depends on what i have selected in a previous combo box.
View 2 Replies View RelatedI created a form using multiple text boxes and combo-boxes using Excel VBA controls but do not know how to enable the ability to tab between those boxes. "Auto Tab" doesn't seem to do it.
View 9 Replies View Relatedi've been scrolling through the Uerforms extra controls and just wondered if there is a comperhinsive list of them and what they actually do?
View 2 Replies View RelatedI have added subtotals to a worksheet, as I have many times before, but this time I don't see any controls off to the left. I am at a loss as to why this might be happening or how to get them to display. Have I toggled something off or on that might be causing this?
View 4 Replies View RelatedIn line me.controls(0) what (0) stands for?
I thought it's for tabindex but after experiment it's not.
Can you run a procedure when a particular page in a multipgae control is clicked rather than use the Multipage change control.
View 5 Replies View RelatedMy excel macro's run fine under Windows 2000 Pro, and Office 2000. The company got a new computer with Windows XP. I now have macros that run OK however I keep getting a pop up message stating. Warning..An active X component is being loaded. I must press OK and the program will run fine. How can I get rid of the Pop up active X message.
View 2 Replies View Relatedway of setting the values of textbox controls, the way im using below is very repetitive and has to be run through every time a combobox1 is changed. Im also going to have to add a lot more case scenarios in the short future.
Private Function setform()
Dim Xeng As Boolean
For Each ctl In Me.Controls
If TypeOf ctl Is MSForms.TextBox Then
ctl.Enabled = True
ctl.Locked = False
ctl.Value = ""
End If
Next
I have a ListBox in my worksheet "A", and I'm tryin to acces to it... I want to use that ListBox like a log to print the error i have found while running my code. The name of that ListBox is "IncongruenciesListBox".
now if that ListBox was in a userform, i can access to it easily, but if it is in the worksheet how can i change (add more rows) to it?
I tried:
Dim WS As WorkSheet
Set WS = ThisWorkBook.WorkSheets("A")
If added = False Then WS.IncongruenciesListBox.AddItem ("error")
And there is a message saying it cant find "IncongruenciesListBox".
I have a userform that has nested multipages (5 in the outer page, 4 in the inner page).
On each of these multipages, I want to have the same controls (sliders) laid out in the same order - but with unique names, named after their tab location, for each control so I can use their value property later in the code.
I've designed the layout and named all the controls on my first sheet (e.g. Slider1Outer1Inner1). I now need a way of automating the replication of these across the other 19 sheets (including the nested inner multipage!); so that equivalent slider for example would be called Slider1Outer1Inner2, Slider1Outer1Inner3 etc.
I'm not sure about coding VBA to act on items within VBA...
VB:
" For each multipage in outer
For Each multipage In inner
For Each Object In current multipage
Copy inner.object -> Next multipage
Inner.object.name = CurrentOuter & CurrentInner & CurrentSlider "
I have a spreadsheet with numerous check boxes. Everything looks great when I do a "print preview", but after I close the preview and return to the spreadsheet, a bunch of the check boxes have moved! Have I got a property improperly set, or is it something more sinister? I've looked all over, and can't find an explanation of what the various property settings mean...
View 8 Replies View RelatedI have a userform that as lots of text boxes on.
The text boxes are called "pos1" & "skill1" the number ranges up to 18.
I am trying to put the contence of the boxes on a worksheet using a loop so the 1 will change to 2 and so on.
How do I go about seting the loop up so it changes the name of the control each time.
What's the best way to hide controls on a userform? I have a userfrom with 2 datepicker one for start date and one for end date. I want them hidden until I use checkbox and check it to appear. I am using this code but nothing is work.
View 2 Replies View RelatedI have taken this code from Access and trying to use it in Excel to lock all the TextBox, ComboBox & CheckBox on the form.
View 2 Replies View Related