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

Страницы: 1 2 3 4 5 6 След.
Макрос. Цикл для нескольких таблиц. Как правильно?
 
Сообществу альтруистов очередное спасибо за неувядаемое желание помочь даже тогда когда помочь может только автор поста...

Все советы работали!
Сводные создавались в разное время и имели разные параметры (как оказалось). Ну и пока по кирпичикам всё не разобрал.. одним словом: заставь дурака молиться, так хорошо если голову только себе разобьёт!
Макрос. Цикл для нескольких таблиц. Как правильно?
 
Цитата
Никак не угомонитесь?
Да уж несколько лет туплю. Надо же когда то проломить эту стену. (что делать в соседней камере я пока не знаю)  ;) ))

Вылетает картинка из поста #12
Изменено: Михаил Сид - 15.08.2013 20:22:56
Макрос. Цикл для нескольких таблиц. Как правильно?
 
На этом листе 31сводная, их имена 01÷31.
Макрос. Цикл для нескольких таблиц. Как правильно?
 
И так тоже:
Код
Sub жжж()
For i = 10 To 15
    'Sheets("00А").PivotTables(i).PivotFields("15").Orientation = xlHidden
    'With ActiveSheet.PivotTables(i).PivotFields("25")
        '.Orientation = xlRowField
        '.Position = 15
    'End With
    Sheets("00А").PivotTables(i).PivotCache.RefreshOnFileOpen = True
    Sheets("00А").PivotTables(i).DisplayFieldCaptions = True
    Next
End Sub
Изменено: Михаил Сид - 15.08.2013 18:59:43
Макрос. Цикл для нескольких таблиц. Как правильно?
 
С именами (диапазонами), почти понятно, есть над чем думать.
Код на учебной табличке работает, при попытке привязать к натуре вопит жёлтым матом:
Макрос. Цикл для нескольких таблиц. Как правильно?
 
Ексель на это счёт имеет своё мнение (приложил картинку), хотя Ваше толкование значений слов более верное (имхо) чем переводчика.
Макрос. Цикл для нескольких таблиц. Как правильно?
 
С 10, потому что их имена будут ещё и текстом обрабатываться, их меньше сотни потому длинна имени=2.

В предложенном Вами коде таблицы привязаны к макс. номеру и обрабатываются от большей к меньшей (это я проверяю свои предположения, (учуся)). А если есть нужда обработать 12÷15 тые таблицы, как писать.
Да! код работает. Спасибо.
Макрос. Цикл для нескольких таблиц. Как правильно?
 
Вернулся.
Если вот так:
Код
Sub жжж ()
For i = 10 To 70
    Sheets("01").PivotTables(i).PivotCache.RefreshOnFileOpen = True
    Sheets("01").PivotTables(i).DisplayFieldCaptions = True
    Next
End Sub

То не работает.

для Abakumov, здесь попытка освоить цикл для нескольких операций. При поиске, аналогий не нашел, может в силу собственного непонимания не формулируется и вопрос.
Изменено: Михаил Сид - 15.08.2013 17:31:46 (Доработка)
подсчет непустых СТОЛБЦОВ по условию
 
Зачем тогда много строк в столбце D и что значит условие М1?
Не бывает пустых столбцов для строки. Для листа могут быть. Для строки должны быть ячейки.
Изменено: Михаил Сид - 15.08.2013 13:22:06
подсчет непустых СТОЛБЦОВ по условию
 
Попробуйте сформулировать вопрос, типа: кол-во непустых ячеек по строке от столбца Е до W, в ячейку стобца D.
Ну или свой вопрос.
подсчет непустых СТОЛБЦОВ по условию
 
Вопрос в чём? Что считать? Где?
Макрос. Цикл для нескольких таблиц. Как правильно?
 
Как ЭТО:
Код
[QUOTE]Sub 
For i = 10 To 70
    Sheets("01").PivotTables("i").PivotCache.RefreshOnFileOpen = True
    Sheets("01").PivotTables("i").DisplayFieldCaptions = True
    Next
End Sub[/QUOTE]

, должно быть написано правильно? Т.е. цикл для нескольких таблиц и для особо развитых пользователей  :)
Excel 2010 не суммирует.
 
Задаватель вопроса вроде всё ясно расписал, про "какую ошибку". Ошибку юзверя. Коими мы и становимся после составления таблички  :D
Excel 2010 не суммирует.
 
ber$erk, именно об этом я и говорил =СУММ(E7:H7;ЕЧИСЛО(E7:H7)). Не применял я до того эту конструкцию.
Цитата
ber$erk, зачем =СУ...
думаю это правильно, исключает ошибку оператора.
Excel 2010 не суммирует.
 
Да, формат не доглядел. Но формула работает.
И Gosha06, Столбцу Итого надо добавить знаков после зпт.
Excel 2010 не суммирует.
 
Ivan.kh, я не понял вопрос.
Изменено: Михаил Сид - 15.08.2013 11:11:43
Excel 2010 не суммирует.
 
Уверен. Можно конечно и чайной ложкой котлован копать, типа:
=ЕСЛИОШИБКА(ЕСЛИ(ЕЧИСЛО(F7);F7;0)+ЕСЛИ(ЕЧИСЛО(G7);G7;0)+ЕСЛИ(ЕЧИСЛО(H7);H7;0)+ЕСЛИ(ЕЧИСЛО(E7);E7;0);0)

по крайней мере, мне известный способ. Есть что то более изящное в массивах. Не вспоминается..
Изменено: Михаил Сид - 15.08.2013 11:08:39
Excel 2010 не суммирует.
 
Ексель не умеет складывать числа и буквы(символы). У Вас в стодбце Е стоит "-", уберите.
Много формул в Диспетчере имен, как сделать проще
 
Недавно решал подобную задачу. Не решил. Только отдельное имя для листа, вообще то оно иначе и работать не может. Откуда екселю знать про которую из ячеек Вы сейчас думаете, т.е. для какого из листов "универсальное_имя" должно брать данные (такое у меня сейчас понимание этого вопроса).
Изменено: Михаил Сид - 12.08.2013 17:34:42
Автоматическая разноска по ячейкам исходя из условия, Как из значений в одной ячейке разнести в разные!
 
Просто пишите: если(еошибка(выражение);"";выражение)
Автоматическая разноска по ячейкам исходя из условия, Как из значений в одной ячейке разнести в разные!
 
Вот так, работает, но у Вас идеология построения документа кривая.
И куча условностей.. при заполнении таблицы.

Удачи в разборках.
Макрос. Циклы, и как их "сделать".
 
Ещё раз спасибо. Буду(ем) искать! Закрываем тему.
ps. : изменили 4ую таблицу (код заткнулся), пишем li-5 To 12, и меняется 5ая.... и т.д.
Макрос. Циклы, и как их "сделать".
 
Да я без претензий(!): таки благотворительность.

Про пробелы верно (видать есть нечто на планете, которое при копи-пасте подставляет пробелы).
Про отношение сводных к листу - спасибо, не знал (проверял - верно).

Цикл не работает. Изменяется только та таблица которая указано первой (li=4 To12   - изменяется только 4ая таблица).
Макрос. Циклы, и как их "сделать".
 
Чёт не то:
матюкается на пробелы:
Dim li as long
for li = 1 to 11
   PivotTables(format(li,"00"))_.PivotFields("ф30")_.Caption = "30"
Next li

после уборки (пробелов), продолжает спорить. См файл..
Макрос. Циклы, и как их "сделать".
 
Спасибо.
начинаю пробовать.
Макрос. Циклы, и как их "сделать".
 
Неужто вопрос сложный или неясно сформулированный...
Макрос. Циклы, и как их "сделать".
 
Есть множество сводных, все они имеют названия типа: от 01 до 11, в них нужно изменить название столбца. Как написать, что бы:
PivotTables("08")  .PivotFields("ф30")  .Caption = "30"
выполнялось до нужного номера таблицы?

Спасибо.
Изменено: Михаил Сид - 31.07.2013 16:09:16
Именованные диапазоны. Возможность групповой обработки?
 
В списке надстроек появилась, на ленте - нет. (инструкцию читал, выполнял, перезапускал) Excel13

Видать не работает. Включает дополнительный безыменный лист и всё.
Изменено: Михаил Сид - 30.06.2013 18:39:07
Именованные диапазоны. Возможность групповой обработки?
 
Вот, составил.
Вопрос не в доступности диапазонов, а в возможности с ними работать. (В частности менять назначение.)
Именованные диапазоны. Возможность групповой обработки?
 
Есть пачка диапазонов (несколько), надо изменить им всем имя.
Хотя задача стоит, как динамические+зависимые диапазоны для нескольких листов.
Изменено: Михаил Сид - 30.06.2013 16:41:24
Страницы: 1 2 3 4 5 6 След.
Наверх