Excel-VBA Solutions: Get a position of a character in a string

There are times we need to get the position of a certain character in a string.Below is a vba code which can be used to get a position of certain character.

Think there is a sentence or a word in a cell "C3".

So below code can be used to get the position of "@" in that sentence or word.

    Dim cellValue As String

    Dim PosOfAt As Integer

    Dim WS1 As Worksheet
    Dim Rng As Range
    Set WS1 = Worksheets("Sheet1")
    Set Rng = WS1.Range("C3")

    cellValue = Rng.Value

    PosOfAt = InStr(1, cellValue, "@", vbTextCompare)

    'Here PosOfAt equals to the position of "@"

Pages

Get a position of a character in a string