Search Macro - Command Button
--Set the Security level to low/medium in (Tools|Macro|Security).
--From workbook launch VBE using short-key Alt+F11.
--From menu 'Insert' a module and paste the below code.
--Get back to Workbook.
From menu ViewToolbarsForms drag a button control to the worksheet. and
select the macro to be assigned....
--
Jacob (MVP - Excel)
"Eán" wrote:
How can I do this using the Command Button?
"Jacob Skaria" wrote:
Try the below...If you are looking for a whole cell match; then change LookAt
to xlWhole
Sub Macro()
Dim varFound As Variant, varSearch As Variant
varSearch = InputBox("Find string")
Set varFound = Cells.Find(varSearch, LookIn:=xlValues, LookAt:=xlPart)
If Not varFound Is Nothing Then
varFound.Activate
End If
End Sub
--
Jacob (MVP - Excel)
"Eán" wrote:
Is there a macro of function I can use to find key words or statements on a
worksheet, similat to the Find (goggles) icon?
Many thanks.
|