string contins em vba

Dim pos As Integer

pos = InStr("find the comma, in the string", ",")
kutty39