Question

I have a string that contains “-” near the end. I want to return everything to the left of that hyphen.

I don’t know how to use Split() or Regex() to do that.

Answer 1

Two methods that handle removing the hyphen and a non-hyphen case

Sub Test1()
    Dim StrTest As String
    StrTest = "I have a hypen-somewhere"
    If InStr(StrTest, "-") > 0 Then
        MsgBox Left$(StrTest, InStr(StrTest, "-") - 1)
    Else
        MsgBox "Not found"
    End If
End Sub

Sub Test2()
    Dim StrTest As String
    Dim vString
    StrTest = "I have a hypen-somewhere"
    vString = Split(StrTest, "-")
    If UBound(vString) > 0 Then
        MsgBox vString(0)
    Else
        MsgBox "Not found"
    End If
End Sub