Суммирование из двух книг в одну до заданной даты

Дата: Среда, 18.04.2012, 14:42 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 17

Репутация: 0 ±

Замечаний: 0% ±

Добрый день.
Есть не разрешимая для меня задачка. Т.к. мне кажется что без VBA ее не решить, а сним я не на ты.
Две одинаковые статичные книги в которые вносятся ежесуточные данные. Сделал их одинаковыми, чтобы безпроблемно можно было перейти на следующий год.
Переименовав текущий в прошлый и кинув пустую как текущий.
Нужен подсчет в игоговую таблицу "Оперативная сводка" зависящий от даты вводимой в А2. В первую часть "за сутки" необходимо просто вывести данные из двух книг за указанную дату. Во вторую часть "с начала месяца" соответственно сумму с начала мес до указанной даты. Раздельчик по окончанию месяца заполяется вручную т.к. эти данные могут отличаться от опер.слежения. В третью часть соответственно сумма с начала года. Текущий прошлый из соответствующих таблиц.

К сообщению приложен файл: 6233922.rar (63.6 Kb)

Дата: Среда, 18.04.2012, 15:35 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Если убрать объединённые ячейки (красоту можно и по другому навести), то можно обойтись одной формулой, см. вложение

К сообщению приложен файл: DmitriyGen.rar (28.0 Kb)

ЮMoney:41001419691823 | WMR:126292472390

Дата: Среда, 18.04.2012, 15:45 | Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 17

Репутация: 0 ±

Замечаний: 0% ±

Спасибо!
Ну это за текущие сутки решает проблему. Это самая простая из задач. Меня напроч ставят в тупик две другие задачи общитать с начала месяца и года?
Тут я так полагаю без VBA не решить.
Думаю нужно какой-то масив размерностью в разницу дат организовывать и общитывать. Но т.к. с VBA абсолютно не знаком не заню как это сделать.
Причем в этом случае проблема высокосного года всплявает. Разница от сегодняшней даты до 1 января 2012 года и за аналогичный период прошлого года будет отличаться на еденицу. А исходные таблицы для универсальности сделал одинаковые в феврале 29 дней.
Ну а внешний вид исходных таблиц абсолютно неважен лишбы было понятно что куда бить. А итоговую тоже можно общитать в какую-то более удобную для подсчета промежуточную табличку. А затем просто перенести простыми ссылками в разукрашенную.

Сообщение отредактировал DmitriyGen - Среда, 18.04.2012, 16:17

Дата: Среда, 18.04.2012, 16:11 | Сообщение № 4

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Quote (DmitriyGen)

Это самая простая из задач

Вы ошибаетесь. Все три задачи на самом деле являются одной и имеют одно решение.
Его я Вам уже предложил. Для того, что бы считалось с начала года или с начала месяца вот эту часть формулы:
[vba]

Code

($A$2='[Текущий год.xls]Лист1'!$A$2:$A$29)

[/vba] надо будет заменить на[vba]

Code

($A$2<='[Текущий год.xls]Лист1'!$A$2:$A$29)*(ДАТА($A$2;1;1)>='[Текущий год.xls]Лист1'!$A$2:$A$29)

[/vba] - это для года, [vba]

Code

($A$2<='[Текущий год.xls]Лист1'!$A$2:$A$29)*(ДАТА($A$2;$A$2;1)>='[Текущий год.xls]Лист1'!$A$2:$A$29)

[/vba] - это для месяца.

ЮMoney:41001419691823 | WMR:126292472390

Дата: Среда, 18.04.2012, 16:28 | Сообщение № 5

Группа: Пользователи

Ранг: Новичок

Сообщений: 17

Репутация: 0 ±

Замечаний: 0% ±

Спасибо огромное сейчас попробую.

Дата: Среда, 18.04.2012, 17:43 | Сообщение № 6

Группа: Пользователи

Ранг: Новичок

Сообщений: 17

Репутация: 0 ±

Замечаний: 0% ±

ДАТА($A$2;1;1) в годе
ДАТА($A$2;$A$2;1) в месяце
выдают ошибку #ЧИСЛО!

И еще вопрос как защититься от ввода пробела в книге с исходными данными т.е. в Текущий год.

Сообщение отредактировал DmitriyGen - Среда, 18.04.2012, 17:47

Дата: Среда, 18.04.2012, 17:50 | Сообщение № 7

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Quote (DmitriyGen)

ДАТА($A$2;1;1) в годе
ДАТА($A$2;$A$2;1) в месяце
выдают ошибку #ЧИСЛО!

Давайте файл с ошибкой

Quote (DmitriyGen)

...как защититься от ввода пробела в книге с исходными данными т.е. в Текущий год?

Удалить кнопку Space с клавиатуры smile

На 100% - никак.
Проще в формулах применять функцию СЖПРОБЕЛЫ()

ЮMoney:41001419691823 | WMR:126292472390

Дата: Среда, 18.04.2012, 18:01 | Сообщение № 8

Группа: Пользователи

Ранг: Новичок

Сообщений: 17

Репутация: 0 ±

Замечаний: 0% ±

Quote

На 100% - никак.
Проще в формулах применять функцию СЖПРОБЕЛЫ()

Ну я про это и имел ввиду, а то в любой ячейке нажмут пробел и все формулы в ошибках а пойди ее найди эту ячейку.

Вот файл с ошибкой.

К сообщению приложен файл: 4160197.rar (24.8 Kb)

Сообщение отредактировал DmitriyGen - Среда, 18.04.2012, 18:13

Дата: Среда, 18.04.2012, 20:16 | Сообщение № 9

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Оба накосячили smile

Я перепутал операторы сравнения, а Вы вставили часть формулы ПОСЛЕ СУММПРОИЗВ(), а не в неё.
Исправил, см. вложение.

Quote (DmitriyGen)

а то в любой ячейке нажмут пробел и все формулы в ошибках

Ну так не только пробел может быть. Можно и слово неправильно написать. Советую выпадающие списки.

ЗЫ Пересылайте файлы в папке, иначе теряется связь между ними

К сообщению приложен файл: 4669060.rar (22.9 Kb)

ЮMoney:41001419691823 | WMR:126292472390

Дата: Четверг, 19.04.2012, 13:10 | Сообщение № 10

Группа: Пользователи

Ранг: Новичок

Сообщений: 17

Репутация: 0 ±

Замечаний: 0% ±

Огромное спасибо. Табличку доделал. Все работает.
Осталась проверка в деле и я в отпуске. biggrin