Hello guys, firstly i want to sorry my English, because i'm not using the translator. I hope you can understand what I writed.
So, i maked a macro that open the find dialog box and search for the word "lote".
My macro:
Range("A1").Activate
SendKeys "^lLOTE"
Range("A1").Activate
SendKeys ("{TAB}{TAB}{NUMLOCK}{ENTER}")
This code works as i want, but I trying to stop use sendkeys. I researched a better alternative to make the same function and found this way:
Set Find = Cells.Find("Lote", LookIn:=xlValues, lookat:=xlPart)
Application.CommandBars.FindControl(ID:=1849).Execute
It open the find dialog box and put the word, but i still need to press button of find all (circled in red in the image), I want that code press automatically, is there any way to do this?
So, i maked a macro that open the find dialog box and search for the word "lote".
My macro:
Range("A1").Activate
SendKeys "^lLOTE"
Range("A1").Activate
SendKeys ("{TAB}{TAB}{NUMLOCK}{ENTER}")
This code works as i want, but I trying to stop use sendkeys. I researched a better alternative to make the same function and found this way:
Set Find = Cells.Find("Lote", LookIn:=xlValues, lookat:=xlPart)
Application.CommandBars.FindControl(ID:=1849).Execute
It open the find dialog box and put the word, but i still need to press button of find all (circled in red in the image), I want that code press automatically, is there any way to do this?
