Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.06.2017, 15:27   #1
BookWAR
Новичок
Джуниор
 
Регистрация: 14.06.2017
Сообщений: 2
По умолчанию Поиск на листе слов из списка среди другова текста независимо от регистра букв. VBA. EXCEL 2007

Занимаюсь вводом вручную в базу большого количества сканированных документов.
Распознаватель текста немного упростил мою работу, но получаются битые таблицы.
Уже почти пол года методом тыка пытаюсь создать макросы, что то получилось, что то нет. Но ума так и не хватает сделать вот такое:

Задача:

1. Найти в 1.xlsx на всем Sheet1 ключевое слово - "статус" (ключевое слово может быть без пробелов стоять с другими символами, это слово нужно для определения начала нового документа).
Если "статус" не найдено то приступить к выполнению пункта 2 для текущего листа.
Если "статус" найдено, то искать на том же листе слова из 2.xlsx Лист2 первая строка. В данный момент найдено будет слово "Стимул"- А1.
После чего вставить найденное слово "Стимул" в 2.xlsx Лист1 А2.
Дальше надо найти в 1.xlsx на всем Sheet1 слово из столбца начинающегося с найденного слова "Стимул" в 2.xlsx Лист2 но поиск начинать уже со второй строки, так как заголовок уже не нужен,
в данный момент это будет столбец А2:А6.(конечно столбец в будущем будет увеличен и будет изменяться).
Будет найдено "910945007" и подставить значение находящее справа от него "Луначарского 2 А" в 2.xlsx Лист1 B2.

В файле примера 1.xlsx видно что сохранилась рамка настоящей таблицы в которой находятся столбцы с нужными мне цифрами.
Это графа "Б"(С4), "3"(G4) и "4"(H4).
Проблема в том что строка с графой не всегда в одном и том же положении она может быть сдвинута на несколько строк или столбцов,
так же графа "Б" может распознаться как цифра 6, а графа "3" как буква З. Но графы "А" и "2а" в основном стабильно распознает, также "А" и "2а" могут встретиться на всем листе несколько раз в документе с другим, следовательно если искать эти графы то с условием поиска "Ячейку целиком", думаю "А" и "2а" использовать как ориентир для правильного определения места нахождения нужных мне цифр в сохранившейся рамке.

2. В общем содержимое из граф "Б"(С4),"3"(G4) и "4"(Н4) 1.xlsx Sheet1 скопировать и вставить в 2.xlsx Лист1 В столбцы А,B,C начиная с 3 строки, так как 2 строка этих же столбцов уже занята ранней вставкой.( количество строк в этих графах могут меняться от 1 до 50)

3. Выполнить пункт 1 для следующего листа Sheet2 в 1.xlsx. В данном случае ключевое слово - "статус" не будет найдено на листе, тогда выполнить пункт 2.

То есть Sheet2 это продолжение одного документа листа Sheet1. просто он состоит из двух листов отсканированных. Поэтому поиск из списка названия клиента не требуется.

4. Выполнить выше написанное для всех остальных листов в 1.xlsx. Количество листов изменяется может быть от 1 до 200 если это возможно в EXCEL.

Помогите хотя бы с 1 или 2 пунктом, это уже будет большой плюс. Или может сама задумка макроса не правильная, проще с другой стороны подойти?
Вложения
Тип файла: rar ПримерVBA.rar (20.9 Кб, 7 просмотров)
BookWAR вне форума Ответить с цитированием
Старый 16.06.2017, 12:02   #2
kuklp
Участник клуба
 
Регистрация: 02.05.2010
Сообщений: 1,390
По умолчанию

Может Вам есть смысл выложить это КОМПЛЕКСНОЕ задание в раздел Фриланс? За разумную плату.
mailto: kuklp60@gmail.com, ящики для благодарностей:
WM Z206653985942, R334086032478, U238399322728
kuklp вне форума Ответить с цитированием
Старый 16.06.2017, 12:21   #3
BookWAR
Новичок
Джуниор
 
Регистрация: 14.06.2017
Сообщений: 2
По умолчанию

Тоже так думаю. Только еще добавить надо пару пунктов, чтобы уже самому дальше не додумывать, а доверить это дело специалисту, все же лучше меня сделает).
BookWAR вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
в текстовом файле подсчитать количество всех различных слов из латинских букв без учета регистра, которые имеют заданную длину slava5170 Linux (Ubuntu, Debian, Red Hat, CentOS, Mint) 5 09.10.2013 17:47
Поиск на листе Excel (VBA) adlansuliman Microsoft Office Excel 5 09.05.2013 15:05
Поиск и номер позиции текста в VBA (Excel) Abdukhafiz Microsoft Office Excel 3 20.03.2012 13:40
Поиск и вывод нужного изображения в Excel 2007, VBA Stlline Microsoft Office Excel 5 11.08.2010 09:09
Поиск в VBA Excel на листе luxery Microsoft Office Excel 1 10.11.2008 08:38