Для раскраски определенных частей графика необходимо сравнить даты диапазона из сводной (обведено рамкой на картинке) с датами из колонки L, листа data.
Нахожу диапазон по примеру от Peltier (там в самом конце "Complex Range"), но почему-то при таком способе: - во-первых, выделяемый диапазон смещается на один ряд вниз (выделено желтым). - во-вторых, ладно бы он смещался для всех одинакого, но для последнего "name3" конец диапазона не смещается вниз на один, а заканчивается на последней строке сводной.
Подскажите, пожалуйста, что не так? [vba]
Код
Set ptRng = Intersect(pt.PivotFields("name").PivotItems("name1").DataRange.EntireRow, pt.PivotFields("start1").DataRange)
[/vba] к сожалению файл не влез в 100кб лимит, залил на мегу Внешняя ссылка удалена администрацией - это нарушение п.3 Правил форума
UPD. переделал файл с нуля и он стал меньше места занимать еще заметил что после нескольких изменений цвета кнопкам и сохранения размер файла каждый раз увеличивается на пару килобайт, собственно так первый файл и вырос с 50 до 160кб.. очень странно, из-за чего так происходит? - удаление графика не возвращает файл к первоначальному размеру - на листах лишних данных тоже нет (ctrl+end показывает только занятые данными области) - в настройках сводной отключено хранение исходных данных и показ деталей
Доброго времени суток,
Для раскраски определенных частей графика необходимо сравнить даты диапазона из сводной (обведено рамкой на картинке) с датами из колонки L, листа data.
Нахожу диапазон по примеру от Peltier (там в самом конце "Complex Range"), но почему-то при таком способе: - во-первых, выделяемый диапазон смещается на один ряд вниз (выделено желтым). - во-вторых, ладно бы он смещался для всех одинакого, но для последнего "name3" конец диапазона не смещается вниз на один, а заканчивается на последней строке сводной.
Подскажите, пожалуйста, что не так? [vba]
Код
Set ptRng = Intersect(pt.PivotFields("name").PivotItems("name1").DataRange.EntireRow, pt.PivotFields("start1").DataRange)
[/vba] к сожалению файл не влез в 100кб лимит, залил на мегу Внешняя ссылка удалена администрацией - это нарушение п.3 Правил форума
UPD. переделал файл с нуля и он стал меньше места занимать еще заметил что после нескольких изменений цвета кнопкам и сохранения размер файла каждый раз увеличивается на пару килобайт, собственно так первый файл и вырос с 50 до 160кб.. очень странно, из-за чего так происходит? - удаление графика не возвращает файл к первоначальному размеру - на листах лишних данных тоже нет (ctrl+end показывает только занятые данными области) - в настройках сводной отключено хранение исходных данных и показ деталейuser0
Через PivotSelect ссылается на ту область которая нужна, но работает только на активном листе (не нашел как сделать чтобы оно работало на неактивном/скрытом), да и хотелось бы избежать выделения.
Через PivotSelect ссылается на ту область которая нужна, но работает только на активном листе (не нашел как сделать чтобы оно работало на неактивном/скрытом), да и хотелось бы избежать выделения.user0
Сообщение отредактировал user0 - Воскресенье, 19.11.2017, 16:32
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
