KnowBrainer Speech Recognition
Decrease font size
Increase font size
Topic Title: Script to remove words in all capitals
Topic Summary: How to edit quickly
Created On: 02/23/2020 10:28 PM
Status: Post and Reply
Linear : Threading : Single : Branch
 Script to remove words in all capitals   - ScottCFP@ABC - 02/23/2020 10:28 PM  
 Script to remove words in all capitals   - Lunis Orcutt - 02/24/2020 01:40 AM  
 Script to remove words in all capitals   - ScottCFP@ABC - 02/24/2020 05:42 PM  
 Script to remove words in all capitals   - Lunis Orcutt - 02/24/2020 11:37 PM  
 Script to remove words in all capitals   - R. Wilke - 02/24/2020 08:10 PM  
 Script to remove words in all capitals   - ScottCFP@ABC - 02/27/2020 12:20 AM  
 Script to remove words in all capitals   - PG LTU - 02/27/2020 12:12 PM  
Keyword
 02/27/2020 12:12 PM
User is offline View Users Profile Print this message

Author Icon
PG LTU
Top-Tier Member

Posts: 2210
Joined: 03/21/2007

I'm with you. Fun stuff, indeed. For your continued amusement, you could play around with this Dragon script (which could also let you process a whole paragraph of text at a time, in any application, and without needing Word (or KB or DC for that matter):

Sub Main
' RegExReturn("input", "replacement text", "pattern")
  MsgBox RegExReturn(InputBox("TEXT"), _
    InputBox("REPLACEMENT TEXT"), _
      InputBox("PATTERN",,"[A-Z]{2,}"))
End Sub
Public Function RegExReturn(ByVal words As String, _
        repl As String, pat As String) As String
  Static regEx As Object
  If regEx Is Nothing Then
    Set regEx = CreateObject("VBScript.RegExp")
    With regEx
      .Global = True
      .Pattern = pat
    End With
  End If
  RegExReturn = regEx.Replace(words, repl)
End Function


Have fun,



-------------------------




PG





Remember folks, my comments and this forum are for entertainment value only, please, no wagering or other reliance on the contents herein.  I permit no commercial use of my ideas (whether expressions or embodiments) without my written consent.



Statistics
32324 users are registered to the KnowBrainer Speech Recognition forum.
There are currently 2 users logged in.
The most users ever online was 12124 on 09/09/2020 at 04:59 AM.
There are currently 362 guests browsing this forum, which makes a total of 364 users using this forum.

FuseTalk Standard Edition v4.0 - © 1999-2022 FuseTalk™ Inc. All rights reserved.