Extract date from text by code VBA

[sofas]

hello .I have this text in the column A how can i extract 05/12/2022 from within the text in column b
along the column

total selext frome 05/12/2022 to 06/12/2022

 

[DanteAmor]

Use this formula:

Dante Amor
	A	B
1
2	total selext frome 05/12/2022 to 06/12/2022	05/12/2022
3	total selext frome 04/12/2022 to 10/12/2022	04/12/2022
Hoja2

Cell Formulas
Range	Formula
B2:B3	B2	=MID(A2,SEARCH("??/??/????",A2),10)+0

 

[sofas]

Use this formula:

Dante Amor
	A	B
1
2	total selext frome 05/12/2022 to 06/12/2022	05/12/2022
3	total selext frome 04/12/2022 to 10/12/2022	04/12/2022
Hoja2

Cell Formulas
Range	Formula
B2:B3	B2	=MID(A2,SEARCH("??/??/????",A2),10)+0

Thank you. Can I convert it into code vba?

 

[DanteAmor]

Can I convert it into code vba?

Your data starts in cell A2 going down, the results will be in cell B2 going down.

Sub Macro8()
  With Range("B2:B" & Range("A" & Rows.Count).End(3).Row)
    .Formula = "=MID(A2,SEARCH(""??/??/????"",A2),10)+0"
    .Value = .Value
  End With
End Sub