Macro to Search Text String and match another partial string

I'm looking to create a macro to do the following:

A1: 1324075558
A2: 1324085868
A3: 1340088588


B1: 4085
B2: 40088
B3: 32405

The macro should seach B1 first to find the number "4085" inside of any of the number strings in A1 to A3. If it finds a match it should place the matched Column A number string next to the matched Columb B string in Column C.

For example B1 would be matched to A2 since 4085 is in the text string of A2 so C1 should bring back "1324085868".

Thoughts on how to start? This is only my second ever macro.