Omkeren van een string

11/05/2016 by admin

VBA bevat een aantal zeer krachtige opdrachten en functies voor het manipuleren van strings. Een van deze functie kunt u de inhoud van een reeks gemakkelijk te keren: de StrReverse functie. Het enige wat u hoeft te doen is om het door te geven een string waarde, en het de omgekeerde versie van de string terug:

Dim MyString As String
Dim BackString als Koord

MyString = "ABCD1234"
BackString = StrReverse (MyString)

Als de code snippet is door middel van het uitvoeren, wordt de waarde van BackString ingesteld op 4321DCBA, dat is het omgekeerde van de oorspronkelijke waarde van MyString.

De StrReverse functie werd tot VBA begin toegevoegd met Office 2000. Als u gebruik maakt van Word 97, dan kunt u uw eigen functie om strings te keren te maken:

Functie StrReverse (sRaw As String) As String
Dim Swork als Koord
Dim Starget als Koord
Dim J As Integer

Swork = sRaw
Starget = ""
Voor J = 1 To Len (Swork)
Starget = Mid (Swork, J, 1) & Starget
Volgende J
StrReverse = Starget
End Function

Het werkt door het uit elkaar trekken van de oorspronkelijke string en zetten het weer in elkaar in de nieuwe orde. De functie geeft een omgekeerde versie van welke snaar u het verzendt.

WordTips is uw bron voor kosteneffectieve Microsoft Word training. (Microsoft Word is de meest populaire tekstverwerker in de wereld.) Deze tip (767) van toepassing op Microsoft Word 97, 2000, 2002 en 2003. U kunt een versie van deze tip voor de ribbon-interface van het Woord (Word 2007 en later) hier: Reversing a String.

Related Posts