Required A VBA

[Jan Kalop]

I would like to create VBA with command as bellow, how to do it?

ActiveWorkbook.Worksheets("ORDERS").Columns(1).Find("Test123").Select

 

[Yongle]

To select first cell with value Test123

With ActiveWorkbook.Worksheets("ORDERS")
    .Activate
    .Columns(1).Find("Test123", lookat:=xlWhole).Select
End With

To select first cell containing string Test123

With ActiveWorkbook.Worksheets("ORDERS")
    .Activate
    .Columns(1).Find("Test123").Select
End With

 

[Jan Kalop]

xxx

 

[Jan Kalop]

To select first cell with value Test123

With ActiveWorkbook.Worksheets("ORDERS")
    .Activate
    .Columns(1).Find("Test123", lookat:=xlWhole).Select
End With

To select first cell containing string Test123

With ActiveWorkbook.Worksheets("ORDERS")
    .Activate
    .Columns(1).Find("Test123").Select
End With

Thnakyou for that, but I would like to ask you to show me how the whole script should be written, because to write only that text won't create the macro

 

[Jan Kalop]

Thnakyou for that, but I would like to ask you to show me how the whole script should be written, because to write only that text won't create the macro

Thank you very much, I have work it out, and everything is fine. Thanks