Function concat() As String Dim strFirstname As String Dim strLastName As String Dim strFullName As String strFirstname = "John" strLastName = "Smith" strFullName = strFirstname & " " & strLastName concat = strFullName End Function