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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 11.04.2012, 18:28   #1
piratxp
 
Регистрация: 06.05.2008
Сообщений: 4
По умолчанию Автоматическое заполнение ячеек с накапливающей базы данных

Добрый вечер!
Нигде не нашел подобного примера... Прошу помочь с заполнением данных для отчета. Пример прикреплен. Кто может, помогите пожалуйста с макросами, или дайте хотя бы ссылочку на подобный пример. Спасибо!
Вложения
Тип файла: rar Отчет по телефонам.rar (22.1 Кб, 37 просмотров)
piratxp вне форума Ответить с цитированием
Старый 11.04.2012, 18:47   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Это легко реализуется без макросов:

Код:
  Ячейка: J12     Формула  (стиль A1):   =ЕСЛИ(ЕНД(ВПР($E12;DB;4;0));"";ВПР($E12;DB;4;0))
                  Формула  (стиль R1C1): =ЕСЛИ(ЕНД(ВПР(RC5;DB;4;0));"";ВПР(RC5;DB;4;0))
При ручном вводе в 3 последних столбца, формула, конечно, затрётся,
но я не думаю, что это будет для вас проблемой.

Пример в файле: http://excelvba.ru/XL_Files/Sample__...__20-47-47.zip
(обратите внимание на формулы в желтых ячейках - их можно растянуть на любое количество строк)
EducatedFool вне форума Ответить с цитированием
Старый 11.04.2012, 18:53   #3
piratxp
 
Регистрация: 06.05.2008
Сообщений: 4
По умолчанию

Спасибо Вам большое, а подскажите с макросами пример сможете показать?
piratxp вне форума Ответить с цитированием
Старый 11.04.2012, 18:54   #4
piratxp
 
Регистрация: 06.05.2008
Сообщений: 4
По умолчанию

Я имею ввиду, чтобы возможно было код использовать в других проектах...
piratxp вне форума Ответить с цитированием
Старый 11.04.2012, 20:25   #5
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

А формулу разве нельзя использовать в других проектах?

Скопировать формулу в другой файл, и растянуть её на все строки, - это ведь намного проще, нежели копировать код, каждый раз адаптируя его под новую таблицу...
EducatedFool вне форума Ответить с цитированием
Старый 11.04.2012, 20:32   #6
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

По первой части есть неплохой вариант:
по событию изменения ячейки с номером ищем его в словаре (туда заносим все данные при открытии книги и при изменении в базе), если есть в словаре - из словаря берём номер строки номера (такой вот каламбур), из строки - данные. Быстро, словарь всё время в памяти.
Вот как сделать удобно/надёжно вторую часть - не знаю. Можно сделать по изменению последней ячейки в строке - но как гарантировать, что последняя будет заполнена последней?
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Автоматическое заполнение ячеек в разных системах счисления viron Microsoft Office Excel 3 09.01.2012 19:28
Как выполнить автоматическое заполнение ячеек malloy84 Microsoft Office Excel 14 31.03.2011 12:14
Автоматическое заполнение ячеек (VBA) Warhead Microsoft Office Excel 11 15.03.2010 13:07
Автоматическое заполнение диапазона ячеек формулой. garry2000 Microsoft Office Excel 3 02.03.2010 14:19
автоматическое заполнение данными ячеек в excel kasanad80 Microsoft Office Excel 7 17.07.2009 15:31