Jreap Posted January 2, 2023 Posted January 2, 2023 #include <MsgBoxConstants.au3> #include <Word.au3> Local $oWord = _Word_Create("Word.Application") Local $oDoc = $oWord.Documents.Open(@ScriptDir & "\Report_20221229.doc") Local $oRange1 = _Word_DocFind($oDoc, "STRING_1") Local $oRange2 = _Word_DocFind($oDoc, "STRING_2") Local $oRangefinal= $oDoc.Range($oRange1.start, $oRange2.start) $oRangefinal.delete I'm trying in an input word .doc file, to delete the text between two words or characters (example : "STRING_1 blablablablabla bla bla bla STRING_2") I would like to delete everything from STRING_1 blablablablabla bla bla bla "; in the file there are multiple intervals repeating indefinitely The script I tried to do works only once, then returns the error The requested action with this object has failed. I also tried other methods like _Word_DocRangeSet but I can only set the end or start range not a range of strings to delete, I ask for your help or if you have other ideas I'm totally in the panic tunnel
Jreap Posted January 2, 2023 Author Posted January 2, 2023 #include <MsgBoxConstants.au3> #include <Word.au3> Local $oWord = _Word_Create("Word.Application") Local $oDoc = $oWord.Documents.Open(@ScriptDir & "\Report_20221229.doc") while 1 Local $oRange1 = _Word_DocFind($oDoc, "STRING_1") Local $oRange2 = _Word_DocFind($oDoc, "STRING_2") Local $oRangefinal= $oDoc.Range($oRange1.start, $oRange2.start) $oRangefinal.delete wend
Solution water Posted January 2, 2023 Solution Posted January 2, 2023 Use _Word_DocFindReplace with the following parameters: $sFindText: "STRING1*STRING_2" $sReplaceWith: "STRING_1 STRING_2" $bMatchWildcards: True Detailed description: https://www.datanumen.com/blogs/2-smart-methods-to-delete-contents-between-two-specific-words-in-your-word-document/ Skysnake 1 My UDFs and Tutorials: Spoiler UDFs: Active Directory (NEW 2024-07-28 - Version 1.6.3.0) - Download - General Help & Support - Example Scripts - Wiki ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki Task Scheduler (2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs: Excel - Example Scripts - Wiki Word - Wiki Tutorials: ADO - Wiki WebDriver - Wiki
water Posted January 2, 2023 Posted January 2, 2023 My UDFs and Tutorials: Spoiler UDFs: Active Directory (NEW 2024-07-28 - Version 1.6.3.0) - Download - General Help & Support - Example Scripts - Wiki ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki Task Scheduler (2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs: Excel - Example Scripts - Wiki Word - Wiki Tutorials: ADO - Wiki WebDriver - Wiki
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now