Мой помощник: Excel

Зачастую в документе, на листе Excel, требуется найти начало и окончание блока табличной части документа. Это можно сделать так: Sub test() Dim et As String et = "" et = FindCellIs01_(ActiveSheet, "01_", False) If et = "" Then nRIn = "не найден" Else nRIn = Range(et).Row End If et = "" et = FindCellIs01_(ActiveSheet, "Итого:", False) If et = "" Then nROu = "не найден" Else nROu = Range(et).Row End If ...

Зачастую, в моей работе, приходится иметь дело со счетами, спецификациями и т.п. документами, которые по эл. почте присылают поставщики. Что бы не потеряться в этом "море" и иметь возможность отслеживать динамику поступления тех или иных материалов и их цены, я поступаю следующим образом (возможно, мой опат кому то будет полезен): Для начала, учитывая, то, что, большинство поставщиков любит отправлять документы в формате .pdf, а мне учет и анализ, информации из них, удобнее вести в таблице. Я установил ABBYY FineReader на свой комп...