Excel VBA - using left function with find

Excel VBA - using left function with find

I'm trying to use the worksheet function "left" in conjunction with "find"
to determine a string variable in VBA. However, excel interprets the find
function as a VBA function, which yields an error message when resolving.
Below my code:
...
Else
MSa = MSa & Left(Range("D22"), Find(".", Range("D22")) - 1) & " " &
Range("D25").Value & "."
Range("Q7").Value = MSa
End If
...
where MSa is a string. Can you please advise as to how I can best solve
this problem?
Many thanks in advance.