|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
15.07.2015, 13:42 | #11 |
Пользователь
Регистрация: 14.07.2015
Сообщений: 22
|
на последнем листе
|
15.07.2015, 13:56 | #12 |
Форумчанин
Регистрация: 27.10.2014
Сообщений: 248
|
Интересный, но не особо слоный код, хотя денек придется повозиться.
Смотрите, я правильно понимаю что нужно из итоговой ведомости перевернуть данные таблицы "Сводная ведомость ОМС" и исключить из нее некоторые строки? Почему не всех врачей берете в ф.39? все-таки самый простой и надежный способ - настроить связи, а макросом (т.е.) кнопкой сделать обновление связей |
15.07.2015, 14:06 | #13 | |
Пользователь
Регистрация: 14.07.2015
Сообщений: 22
|
Цитата:
Дело в том, что эта форма 39 идет для врачей которые бесплатно принимают. Если посмотреть в сводной ведомости, то верхняя часть таблицы обозначена как ОМС, а ниже с 49 где то строки идет ПУ( платные услуги). У меня есть еще форма 39 для платного приема..и для других отделений. Мне так не ловко, что я не знаю как к вам обращаться. Если бы вы "для тех кто в танке" объяснили все пошагово...может тогда для меня это было бы легко..а так.. для меня это темный лес... |
|
15.07.2015, 14:20 | #14 |
Форумчанин
Регистрация: 27.10.2014
Сообщений: 248
|
меня зовут Михаил, когда регистрировался было уже занято)
Надеюсь будет интересно: 1. Создайте копию ф.39 - на всякий случай если ничего не получится 2. Открываем ф.39 и удаляем все листы кроме "январь" 3. Работаем только со Звонарев В.Г. 4. Открываем Итоговая ведомость в этом же Excel (не в новом окне) 5. ф.39 - Ячейка В15 ставим "=", переклячить мышью на окно Итоговая ведомость, выбираем ячейку С5, в строке формул появиться формула ='[Итоговая ведомость по ОМС и ПУ12.xls]январь'!$C$5 6. По Звонареву В.Г. аналогично настраиваем оставшиеся ячейки 7. Выделить диапазон С5:Х5 (все строки по Звонареву), протянуть вниз на Иванова и Мусихина. 8. Веделяем все строки Иванов, заменить (Ctrl + F) букву С на D, у Мисихина на F 9. Проверьте, везде ли стоит вышеуказанная формула 10. Копируете лист январь, называете февраль, выделяете строки всех врачей и заменяете "январь" на "февраль" 11. Делаете так весь год 12. Когда закончите, напишите, буду здесь до 17:00 по Москве |
15.07.2015, 15:23 | #15 |
Пользователь
Регистрация: 14.07.2015
Сообщений: 22
|
Михаил, приятно познакомиться. Все сделала, как вы написали. Обновление в таблице происходит автоматически при новом открытие, верно?
|
15.07.2015, 15:31 | #16 |
Форумчанин
Регистрация: 27.10.2014
Сообщений: 248
|
Да, при открытие должно появляться окно "Обновить связи", нажимаете да и все должно обновиться.
Но можно и по-другому. Теперь следующее: 1. В итоговой ведомости поменяйте данные, например Звонарев -1, Иванов - 2, Мусихин - 3, желательно поменять во всех листах за весь год Потом закроете ее без сохранения 2. В ф. 39 переходите на вкладку данные - там есть кнопка "Обновить все" - это кнопка обновления связей Проверяйте чтобы все работало 3. Закройте Итоговую ведомость без сохранения Если все работает, давайте сделаем кнопку |
15.07.2015, 15:39 | #17 |
Пользователь
Регистрация: 14.07.2015
Сообщений: 22
|
Получается теперь, даже при закрытие без сохранения данных в ф.39 у меня должно было все смениться на 1,2,3
|
15.07.2015, 15:44 | #18 |
Форумчанин
Регистрация: 27.10.2014
Сообщений: 248
|
Так кнопка Вам нужна или и без нее обойдетесь?
|
15.07.2015, 15:46 | #19 |
Пользователь
Регистрация: 14.07.2015
Сообщений: 22
|
Давайте попробуем сделать. Мне с ней более удобно будет.
|
15.07.2015, 15:54 | #20 |
Форумчанин
Регистрация: 27.10.2014
Сообщений: 248
|
Будем делать макрос.
Переходите на вкладку Разработчик - если ее нет, до добавьте в настройках ленты. Найдите Visual Basic - двойной щелчок. Сверху - Insert - Module В Module1 добавляете код Код:
В удобном месте вставьте любую фигуру (фото). Нажмете правую кнопку мыши на объекте - Назначить макрос - Выберете обновить. Кнопка готова Сохраните все изменения. Закройте документ Теперь надо потестировать - также меняете данные в Итоговая ведомость в различных вариантах, когда один закрыт, другой открыт, оба открыты и др. - т.е. всякие ситуации, которые могут в жизни с этими файлами произойти |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Копирование данных из одной книги в другую в разные столбцы. | kipish_lp | Microsoft Office Excel | 15 | 15.07.2015 07:27 |
Перенос данных из одной книги в другую | Lanse | Microsoft Office Excel | 2 | 05.10.2013 13:17 |
Перенос данных из одной книги в другую | and150382 | Microsoft Office Excel | 3 | 26.03.2013 12:21 |
Копирование данных из одной рабочей книги в другую макросом. | Andrey3055 | Microsoft Office Excel | 2 | 30.10.2009 22:00 |
Перенос данных из одной книги со многих листов в другую | gavrylyuk | Microsoft Office Excel | 34 | 20.07.2008 21:39 |