Wednesday 10 August 2016

batch Find and Replace for docx files Tech Support

batch Find and Replace for docx files

I need to do a batch Find and Replace using about 12 rules on one .docx file.  (This is a linguistics project.)  Some examples of the rules I am using:
Find underlined not bold ??r and make it underlined bold
Find underlined not bold  [oO][uU]r and make it underlined bold
Find double-underlined not bold * and make it single-underlined not bold
The Find and Replace rules should follow the same format as Word's Find and Replace.
Anyone know of a reliable batch Find and Replace program  that will do this?  Most batch Find and Replace software works on a single Find and Replace Rule applied to multiple files, not to multiple rules applied to a single file.  I need to be able to store
the rules.

Keys to the Problem batch Find and Replace for docx files

Download SmartPCFixer to Fix It (Free)

Maybe
http://gregmaxey.mvps.org/word_tip_pages/vba_find_and_replace.html would help? If not, you can roll your own with a macro and a table
Create a document with a two column table.
Enter the words you want to find in the first column and the formatted versions you wish to replace then with in the second column.  Save the file and put the filename and path where indicated.
Sub ReplaceFromTableList()
Dim oChanges As Document, oDoc As Document
Dim oTable As Table
Dim oRng As Range
Dim rFindText As Range, rReplacement As Range
Dim i As Long
Dim sFname As String
Dim sAsk As String
    sFname = "D:\My Documents\Test\Changes.docx"
    Set oDoc = ActiveDocument
    Set oChanges = Documents.Open(Filename:=sFname, Visible:=False)
    Set oTable = oChanges.Tables(1)
    For i = 1 To oTable.Rows.Count
        Set oRng = oDoc.Range
        Set rFindText = oTable.Cell(i, 1).Range
        rFindText.End = rFindText.End - 1
        Set rReplacement = oTable.Cell(i, 2).Range
        rReplacement.End = rReplacement.End - 1
        With oRng.Find
            .ClearFormatting
            .Replacement.ClearFormatting
            Do While .Execute(findText:=rFindText, _
                              MatchWholeWord:=True, _
                              MatchWildcards:=False, _
                              Forward:=True, _
                              Wrap:=wdFindStop) = True
                oRng.Select
                sAsk = MsgBox("Replace - " & vbCr & oRng & vbCr + vbCr & _
                              "with - " & vbCr & rReplacement, vbYesNo, _
                              "Replace from Table")

                If sAsk = vbYes Then
                    oRng.FormattedText = rReplacement.FormattedText
                End If
                oRng.Collapse wdCollapseEnd
            Loop
        End With
    Next i
    oChanges.Close wdDoNotSaveChanges
End Sub

Open Action Center by clicking the Start button Picture of the Start button, clicking Control Panel, and then, under System and Security, clicking Review your computer's status.

Make sure your computer has at least the minimum amount of random access memory (RAM) required to run the program that is displaying the error. Look for the program requirements online or in the packaging information.

Another Safe way to Repair the Problem: batch Find and Replace for docx files:

How to Fix batch Find and Replace for docx files with SmartPCFixer?

1. Download Error Fixer . Install it on your computer.  Click Scan, and it will perform a scan for your computer. The errors will be shown in the scan result.

2. After the scan is finished, you can see the errors and problems which need to be fixed.

3. When the Fixing part is finished, your computer has been speeded up and the errors have been removed


Related: Autologon and AutoLogonCount Parameters for Windows Unattended Setup Error Fixer,How To Resolve Cyberbit Unicode Font Does Not Return Correct Charset Problem,How To Use the Office Profile Wizard to Create an OPS File in Office XP Error Fixer,Error Sys Msg 22 Invalid period, please reenter. in MC in 4.x Solution,Why am I Getting a Upgrades from 3.01 to 3.60 or 3.01 to 3.70 Involving Serial Numbers and Revaluations Are Overstating the Valuation Entries on the Purchases Error?,How Can I Fix - Error 16389?,How to Fix - Internetopen?,Mcafee Virus Scan Online,How Can I Fix - Qos Packet Scheduler Failed?,Solution to Problem: Windows 2000 Boot Repair,How to Fix ashoutxt.dll Not Found Error,Best Method to Fix cxcore096.dll Error,Where can I Find dsauth.dll File,msde.dll Corrupted - How to Resolve,psizewizres.dll Corrupted - How to Fix,How to Download ASUS XGI Compatible Super VGA Driver Package Version R1.13.00/Driver Version 6.14.10.1130 for Windows XP 32/64 bit(WHQL),Windows Server 2003 32/64 bit(WHQL),Windows Vista 32/64 bit(WHQL),Windows Server 2008 32/64 bit(WHQL),Windows 7 32/64 bit(WHQL),Window,Download NeoMagic® MagicMedia 256AVP Display Adapter Driver,Download NVIDIA RIVA TNT2 Model 64,How to Update Realtek ALC850 AC'97 Driver V5.10.0.5900 WHQL for Windows 2000/XP/2003 & 64bit XP/2003.,How to Update Realtek LAN V6.203.0214.2008,Microsoft.PowerShell.GraphicalHost.dll Error Code Fixer
,Fix Error Code Netapi32 (4).dll
,Qa_auth_client.dll Error Code Fixer
,Fix Error Code Tdc (3).ocx
,Vwipxspx.dll Error Code Fixer
,Way to Download Toshiba Qosmio X505-Q832 Intel Wireless LAN Driver v.12.4.1.11.0.s64_wCAT,Download Toshiba Satellite C650D-ST6N02 Assist Utility v.4.2.3.0 driver,How Can You Update & Download Toshiba Satellite L645-S4026RD Value Added Package v.1.6.0130.640202 driver,Method to Download Toshiba Satellite L755-S9511D Assist Utility v.4.2.3.1 driver,Method to Download Toshiba Satellite P875-S7200 Fingerprint Utility v.2.0.0001.000408 driver,Best Way to Download NVidia GeForce 6100 VGA Driver v.304.51 Certified,How Can You Update & Download NVidia GeForce 9300/nForce 730i VGA Driver v.310.19 Certified,Method to Download NVidia GeForce GT 330M Driver v.340.65,How Can I Update & Download NVidia GeForce GTX 590 Driver v.280.26 WHQL,Method to Download NVidia Tesla C2050 Driver v.319.17
Read More: How to Fix - Black login screen, only a cursor Windows 7 x64?,Solution to Error: Bidirectional Bar Chart,Fast Solution to Error: bitlocker Horrible Problem (encrypting process stopped and not continuing and I can't access my partition),[Solution] Black horizontal lines flashing over the screen.,Tech Support: Belkin F5U237v1 7-Port USB Hub

No comments:

Post a Comment