How to find a character in a string

Pacheco · Mar 30th 2004

Using VBA for Excel 98, I need to find and retrieve the position of a caractere in a string, e.g:

string: "teste"

find the position of "s", in this case, = 3

thx

Pacheco

bnix · Mar 30th 2004

Welcome to the forum!

You could try

Code

Dim i as integer
Dim Pos As integer
Dim FindChar as string
Dim SearchString As String


SearchString = "teste"
FindChar = "s"


For i = 1 To Len(SearchString)
If Mid(SearchString, i, 1) = FindChar Then
Pos = i
End If
Next i
MsgBox FindChar & " was Found at position " & Pos

Display More

HTH

Anonymous · Mar 30th 2004

Instr("teste","s")
will return 3 (a return of 0 means the character is not found)

Anonymous · Mar 30th 2004

You can use WorksheetFunction to call and use regular Excel functions:

Code

Option Explicit


Sub test()
Dim CharNum As Integer
CharNum = WorksheetFunction.Find("s", Range("A1"))
MsgBox CharNum
End Sub

Pacheco · Mar 30th 2004

thx all!

Mikoli · Apr 4th 2012

Re: How to find a character in a string

Thank you very much for the code.

How to find a character in a string

Participate now!

Share