VBA
Binnen strings zoeken naar de aanwezigheid van substrings
Zoeken…
Opmerkingen
Wanneer u moet controleren op de aanwezigheid of positie van een substring binnen een string, biedt VBA de functies InStr
en InStrRev
die de tekenpositie van de substring in de string retourneren, indien aanwezig.
Gebruik InStr om te bepalen of een string een substring bevat
Const baseString As String = "Foo Bar"
Dim containsBar As Boolean
'Check if baseString contains "bar" (case insensitive)
containsBar = InStr(1, baseString, "bar", vbTextCompare) > 0
'containsBar = True
'Check if baseString contains bar (case insensitive)
containsBar = InStr(1, baseString, "bar", vbBinaryCompare) > 0
'containsBar = False
Gebruik InStr om de positie van de eerste instantie van een substring te vinden
Const baseString As String = "Foo Bar"
Dim containsBar As Boolean
Dim posB As Long
posB = InStr(1, baseString, "B", vbBinaryCompare)
'posB = 5
Gebruik InStrRev om de positie van de laatste instantie van een substring te vinden
Const baseString As String = "Foo Bar"
Dim containsBar As Boolean
'Find the position of the last "B"
Dim posX As Long
'Note the different number and order of the paramters for InStrRev
posX = InStrRev(baseString, "X", -1, vbBinaryCompare)
'posX = 0
Modified text is an extract of the original Stack Overflow Documentation
Licentie onder CC BY-SA 3.0
Niet aangesloten bij Stack Overflow