Однажды один коллега из Литвы показал мне способ сбора списков из ОБД
через макросы excel. Способ в разыускоряет сборку и страхует от ошибок,
неизбежных при ручном наборе. Также важно, что много раз переходить в
открытое окно ОБД-Мемориал из таблицы excel, чтобы скопировать очередную
строку - не нужно. К тому же сохраняется НОМЕР ЗАПИСИ в ОБД (в примере- столбец В). Способ показывала нескольким людям, некоторые не смогли понять как это делается, но некоторые успешно внедрили и оценили. Итог получается примерно такой (цвет и место захоронения добавлены вручную потом, № донесения слева в столбец А-тоже):
Описание пошагово:
1. Сначала скопировать в буфер обмена данные из ОБД (мышью выделить-копировать)
2. Затем открываете Эксель. Вкладка ВИД, кнопка МАКРОСЫ. Выбрать ЗАПИСЬ МАКРОСА
3. Появится такое окно. Имя макроса лучше не менять. Задаете сочетание клавиш (запоминаете его!). Сохраняете в ЛИЧНАЯ КНИГА МАКРОСОВ. Жмете ОК и после этого будьте внимательны, не жмите лишних клавиш – т.к. после ОК Эксель записывает последовательность ваших действий в макрос.
4. После ОК идете на лист3 (или лист2 как вам больше нравится). Встаете на к примеру 3-4-5 строку (не обязательно, но я предпочитаю верхнюю строку оставлять свободной). Жмете «вставить». Из буфера обмена сюда вставляется скопированное ранее из ОБД в кривой столбец
5. Вручную меняете выравнивание, переставляете данные как вам надо в строку, получаете строку
6. Выделяете строку, переставляете ее наверх, все что внизу – выделяете и удаляете. Это делается для того, чтобы при последующей вставке других данных не получилось «начало от одного, хвост от другого»- при разной длине записей (например у национальных ФИО часто нет отчества и строки перескакивают). Лучше чтоб поле листа3 в итоге оставалось чистым
7. Затем выделяете верхнюю строку и нажимаете «вырезать»
8. Идете на лист1. Жмете в углу «ОСТАНОВИТЬ ЗАПИСЬ». После этого все- макрос записан. В итоге у вас в буфере сейчас строка с данными. Вы ее можете вставить куда угодно – например в формируемый на листе 1 список имен
Чтобы проверить работу макроса – открываете чистую книгу Эксель. Открываете ОБД. Находите кого-то там. Выделяете данные так, как выделяли при формировании макроса, жмете «копировать». Идете в Эксель на лист 1. Жмете ctrl + (сочетание клавиш, которое задавали вначале). Экран «прыгнет»- это исполнение макроса. Жмет «вставить». То есть в итоге для создания списка вам надо Выделить данные в ОБД, нажать «копировать» (ctrl+c) Пойти в Эксель, нажать сочетание клавиш (ctrl+?) Поставить курсор в нужное вам место и нажать «вставить» (ctrl+v)
