olzdaily.blogg.se - Microsoft word wildcard replace

Dim findTextsWild() As Variant, replaceTextsWild() As Variant findTextsWild = Array("", "onfigurationepository", "ervlet[- replaceTextsWild = Array(" ", "Configuration/Policy Repository", "Servlet-Filter") ' Find and replace text for normal case insensitive replacement. Может быть, вы найдете это полезным 🙂 Sub GlobalTextReplacement() ' Root under which all manuals are stored Dim rootPath As String rootPath = "c:\Data\Manuals\" ' Find and replace text for wildcard replacement.