Joel Allen

<div>
Hi,<br />
<br />
Regex are your friends:
<pre><code id="code-20-42753700-1">Public Function GetText(ByVal data As String) As String
    Dim rx As Object
    Set rx = CreateObject(&quot;VBScript.RegExp&quot;)

    rx.Global = True
    rx.MultiLine = False
    rx.Pattern = &quot;^.*Redirected ($\d+$)$&quot;

    GetText = rx.Replace(data, &quot;$1&quot;)
End Function

Public Sub test()
    Dim data As String
    data = GetText(&quot;blah blah blah Redirected (99)&quot;)
    
    Debug.Print data    '// print: (99)
End Sub</code></pre>
</div>


Hi,

Regex are your friends:

Public Function GetText(ByVal data As String) As String
    Dim rx As Object
    Set rx = CreateObject("VBScript.RegExp")

    rx.Global = True
    rx.MultiLine = False
    rx.Pattern = "^.*Redirected ($\d+$)$"

    GetText = rx.Replace(data, "$1")
End Function

Public Sub test()
    Dim data As String
    data = GetText("blah blah blah Redirected (99)")
    
    Debug.Print data    '// print: (99)
End Sub

<div>
<div class="content wysiwyg-content">
Hello,<br />
<br />
I'm trying to parse out some text from a string using the Len, Right, and InStrRev function. &nbsp;I just can't get it right and am asking for help. &nbsp;The string would be something like this:<br />
<br />
&quot;My Printer Redirected (123)&quot;<br />
<br />
I'm trying to capture &quot;(123)&quot;. &nbsp;This line always changes. &nbsp;The only text that is the same every time is the text &quot;Redirected&quot;. &nbsp;So in this case:<br />
<br />
&quot;blah blah blah Redirected (99)&quot;<br />
<br />
I would need to capture the &quot;(99)&quot; this time. &nbsp;I basically need to capture all text on the right side of &quot;Redirected&quot;.<br />
<br />
Thanks for your help,<br />
Joel
</div>
</div>


Hello,

I'm trying to parse out some text from a string using the Len, Right, and InStrRev function.  I just can't get it right and am asking for help.  The string would be something like this:

"My Printer Redirected (123)"

I'm trying to capture "(123)".  This line always changes.  The only text that is the same every time is the text "Redirected".  So in this case:

"blah blah blah Redirected (99)"

I would need to capture the "(99)" this time.  I basically need to capture all text on the right side of "Redirected".

Thanks for your help,
Joel

Parsing Text

VBScript (Visual Basic Scripting Edition) is an interpreted scripting language developed by Microsoft that is modeled on Visual Basic, but with some important differences. VBScript is commonly used for automating administrative and other tasks in Windows operating systems (by means of the Windows Script Host) and for server-side scripting in ASP web applications. It is also used for client-side scripting in Internet Explorer, specifically in intranet web applications.

VB Script

Microsoft Outlook is a personal information manager from Microsoft, available as a part of the Microsoft Office suite. Although often used mainly as an email application, it also includes a calendar, task manager, contact manager, note-taker, journal, and web browser.