InStr(): A number representing the place value of a particular character within a string
Sub InstrLeft()
Dim userName As String
Dim firstName As String
Dim spaceLoc As Integer
userName = "First Last"
spaceLoc = InStr(1, userName, " ")
firstName = Left(userName, spaceLoc - 1)
Debug.Print firstName
End Sub