![]() ![]() StrTemp = InputBox("Begin saving PDFs starting with page _? " & _ VMsg = MsgBox("Please enter a valid directory.", vbOKCancel, "Invalid Directory") If Dir(strDirectory, vbDirectory) = "" Then StrDirectory = InputBox("Directory to save individual PDFs? " & _ Set RegEx = New VBScript_RegExp_55.RegExpĭim Matches As VBScript_RegExp_55.matchCollection Of cource every pages have a lot of different text, but the paterns are the most important.ĭim strDirectory As String, strTemp As Stringĭim ipgStart As Integer, ipgEnd As Integer I can't get it from this two pages, and add this value as file name, because I get only the first pattern (and script finish searching, when I go to next 2 pages inside Word file), but the same time next files (with 2 right pages) are creating. pdf (I did this), but I need also to add file name like EExxxxxxxx (patern), I set reg pattern like "(EE)" it's ok in my opinion, because it find the first pattern, always EE and 8 numbers (examples below). ![]() I need to take every 2 pages and export as. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |