• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Userform ComboBox to set active cell

Below is my current code. I want what ever is chosen in the combobox to make the cell active. Then, edit it if required and save it.
Code:
Private Sub CommandButton1_Click()
Unload Me
End Sub
Private Sub TextBox3_Change()
TextBox3 = Format(TextBox3, "$#,##0.00")
End Sub
Private Sub UserForm_Initialize()
ComboBox1.List = Sheets("Lookup").Range("D43:D134").value
End Sub
Private Sub ComboBox1_Change()
TextBox1.value = (ComboBox1.value)
TextBox2.value = Application.VLookup(ComboBox1.value, Worksheets("Lookup").Range("D43:G134"), 2, False)
TextBox3.value = Application.VLookup(ComboBox1.value, Worksheets("Lookup").Range("D43:G134"), 3, False)
TextBox4.value = Application.VLookup(ComboBox1.value, Worksheets("Lookup").Range("D43:G134"), 4, False)
TextBox5.value = ActiveCell.Row
End Sub
 
Last edited by a moderator:
Thanks for your time and reply. It has heaps of confidential stuff in it so I have abandoned the form altogether.
 
I understand.

For future reference ... creating a sample workbook with just enough sample data to demonstrate your "before" and
"after" scenario would assist in creating a solution.
 
Back
Top