1,2,3,4,5,6,7
2,3,4,5,6,7,8
1,2,3,6,7,8,9
1,4,5,6,7,8,9
1,2,3,5,6,7,8

I have the above data in range A1:G5

In my VBA code I have a string variable which has a value "1, 2, 3, 4"

I have to search each number in this string variable in the range
A1:G1, A2:G2, A3:G3, A4:G4 and A5:G5 and if 3 or more number matches
then increment value of freq variable by 1.

Example:
freq variable has a value 0
In the above string:
1 2 3 4 all numbers matches in row 1 which is =3 hence freq variable
will have value 1
2 3 4 numbers matches in row 2 = freq variable = 2
1 2 3 numbers matches in row 3 = freq variable = 3
1 4 numbers matches in row 4 (which is less than 3 hence no increment)
= freq variable = 3
1 2 3 numbers mathes in row 5 = freq variable = 4

freq = 4

If the string variable value is "1, 2, 5, 7" then freq should be 5

what is the best approach/logic to find the correct answer. How would I
put it in a vba code?