Search in combobox1 VBA in a form

[titivaler]

I would like to populate range "ar1", when I write in the form for a combobox1, range "ar1" should be populated immediately, I'm using Range ("ar1") = ComboBox1.Value, however, It only write first letter,

I also have tried to put "ar1" in controlsource from combobox properties, but when I write In the combobox1, I must close the form to see what I have written in "ar1" worksheet in excel.

Is ther any way to write into the combobox1 and immediately update the range "ar1",

Code:

Private Sub ComboBox1_Change ()
Range ("ar1") = ComboBox1.Value
ComboBox1.RowSource = "as3: as" & 3 + Range ("as2"). Value 'charge the combo items that depend on ar1 range
ComboBox1.DropDown '
End SubPrivate Sub ComboBox1_Change ()

****** id="cke_pastebin" style="position: absolute; top: 10px; width: 1px; height: 1px; overflow: hidden; left: -1000px;">Private Sub ComboBox1_Change ()
Range ("ar1") = ComboBox1.Value
ComboBox1.RowSource = "as3: as" & 3 + Range ("as2"). Value 'charge the combo items that depend on ar1
ComboBox1.DropDown '
End SubPrivate Sub ComboBox1_Change ()</body>

 

[Roderick_E]

_Change is after each character, you want to use _AfterUpdate

 

[titivaler]

can you please advise what is the code for _afterupdate? can you please let me know an example for trying it?

 

[Roderick_E]

_Change is after each character, you want to use _AfterUpdate

I re-read your post. A combobox is a selection, not a place you input ("write in"). But further, I don't understand the issue. I thought you simply wanted range("ar1") to equal combobox1.value
Also, this line doesn't seem like it would work:

ComboBox1.RowSource = "as3: as" & 3 + Range ("as2"). Value 'charge the combo items that depend on ar1 range

As RowSource typically is a range or named range