Als Programmierer , wirst du mit einer Menge von Strings arbeiten. Die Fähigkeit, die Position eines bestimmten Zeichens in Excel mit Visual Basic für Applikationen finden erspart Ihnen eine Menge Zeit beim Schreiben Ihres Codes. Früher hätte man eine Schleife durch jedes einzelne Zeichen in einem String und einen Zähler , den Überblick über die Position zu halten. Jetzt , in VBA , können Sie die InStr -Funktion für einen bestimmten Charakter zu suchen und die Position zurückkehren . Anleitung
1
Starten Sie Microsoft Excel und geben Sie " Finde die Position eines beliebigen Zeichens in diesem Satz . " In A1 . Klicken Sie auf die Registerkarte "Entwicklertools" und klicken Sie auf " Visual Basic ", um den VB -Editor zu öffnen . Fügen Sie einen neuen VBA -Code-Modul , indem Sie den Menü "Einfügen" und klicken
2
Fügen Sie ein neues Verfahren , indem Sie den folgenden Code "Module . ":
Private Sub findPositionOfCharacter ()
3
erstellen Sie die folgenden drei Variablen , die Sie verwenden , um die Position des Charakters finden :
Dim myString Wie StringDim myChar Wie StringDim Pos As Integer
4
Definieren Sie das gewünschte Zeichen zu finden und um den Satz in A1 befindet:
myChar = "d" Range (" A1") SelectmyString = Range (" A1") . . Wert
5
Kopieren Sie den folgenden Code, um die Position des Zeichens im vorherigen Schritt definiert zu finden und zeigt eine Meldung mit seiner Position :
Pos = InStr (1, myString , myChar , vbTextCompare ) MsgBox (" Die Position des '" & myChar & "' ist :" & Pos)
6
Typ "End Sub " zu beenden Sie Ihren Verfahren und drücken Sie " F5" um den VBA-Code ausführen .