vba에서 instr 앞의 문자를 찾는 방법

Question

문제 설명:instr(숫자)을 찾은 다음 instr 값 앞에 문자가 있는지 확인합니다(예: 123, x123). 문자가 포함된 instr 또는 instr이 시트 2의 값과 일치하면 msg 상자에 예가 표시됩니다.

문제:instr을 찾을 수 있지만 instr 앞에 문자가 포함되어 있는지 여부를 확인할 수 없습니다. 어떻게 확인하나요? left(chr) 함수 같은 것이 있나요? 여기에 내 코드가 있지만 instr을 사용하여 chr이 아닌 instr을 찾는 것이 전부입니다.

  Sub tym()

Dim ws1 As Worksheet, wb As Workbook, ws2 As Worksheet
Dim b, c As Range, rngNums As Range, rngText As Range
Dim dNums, dText, rN As Long, rT As Long, t, m

Set wb = ActiveWorkbook
Set ws1 = wb.Worksheets("Sheet1")
Set ws2 = wb.Worksheets("Sheet2")
Set c = wb.Worksheets("Sheet3").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)

Set rngNums = ws1.Range(ws1.Range("A1"), ws1.Cells(Rows.Count, 1).End(xlUp))
dNums = rngNums.Value
Set rngText = ws2.Range(ws2.Range("A1"), ws2.Cells(Rows.Count, 1).End(xlUp))
dText = rngText.Value

For rN = 1 To UBound(dNums, 1)
    b = "-" & dNums(rN, 1) & "-" (right here im defining to find instr but how do i add a function to find char front of instr)
    For rT = 1 To UBound(dText, 1)
        If InStr(1, dText(rT, 1), b) > 0 Then

          MsgBox "yes"

        End If
    Next rT
Next rN

End Sub

Answer 1

문제가 없어야합니다. 만약에

Instr(1,BigString,SubString)

반환합니다1이면 SubString은 BigString의 시작 부분에 있습니다.

예를 들어 하위 문자열을 찾으세요."알파"

Sub dural()
   MsgBox InStr(1, ActiveCell.Value, "Alpha")
End Sub