Dim value As String Dim input As String Dim failmessage As String Dim returnValue As String returnValue = Verify.Contains(value, input, failmessage)