Textbox in a toolbar

[Guest]

Is there any way to get a textbox onto a toolbar instead of a button ?
I'd like to use it as the criteria for a search. I could open a separate
form for it, that's not a problem, but I'd like to have it immediately
available at all times. I'll put buttons next to it for "search" (which will
probably just apply a filter) and "cancel".

 

[Guest]

The text box is on the Command Control toolbar.

 

[Guest]

Hi Joel,
That's for putting the textbox somewhere on a worksheet but not in a toolbar
that I can use on more than one sheet.
Or am I wrong ?

 

[david.ritchie.au]

Is there any way to get a textbox onto a toolbar instead of a button ?
I'd like to use it as the criteria for a search. I could open a separate
form for it, that's not a problem, but I'd like to have it immediately
available at all times. I'll put buttons next to it for "search" (which will
probably just apply a filter) and "cancel".

You should be able to customise a toolbar under VBA and add the
textbox.

Try this:

Sub MakeBar()
Dim customBar As CommandBar
Dim newButton As CommandBarButton
Dim newEditbtn As CommandBarComboBox
Set customBar = CommandBars.Add("Custom")
Set newEditbtn = customBar.Controls.Add(msoControlEdit)
Set newButton = customBar.Controls.Add(Type:=msoControlButton)
With newButton
.FaceId = 2
.OnAction = "MySub"
End With
customBar.Visible = True
End Sub

Cheers
David