Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 След.
Сбивается срез сводной таблицы
 
Добрый день, с чем связано - сбивается кнопки среза (от сводной таблицы)
Когда ее публикую в Sharepoint.

Когда публикую на веб страницу то сначала сжатые кнопки, а когда нажму на кнопку они раскрываются и нормально отображаются.
Сбор книг на один лист
 
Добрый день! Нашел макрос сбора книг на один лист.
Но необходимо доработка
1. Что бы макрос не создавал разные листы а только один итоговый (и его обновлял)
2. Куда прописать заголовок таблицы начиная с А1 - до А4

Спасибо!
Преобразовать текст в определеный формат
 
Добрый день.
Подскажите плз как преобразовать данный пример в колонке А в форматы колонок B и C
Спасибо!
Область печати: при сохранение в pdf диаграмма делится на части
 
Добрый день! Подскажите пожалуйста как при сохранение файла в формате .pdf.
Область была как на примере. А то получается при сохранение в pdf диаграмма делится на части. как избежать этого?

Спасибо.
Изменено: Castromen - 26.02.2015 21:09:33
Ранжирование от меньшего к большему
 
Добрый день подскажите синоним функции Ранг только на оборот что бы чем меньше было значения тем выше ее ранг.
Код
=ЕСЛИОШИБКА(РАНГ(CK107;$CK$107:$CK$122)+СЧЁТЕСЛИ(CK$107:CK107;CK107)-1;"-")
т.е 37 =1 место,
     47 = 2 место
     48 = 3 и т.д.

Спасибо.
Защита определенной диаграммы
 
Добрый вечер! подскажите пожалуйста можно ли макросом прописать определенное условие для сводной диаграммы что бы ее нельзя было удалить или передвинуть.
Убрать пусто в сводной таблице
 
Добрый день! Подскажите пожалуйста как в этот макрос дописать команду что бы автоматически при обновление сводных скрывались в фильтре пустые значения т.е "пусто"
Спасибо.

Код
Private Sub Worksheet_Activate()
    Dim pt As PivotTable
    With Me
        .Unprotect Password:="6774219"
        For Each pt In .PivotTables
            pt.RefreshTable
        Next pt
         
        .Protect Password:="6774219", DrawingObjects:=True, Contents:=True, _
            Scenarios:=False, AllowSorting:=True, AllowFiltering:=True, _
            AllowUsingPivotTables:=True
    End With
End Sub
 
Изменено: Castromen - 15.02.2015 16:29:58
Отсортировать сводную таблицу по столбцу
 
Добрый вечер. Всю голову сломал как отсортировать сводную таблицу по колонке "Позиция" (специально добавил для сводной что бы сортировалось по ней).
Но все равно не получается, помогите пожалуйста.
Формула для расчета остатка
 
Добрый день!
Подскажите пожалуйста формулу. Как рассчитать остаток аванса.

Логика такая - если признак Аванс (ячейка B2.B3)
дальше идет оплата по счету (A4.A5.A6) и вычитается из суммированного остатка аванса(J3) каждый платеж, как только признак Аванc(B7)
то сумма (С7) прибавляется к остатку аванса по данному договору (J7)

Помогите пожалуйста написать формулу.
Определение цвета ячейки
 
Добрый день!

Подскажите где ошибка имеется часть макроса а именно условие определение цвета и передача его в HTML но не могу понять какой формат поставить  что бы передавался в RBG
Код
      ' Определения цвета ячейки
      If Not IsNull(cell.Interior.Color) Then
         strColorCell = " bgcolor=#" & Format(cell.Interior.Color, RBG)
      End If
 

Спасибо.
Изменить источник в формулах
 
Добрый вечер!
Имеются 3 листа с формулами привязанные к листу Источник.
Как заменить макросом имя источника допустим на другую книгу не прибегая к использованию "найти и заменить"? Спасибо.
Экспорт из Excel в html
 
Доброе утро!
Нашел макрос экспорта из excel в html.
Подскажите пожалуйста как выполнить эти условие

1. В макросе указать определенный диапазон, который надо копировать в буфер
2. Скрытые ячейки не копировать
3. Также прописать точный адрес к файлу primer.html

Спасибо.
Изменено: Castromen - 01.02.2015 13:54:57
Защита на листе где находится сводная таблица
 
Доброе утро! Подскажите пожалуйста как исправить ошибку.
Имеется на одном листе 3 сводные таблицы.
Прописываю макрос
Код
Private Sub Worksheet_Activate()
ActiveSheet.Unprotect Password:="123"
ActiveSheet.PivotTables("СводнаяТаблица1").PivotCache _
        .Refresh
ActiveSheet.PivotTables("СводнаяТаблица2").PivotCache _
        .Refresh
ActiveSheet.PivotTables("СводнаяТаблица3").PivotCache _
        .Refresh
ActiveSheet.Protect Password:="123", DrawingObjects:=True, Contents:=True, Scenarios:= _
        False, AllowSorting:=True, AllowFiltering:=True, AllowUsingPivotTables:= _
        True
End Sub

 
Макрос работает. но когда закрываешь файл и заново заходишь выдает ошибку.
Как с ней бороться?
Спасибо.
Изменено: Castromen - 22.01.2015 10:41:45
Сортировка в сводной таблице
 
Добрый вечер! Подскажите пожалуйста как заставить сводную таблицу сортировать ячейки так же как и в источнике.
Спасибо
Изменено: Castromen - 21.01.2015 17:40:37
Построить график без учета пустых ячеек в таблице
 
Добрый день!
Есть таблица с формулами она автоматически заполняется, и  каждый раз по разному.
Не могу понять как выстроить алгоритм что бы график автоматически строился исходя из заполненных данных а не их пустых.

Буду очень признателен.
Наименьшее значения по условиям
 
Добрый день уважаемые!
Подскажите пожалуйста как реализовать такие условия.
Имеется таблица, необходимо вытаскивать наименьшее значения по колонке "С" с условиями.
Самая последняя дата принадлежащая к 1 кварталу. >=01.01.2010 - <01.04.2010
Код
{=ЕСЛИОШИБКА(НАИМЕНЬШИЙ(ЕСЛИ((A2:A8=H3)*(B2:B8>="01.01.2001")*(B2:B8<"01.04.2001");C2:C8;"");1);"")}
Спасибо большое!
Автоматическое изменения связей с файлом
 
Добрый день!
Подскажите пожалуйста как можно автоматически изменить ссылки в формулах на другой источник в другом файле?
В ручном режиме я делал Найти -> Заменить поиск по всем листам, в формулах.

Хотелось бы:
Через кнопку, открывается диалоговое окно и выбираем путь к файлу (структура файлов одинаковая)
И все ссылку автоматически обновлялись.

Буду признателен!
Поиск наименьшего значения по двум условиям
 
Добрый день!
Подскажите пожалуйста с поиском наименьшего значения по двум условиям.

Спасибо.
Нумерация ячеек в зависимости от значения %
 
Добрый день, уважаемые!
Подскажите как сделать нумерацию ячеек в зависимости от значения(%)
100%- 1 место
и так далее. (чем больше % тем выше место)

Спасибо.
Сумма значений диапазона по условиям
 
Добрый вечер! Уважаемые форумчане, помогите написать формулу.
Имеется таблица с 3 колонками,
необходимо просуммировать все в колонке "С" по условию:

если в колонке "А" ">0" или "пусто", а в колонке "B" ">0" или "пусто"
+
если в колонке "А" ">0" или "пусто", а в колонке "B" "<0" или "пусто"
+
если в колонке "А" "<0" или "пусто", а в колонке "B" ">0" или "пусто"


Спасибо.
Изменено: Castromen - 03.12.2014 20:48:37
Суммирование по нескольким условиям, сократить формулу с Суммеслимн
 
Добрый День!
Подскажите пожалуйста как можно сократить формулу:

Код
=СУММЕСЛИМН('План РМТБ 2014'!$L:$L;'План РМТБ 2014'!$C:$C;"1";'План РМТБ 2014'!$E:$E;"ВСП_НФ";'План РМТБ 2014'!$B:$B;'Титульный Лист'!$I$3;'План РМТБ 2014'!$M:$M;"С") 
СУММЕСЛИМН('План РМТБ 2014'!$L:$L;'План РМТБ 2014'!$C:$C;"1";'План РМТБ 2014'!$E:$E;"ВСП_НФ";'План РМТБ 2014'!$B:$B;'Титульный Лист'!$I$3;'План РМТБ 2014'!$M:$M;"Д")
на ИЛИ {С;Д;Д-к}

Спасибо большое.
При переходе на ссылку выводить отфильтрованную таблицу по условию
 
Добрый день, уважаемые форумчане!
Подскажите пожалуйста как реализовать такую схему.

На листе "СВОД ДАННЫХ" - таблица с данными.
Как сделать чтобы при переходе на ссылку выводилась отфильтрованная таблица по условию.
Ссылка "Условие 1" - лист Свод данных "Условие 1" (колонка Т)

Спасибо.
Ошибка в формуле с датой
 
Добрый день! Подскажите плз в где ошибка.
Если А1 больше 40 тыс. и дата до 30 июня
Если А1 меньше 40 тыс. и дата после начинается 01 июля
Код
=ЕСЛИ(И(A1>40000;B1<"30-6-2015");"Верно";"Нет") 
=ЕСЛИ(И(A1<40000;B1>"01-7-2015");"Верно";"Нет")
 
Не работает условие с Датой.
Формирования листа по условию
 
Добрый день! Подскажите пожалуйста как можно реализовать данное условие.

На «листе 1» формируется таблица исходя из данных «листа 2», т.е. если на «листе 2», стоит значения в колонке С (Наличие работ (Да/Нет)) «ДА», то перетягивает всю строчку на «лист 1».
Спасибо.
Защита титульного листа
 
Добрый день.
Имеется 3 листа 1-Титульный лист, 2-3- сводные таблицы выведенные на листе Титульник,
Защиту ставлю на всех 3 листах
Код
Private Sub Worksheet_Activate()
    ActiveSheet.Unprotect
PivotTables(1).PivotCache.Refresh
PivotTables(2).PivotCache.Refresh
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFormattingCells:=True, AllowFormattingColumns:=True, AllowFormattingRows:=True, AllowSorting:=True, AllowFiltering:=True, AllowUsingPivotTables:=True
End Sub 
Но не пойму что еще добавить что бы группировка раскрывалась на листе Титульник?
Сводная таблица (убрать ПУСТО)
 
Доброе утро!
Имеется таблица данных но она с пустыми ячейками (там стоят формулы)
При формирование сводной таблицы появляются значения "ПУСТО".
Жду предложение по моей ситуации.
Подключение к базе данных через Microsoft Query
 
Доброе утро.
Создаю подключение к базе данных через Microsoft Query.
В создание запроса и выборе столбцов какие то F? (F9. F10. F11. F12. F13. F14)
Как их убрать?
Защищенный лист
 
Добрый день коллеги!
Подскажите как решить проблему.
На листе.1 сводные и срезы:

Макрос для обновления данных.
Код
Private Sub Worksheet_Activate()
PivotTables(1).PivotCache.Refresh
PivotTables(2).PivotCache.Refresh
End Sub
После того как ставлю защиту листа ошибка:
Run-time error 1004:
Эта команда не может быть выполнена, если защищенный лист содержит другой отчет сводной таблицы, основанный на тех же исходных данных.
Создание титульного листа (на примере Семейного бюджета)
 
Добрый вечер! Помогите разобраться.

Создаю таблицу с формулами -> Форматирую как таблицу.
Как вынести СРЕЗ и саму таблицу на новый лист  (как на примере "Проект".)
Спасибо.
10 условий в формуле
 
Добрый день, подскажите как реализовать 10 условий в одной формуле.
Отблагодарю материально.Спасибо.
Страницы: 1 2 След.
Наверх