Positie van een bepaald teken zoeken in Excel met VBA

Positie van een bepaald teken zoeken in Excel met VBA


Als programmeur, you gonna werken met een heleboel tekenreeksen. De mogelijkheid om de positie van een bepaald teken zoeken in Excel met behulp van Visual Basic voor applicaties u veel tijd besparen kunnen bij het schrijven van programmacode. Eerder, zou u doorlopen elke één teken in een tekenreeks en gebruik een teller voor het bijhouden van de positie. Nu, in VBA kunt u de functie InStr de positie te zoeken naar een bepaald teken.

Instructies

1

Start Microsoft Excel en typt u "Het vinden van de positie van elk teken in deze zin." in A1. Klik op het tabblad 'Developer' en op 'Visual Basic' om de VB-Editor te openen. Een nieuwe VBA-codemodule toevoegen door te klikken op het "Invoegen" menu en te klikken op "Module."

2

Voeg een nieuwe procedure toe door de volgende code toe te voegen:

Private Sub findPositionOfCharacter()

3

Maak de volgende drie variabelen die u wilt gebruiken om de positie van je personage te vinden:

Dim myString As String
Dim myChar As String
PO's As Integer Dim

4

Definieer het teken dat u wilt zoeken en krijgen de zin gelegen in A1:

myChar = "d"
Range("a1"). Selecteer
myString = Range("A1"). Waarde

5

Kopieer en plak de volgende code om te zoeken naar de positie van het teken dat is gedefinieerd in de vorige stap en een bericht met zijn standpunt weergeven:

POS = InStr (1, myString, myChar, vbTextCompare)
MsgBox ("de positie van '" & myChar & "' is:" & Pos)

6

Typ 'End Sub' beëindigen van de procedure en pers "F5" voor naar de VBA-code uitvoeren.