vba - ハイフンで Split() をどのように使用しますか?

Question

末尾近くに「-」を含む文字列があります。そのハイフンの左側にあるものをすべて戻したい。

Split() または Regex() を使用してそれを行う方法がわかりません。

Answer 1

ハイフンの削除とハイフン以外のケースを処理する 2 つのメソッド

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

Answer 2

次のようなことを試すことができます：

Dim hyphenString As String = "hello-world"
Dim leftSide As String = Left(hyphenString, InStr(hyphenString, "-"))

leftSide「こんにちは」が含まれているはずです

Answer 3

Instr()と の組み合わせを使用しMid()ますLen() ここで