userform input box to transfer to cell

still learning · Aug 19, 2018

Hi

How do I have a text box in a userform transfer the input to a cell. It maybe numbers or text
This doesn’t seem to work

HTML:

Private Sub TextBox1_Change()

   With TextBox1 
          ActiveSheet.Range("ae3").Value = .Text
       End With
      With TextBox2  
          ActiveSheet.Range("af3").Value = .Text
      With TextBox3   
       End With
  Me.Hide
  End With
  Unload Me
  End Sub

I then have a command button run a macro for an advance search. And have the screen go to the results range to see what was found

HTML:

Sub find()     

  Application.ScreenUpdating = False
      Application.Goto Reference:=" result", Scroll:=True
      Range("data").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
          "Criteria"), CopyToRange:=Range("results"), Unique:=False
  Application.ScreenUpdating = True
  End Sub

Is there a way to change the macro >>Sub fine<< to go the data range instead and highlight each result as I scroll thru it and if no results are found, have a message box come up saying no results

Mike

My Aswer Is This · Aug 19, 2018

Try this:
You need to use a Exit command
When you exit the TextBox the script runs:

Code:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
'Modified  8/19/2018  12:44:56 PM  EDT
ActiveSheet.Range("ae3").Value = TextBox1.Value
End Sub
Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
'Modified  8/19/2018  12:44:56 PM  EDT
ActiveSheet.Range("af3").Value = TextBox2.Value
End Sub

My Aswer Is This · Aug 19, 2018

The second part of your question and the script has nothing to do with finding something. This is a advanced filter script wanting to copy data to another location.

still learning · Aug 19, 2018

Thank you It works now !!!

Mike

My Aswer Is This · Aug 19, 2018

Glad I was able to help you.
Come back here to Mr. Excel next time you need additional assistance.

still learning said:
Thank you It works now !!!

Mike

userform input box to transfer to cell

still learning

Well-known Member

Excel Facts

My Aswer Is This

Well-known Member

My Aswer Is This

Well-known Member

still learning

Well-known Member

My Aswer Is This

Well-known Member

Similar threads

Forum statistics

Share this page

userform input box to transfer to cell

still learning

Well-known Member

Excel Facts

My Aswer Is This

Well-known Member

My Aswer Is This

Well-known Member

still learning

Well-known Member

My Aswer Is This

Well-known Member

Similar threads

Forum statistics

Share this page

We've detected that you are using an adblocker.

Which adblocker are you using?

Disable AdBlock

Disable AdBlock Plus

Disable uBlock Origin

Disable uBlock