Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
как сделать макрос пограмотнее
 
#1
15.03.2010 19:12:28
Добрый вечер! Помогите ещё раз, пожалуйста!    
Вот такой у меня получился, макрос. Я уверена, можно было сделать компактнее.  
Сначала я хотела воспользоваться формулами суммесли и счётесли, но не знаю как в критериях ставить переменные.    
Спасибо
 
 
 
#2
15.03.2010 19:30:20
Макроса нет. Есть сводная. И загляните в "Приемы" - Ctrl+F на странице и ищем "секретное оружие"...  
Z.
 
 
 
#3
15.03.2010 19:40:20
{quote}{login=Z}{date=15.03.2010 07:30}{thema=}{post}Макроса нет.  
Z.{/post}{/quote}  
 
Ой простите, не тот файл загрузила
 
 
 
#4
15.03.2010 19:50:11
Ира, извините, что ввел в заблуждение: "Макроса нет" - это от меня нет ни макроса, ни правки вашего. Посчитал, что такая задача вполне под силу сводной или "=суммпроизв...".  
Z.
 
 
 
#5
15.03.2010 20:05:26
{quote}{login=Z}{date=15.03.2010 07:50}{thema=}{post}Посчитал, что такая задача вполне под силу сводной или "=суммпроизв...".  
Z.{/post}{/quote}  
 
Было бы можно, только наперёд не известно сколько будет подразделений, а уж тем более видов работ (их до 1000)  
Что-то мегафон глючит, видимо, работы на линии
 
 
 
#6
15.03.2010 20:19:26
Было бы можно, только наперёд не известно сколько будет подразделений, а уж тем более видов работ (их до 1000)  
 
 
 
А сводной это всё-равно :-)
 
 
 
#7
16.03.2010 04:11:50
{quote}{login=Serge 007}{date=15.03.2010 08:19}{thema=}{post}А сводной это всё-равно :-){/post}{/quote}  
 
Это не разовая отчётность, а ежесуточная. И выполнять её буду не я, пользователи. Подскажите, как в формулу суммесли в критерии вставить переменную, а?
 
 
 
#8
16.03.2010 06:34:15
Здравствуйте Ира,  
 
Что сразу бросилось в глаза - вы забываете точку в конструкции With - End With:  
Конструкция With - End With - это как вынесение общего знаменателя за скобку, только общим знаменателем здесь является часто повторяющаяся конструкция (родительский объект). К примеру у Вас    
With ThisWorkbook.Worksheets("Лист").Columns("A")    
и внутри все обращения к ячейкам не принадлежащим колонке "А". Правильнее будет    
 
With ThisWorkbook.Worksheets("Лист1")  
   ilastrow = .Cells(.Rows.Count, 1).End(xlUp).Row  
   ...  
End With  
Обратите внимание на точки - они указывают на принадлежность объекту объявленному оператором With (вложенность в скобки).
 
 
 
#9
16.03.2010 07:04:33
Потому что неправльно записана. Нужно примерно так:  
 
.Cells(n, 8).FormulaLocal = "=СУММЕСЛИ(""c:c"";""" & &vidr & """;""d:d"")"
 
 
 
#10
16.03.2010 17:26:35
{quote}{login=VovaK}{date=16.03.2010 07:04}{thema=Cells(n, 8) = "=SUMIF(c:c,&vidr,d:d)" ' Почему не работает?}{post}Потому что неправльно записана. Нужно примерно так:  
 
.Cells(n, 8).FormulaLocal = "=СУММЕСЛИ(""c:c"";""" & &vidr & """;""d:d"")"{/post}{/quote}  
 
 
Спасибо.  
А два условия можно задать?
 
 
 
#11
16.03.2010 19:20:48
В 2007 функция СУММЕСЛИМН, в 2003 проще всего создать дополнительный столбец и сложить критерии (условия) с помощью оператора &. Тогда критериев (условий) может быть сколько в ячейку поместится.
 
 
 
#12
17.03.2010 09:52:12
"А два условия можно задать?" <BR>Уже предлагал, вверху приглашение "Скачать пример", см.- http://www.planetaexcel.ru/tip.php?aid=94 <BR>Z.
 
 
 
#13
18.03.2010 07:44:09
{quote}{login=VovaK}{date=16.03.2010 07:04}{thema=Cells(n, 8) = "=SUMIF(c:c,&vidr,d:d)" ' Почему не работает?}{post}Потому что неправльно записана. Нужно примерно так:  
 
.Cells(n, 8).FormulaLocal = "=СУММЕСЛИ(""c:c"";""" & &vidr & """;""d:d"")"{/post}{/quote}  
 
Не работает
 
 
 
#14
18.03.2010 17:43:40
Ню? Поможите, кто может! Мне ещё там надо выводить итоги по вертикали и горизонтали. По горизонтали вывела, а по вертикали вот бьюсь, не выходит
 
 
 
#15
18.03.2010 17:51:38
Вам в "шашечку" или ехать?.. См. вложения. Сводная была ранее.  
Z.
 
 
 
#16
18.03.2010 18:07:52
Формулой-то я могу, а в макросе это как описать? Если у меня наперёд неизвестно сколько будет колонок и строк
 
 
 
#17
18.03.2010 21:59:39
Пользуйтесь окном Watch для просмотра результата при отладке.
 
 
 
Страницы: 1
Читают тему
Наверх