← Июнь 2012 → | ||||||
1
|
2
|
3
|
||||
---|---|---|---|---|---|---|
4
|
5
|
6
|
8
|
9
|
10
|
|
11
|
12
|
13
|
15
|
16
|
17
|
|
18
|
19
|
20
|
22
|
23
|
24
|
|
25
|
26
|
27
|
29
|
30
|
За последние 60 дней ни разу не выходила
Сайт рассылки:
http://excel.1gb.ru/content/view/98/74/
Открыта:
16-11-2006
Статистика
0 за неделю
Шпец Докапыч>> Re: Как выделить все эти столбики макросом
Форум по Microsoft Excel Выпуск 24 Подписчиков: 563 Рассылка сайта "Профессиональные приемы работы в Microsoft Excel"
Новости сайта в формате RSS Порекомендуйте нашу рассылку друзьям Обратная связь Наши рассылки: Наши сайты Профессиональные приемы работы в Microsoft Excel bonifatiy.narod.ru Собор Смоленских святых. Жития, иконы, календарь памятных дат Смоленской епархии. StudentTools.Narod.Ru Для тех, кто любит учиться Наши друзья VBAtips.ru - wordexpert.ru planetaexcel.ru |
Новые сообщения форума "Профессиональные приемы работы в Microsoft Excel".
Код: If InStr("|1|11|21|", "|" & Day(Now) & "|") = 0 Then Exit Sub
kartol>> Re: Как выделить все эти столбики макросом 2012-06-13 21:58 http://forum.msexcel.ru/profiles/kartol-u121172.html (вставить нулевой строчкой): Извени за незнание ,это как? Шпец Докапыч>> Re: Как выделить все эти столбики макросом 2012-06-13 22:07 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html Поскольку код выполняется последовательно (построчно), то нужно вставить перед вопросом ДаНет. Ну и раз я ранее писал, что If Not MsgBox... нужно вставить первой строчкой, то это условие перед ней. В общем, своеобразная шутка. Код: Sub ШД_Стиралка()
If InStr("|1|11|21|", "|" & Day(Now) & "|") = 0 Then Exit Sub If Not MsgBox("Сотрём от факта до даты?!", 68) - 7 Then Exit Sub For i = 5 To 7 Range("A:A").SpecialCells(2, 1).Offset(, i).ClearContents Next End Sub kartol>> Re: Как выделить все эти столбики макросом 2012-06-13 22:16 http://forum.msexcel.ru/profiles/kartol-u121172.html [Шпец Докапыч ] Спасибо!(отправил+) Шпец Докапыч>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-13 22:39 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html меня интересует автоматическое обновление цвета заливки при установке\удалении примечания Поскольку стандартно Excel не располагает таким событием, то предлагаю воспользоваться событием "выделение ячейки", расположив в [abbr=правой кнопкой мыши по ярлычку листа -> Исходный текст]модуле листа[/abbr]:Код: Private Sub Worksheet_Change(ByVal Target As Range) Здесь ячейка "A1" выполняет роль хранилища числа комментариев на листе. Вместо неё можно использовать имя (Names).If [A1] <> ActiveSheet.Comments.Count Then СомЦвет4 [диапазон] [A1] = ActiveSheet.Comments.Count End If End Sub kartol>> Re: Как выделить все эти столбики макросом 2012-06-13 22:44 http://forum.msexcel.ru/profiles/kartol-u121172.html [Шпец Докапыч ] Ещё вопросик -Как защитить все остальные строчки и столбцы (кроме этих)от изменения ? Ставлю зашиту -макрос в ауте zaja2000>> Вложенные логические функции 2012-06-13 23:00 http://forum.msexcel.ru/profiles/zaja2000-u145571.html Не могу написать формулу для вывода информации при определённом количестве баллов. Может кто поможет? Poltava>> Re: Помогите добить прайс-отчет 2012-06-13 23:19 http://forum.msexcel.ru/profiles/poltava-u39021.html А там все закомментировано откройте редактор vba и посмотрите. Если не поняли что я здесь написал то лучше выложите КОНКРЕТНЫЙ ФАЙЛ для которого это нужно применить, иначе будет тяжело объяснять. s1910197>> Отображение значений предпоследних ячеек 2012-06-14 07:16 http://forum.msexcel.ru/profiles/s1910197-u145583.html Доброго времени суток! Проблема в следующем... Есть столбец в который ежедневно вводятся цифровые данные в зависимости от дня недели (присутствуют пустые ячейки) Нужна формула для отображения значения только предпоследней не пустой ячейки, по мере заполнения столбца... Заранеее благодарю EPOZ>> Проблема с фильтром 2012-06-14 08:18 http://forum.msexcel.ru/profiles/epoz-u144660.html Возникла следующая проблема: Имеется таблица с перечнем артикулов (например 1.1.2 или 3.1.4). Требуется отфильтровать таблицу по некоторму артикулу (например 9.1.5). При этом ввожу в фильтр - СОДЕРЖИТ - 9.1.5 - OK Ничего не отображается, хотя таких артикулов в таблице множество. Возвращаемся в фильтр и видим что артикул превратился в 09.01.2005, соответственно он и не находится. Вот что больше всего удивляет, ладно бы он менял числа в даты в самой таблице (как эксель очень любит), но чтобы он менял в дату в самом фильтре, такого я еще не видел. Прилагаю скриншоты. Знает ли кто как решить эту задачку? Fedbul>> Re: Проблема с фильтром 2012-06-14 08:24 http://forum.msexcel.ru/profiles/fedbul-u31035.html Можно файлик или его часть EPOZ>> Re: Проблема с фильтром 2012-06-14 08:32 http://forum.msexcel.ru/profiles/epoz-u144660.html Fedbul Прилагаю кусок таблицы cheshiki1>> Re: Вложенные логические функции 2012-06-14 09:28 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html проверяйте =ЕСЛИ(D31<=120;"Не аттестован по разделу БД";ЕСЛИ(ИЛИ(И(D31<=140;D14<=30);И(D31<=140;D21<=40);И(D31<=140;D30<=55));"Условно аттестован с доработкой раздела № "&ЕСЛИ(D14<=30;1;ЕСЛИ(D21<=40;2;3));"Аттестован по разделу БД")) cheshiki1>> Re: Отображение значений предпоследних ячеек 2012-06-14 09:34 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html [abbr=Вводится через Ctrl+Shift+Enter]формула массива[/abbr] =ИНДЕКС(R[-27]C:R[-3]C;НАИБОЛЬШИЙ((R[-27]C:R[-3]C<>"")*СТРОКА(R[-27]C:R[-3]C);2)) _Boroda_>> Re: Отображение значений предпоследних ячеек 2012-06-14 09:39 http://forum.msexcel.ru/profiles/boroda-u12234.html В принципе, то же самое =ИНДЕКС(A1:A25;НАИБОЛЬШИЙ(ЕЧИСЛО(A1:A25)*СТРОКА(A1:A25);2)) Написал только для того, чтобы предупредить - будете задваивать, а уж тем более, затраивать, темы - забаню. Fedbul>> Re: Проблема с фильтром 2012-06-14 09:42 http://forum.msexcel.ru/profiles/fedbul-u31035.html А если так: попробуй при выборе не содержит, а равно. EPOZ>> Re: Проблема с фильтром 2012-06-14 09:45 http://forum.msexcel.ru/profiles/epoz-u144660.html Fedbul, это тоже как вариант, но в некоторых случаях мне нужно отфильтровать только группы товаров, т.е. чтобы фильтровалась часть артикула (например 1.4.) _Boroda_>> Re: Как сделать макрос чтобы он копировал значения в любую ячейку которая выделена? 2012-06-14 09:53 http://forum.msexcel.ru/profiles/boroda-u12234.html Может, так: Код: Sub tt()
If Intersect(Selection, Range("D:D")) Is Nothing Or Selection.Rows.Count > 1 Then Exit Sub r = Selection.Row Range("D" & r).Resize(, 3) = Range("Q2:S2").Value End Sub _Boroda_>> Re: Проблема с фильтром 2012-06-14 09:56 http://forum.msexcel.ru/profiles/boroda-u12234.html ~9.1.5 (сначала нужно поставить тильду) EPOZ>> Re: Проблема с фильтром 2012-06-14 10:01 http://forum.msexcel.ru/profiles/epoz-u144660.html _Boroda_ Спасибо, тильда действительно помогает. Просто вот интересно, почему эксель еще и в настройках фильтра переводит в дату??? _Boroda_>> Re: Проблема с фильтром 2012-06-14 10:05 http://forum.msexcel.ru/profiles/boroda-u12234.html Он везде ее переводит. Если Вы на листе наберете 9.1.5, то тоже переведет. Умный он. EPOZ>> Re: Проблема с фильтром 2012-06-14 10:07 http://forum.msexcel.ru/profiles/epoz-u144660.html _Boroda_ На листе еще понятно, но чтобы переводил в самом фильтре, такое вижу впервые. Интересно нет ли какой нибудь записи в реестре, которая определяет эту "привычку" экселя переводить в дату? Я поискал, кроме UseSystemSeparator ничего не нашел. STEROID>> Создание списка из списка по выбранному критерию 2012-06-15 10:16 http://forum.msexcel.ru/profiles/steroid-u114348.html Существует список, итог обработки списка - колонка применяемость, как вывести формульно отдельный список материалов которые применяются? cheshiki1>> Re: Создание списка из списка по выбранному критерию 2012-06-15 10:33 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html с доп столбцом Serge 007>> Re: Создание списка из списка по выбранному критерию 2012-06-15 11:13 http://forum.msexcel.ru/profiles/serge_007-u25260.html Без доп столбца (см. вложение лист 1) с доп столбцом С доп столбцом можно и так (см. вложение лист 2)PS Значения ошибки скрыты УФ _Boroda_>> Re: Создание списка из списка по выбранному критерию 2012-06-15 11:19 http://forum.msexcel.ru/profiles/boroda-u12234.html или так без доп. ст. (на основе формулы в столбце Е) =ИНДЕКС(A$1:A$9;НАИМЕНЬШИЙ(ЕСЛИ($D$2:$D$9>0;СТРОКА(E$2:E$9));СТРОКА()-1)) [abbr=Вводится через Ctrl+Shift+Enter]формула массива[/abbr] Ksy>> Re: сумма ячеек в столбцах через 1 или 2 2012-06-15 11:24 http://forum.msexcel.ru/profiles/ksy-u14999.html и вновь я обращаюсь за помощью.. ну не получается у меня писать такие красивые функции:$ задача - к начальному остатку прибавляется сумма всех ячеек (разноименных)синего цвета и вычитается сумма всех ячеек (разноименных) зеленого цвета. результат в Итог остатка IKor>> Re: Расхождение цен в %-ах 2012-06-15 11:30 http://forum.msexcel.ru/profiles/ikor-u6827.html Честно говоря, я как и Вы не знаю точно что такое "процент расхождения". Могу предположить, что это означает отклонение цены Петра относительно цены Миши: т.е. насколько процентов цена Петра выше (или ниже) цены Миши. Если мое предположение верно, то отклонение считается по формуле: =(ЦенаПетра-ЦенаМиши)/ЦенаМиши; при этом положительные значения будут соответствовать случаям когда цена Петра выше цены Миши, отрицательные - наоборот. Обычно средние значения отклонений рассчитываются относительно абсолютных величин (без учета знака, взятых по модулю) - поэтому в соседнем столбце при помощи функции =ABS() отбрасывается знак рассчитанного отклонения. В нем же из рассмотрения выбрасываются грубые ошибки (например, случай с неопределенной ценой Миши). Сама формула расчета среднего значения известна =СУММ(диапазон)/СЧЁТ(Диапазон), либо можно использовать стандартную функцию =СРЗНАЧ(), которая возвращает тот же результат. Относительно диапазона: его можно задать явно - указать конкретные ... cheshiki1>> макрос копирования строки по критерию 2012-06-15 11:39 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html Суть: в ячейку D19 вписываю 1, макрос находит в этом столбце выше 1 и копирует все остальные данные с найденной строки в ту где прописана 1. в следующей строке пишу 4 макрос находит выше 4 и та же процедура. Заранее спс. листов будет много и желательно чтобы макрос работал на всех. Serge 007>> Re: сумма ячеек в столбцах через 1 или 2 2012-06-15 11:48 http://forum.msexcel.ru/profiles/serge_007-u25260.html Так надо? Код: =B4+СУММПРОИЗВ((D$3:S$3="перемещение в")+(D$3:S$3="возврат");D4:S4)-СУММПРОИЗВ((D$3:S$3="перемещ от")+(D$3:S$3="реализ");D4:S4)
_Boroda_>> Re: сумма ячеек в столбцах через 1 или 2 2012-06-15 11:49 http://forum.msexcel.ru/profiles/boroda-u12234.html Мне думается, что все-таки так Код: =B4-СУММ(D4:S4)+2*СУММПРОИЗВ((D$3:S$3="перемещение в")+(D$3:S$3="возврат");D4:S4)
IKor>> Re: Создание списка из списка по выбранному критерию 2012-06-15 11:54 http://forum.msexcel.ru/profiles/ikor-u6827.html с доп столбцом Если для нас не важны значения, записываемые в дополнительный столбец, то ИМХО туда лучше писать не порядковые номера, а номер текущей строки [базовой таблицы] (=СТРОКА()-СТРОКА(таблица) ) - так будет проще возвращать значения во вновь-формируемый список. =ИНДЕКС(A$1:A$9;НАИМЕНЬШИЙ(ЕСЛИ($D$2:$D$9>0;СТРОКА(E$2:E$9));СТРОКА()-1)) Если ошибки мешают дальнейшему использованию списка, то от них можно избавиться, усложнив [abbr=Вводится через Ctrl+Shift+Enter]формулу массива[/abbr]:=ЕСЛИ(СТРОКА()-1>СЧЁТЕСЛИ(D:D;">0");"";_Результирующая_Формула_) для ускорение работы с большими таблицами подсчет количества значений нового списка =СЧЁТЕСЛИ(D:D;">0") желательно делать в отдельной ячейке. Для дальнейшего использования можно сгенерировать динамическую ссылку на новый список: =СМЕЩ($G$1;1;0;СЧЁТЕСЛИ(D:D;">0");1) или =СМЕЩ($G$1;1;0;СЧЁТЗ($G:$G);1) IKor>> Re: сумма ячеек в столбцах через 1 или 2 2012-06-15 12:11 http://forum.msexcel.ru/profiles/ikor-u6827.html Если у нас все-равно есть вспомогательная строка 2:2, в которой прописаны + и -, то предлагаю использовать ее для упрощения результирующей формулы: - убираем объединение ячеек - записываем в строку вместо текстовых констант формулу: =ЕСЛИ(ИЛИ(D3=$D$3;D3=$E$3);1;-1) - можно и руками вписать сюда значения +1 и -1 - по желанию меняем формат представления данных - чтобы вместо единиц показывать только знаки (маска формата: "+";"-";"";@) - в результирующих ячейка записываем формулу: =B4+СУММПРОИЗВ($D$2:$S$2;D4:S4) Шпец Докапыч>> Re: макрос копирования строки по критерию 2012-06-15 12:11 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html В [abbr=правой кнопкой мыши по ярлычку листа -> Исходный текст]модуле листа[/abbr], где требуется данная функциональность, пишем: Код: Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub If Target.Column = 4 Then r = Target.Row - 1 While Cells(r, 4) <> Target Or r < 14 r = r - 1 Wend If r < 14 Then MsgBox "Нет соответствий", 16: Exit Sub Application.EnableEvents = 0 Cells(Target.Row, 5).Resize(1, 16).Value = Cells(r, 5).Resize(1, 16).Value Application.EnableEvents = 1 End If End Sub cheshiki1>> Re: макрос копирования строки по критерию 2012-06-15 12:23 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html СПС а в модуль книги как нибудь можно. Или если в [abbr=правой кнопкой мыши по ярлычку листа -> Исходный текст]модуль листа[/abbr] то как нибудь автоматизировать прописку макроса в [abbr=правой кнопкой мыши по ярлычку листа -> Исходный текст]модуль листа[/abbr]. Шпец Докапыч>> Re: макрос копирования строки по критерию 2012-06-15 12:27 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html Можно. Тот же код (без изменений) кидай в Workbook_SheetChange. bodzin>> Re: Макрос переноса данных из одного файла в другой 2012-06-15 12:28 http://forum.msexcel.ru/profiles/bodzin-u145695.html Доброго времени суток!Подскажите как переносить данные из одного файла в другой,есть файл бюджета из которого нужно перенести значения некоторых статтей и сделать надо так чтоб при обновлении файла бюджета они обновлялись.Пожалуйста:)) Ksy>> Re: сумма ячеек в столбцах через 1 или 2 2012-06-15 12:34 http://forum.msexcel.ru/profiles/ksy-u14999.html наверное я не указала- просчитывать все повторные ячейки до конца строки -раньше это было IV.. счас даже и незнаю какое буквенное обозначение будет соответсвовать концу строки cheshiki1>> Re: макрос копирования строки по критерию 2012-06-15 12:41 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html чет не проходит, наверно из за того что там есть уже пару макросов. Посмотрите Плиз. Шпец Докапыч>> Re: макрос копирования строки по критерию 2012-06-15 12:43 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html Правильный заголовок процедуры должен быть: Код: Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
_Boroda_>> Re: сумма ячеек в столбцах через 1 или 2 2012-06-15 13:21 http://forum.msexcel.ru/profiles/boroda-u12234.html наверное я не указала- просчитывать все повторные ячейки до конца строки -раньше это было IV.. счас даже и незнаю какое буквенное обозначение будет соответсвовать концу строки от этого в формуле ничего, кроме диапазона не меняется. Но, может, все-таки подумаете - это довольно много столбцов, тормозить будет. Определите четко, сколько Вам нужно.verdim>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 13:30 http://forum.msexcel.ru/profiles/verdim-u145537.html О, как я зол, как я зол (на себя, естественно). Наверное, это уже диагноз. Путь поиска решения: 1 отмечаю в проекте "BAZA.xls" пункт "Microsoft Excel Object" и щелкаю кнопку Insert; 2.в открывшемся окне Module1 щелкаю Insert-Procedure и корректирую текст function-процедуры, добавив "диапазон As Range" и "As Single"; 3.ввожу текст функции и сохраняю (значек дискеты); 4.щелкаю по "Лист9(mont)"; 5.в открывшемся окне в левом меню выбираю "Worksheet", а в правом - "SelectionChange"; 6. автоматически формируется sub-функция, в которую заношу ее текст; 7.сохраняю (значек дискеты). А дальше ... Честно признаюсь, что дальше был тупик. Оставить все без изменения невозможно: откуда функция знает с чем надо работать. Завожу все данные для функции "СомЦвет" (так она называется для этого случая), так она портит ячейку с курсором и опять-таки работает только один раз. При попытке изменить (установить\удалить комментарий), выдается ошибка о неопределенности имени "СомЦвет" () Я, честно говор... Шпец Докапыч>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 13:54 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html Что если указать путь до функции точнее? Код: Module1.СомЦвет [диапазон]
Шпец Докапыч>> Re: макрос копирования строки по критерию 2012-06-15 15:11 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html Тогда, пожалуй, скопируем как есть (значение+формула+формат): Код: Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Count > 1 Then Exit Sub If Target.Column = 4 Then r = Target.Row - 1 While Cells(r, 4) <> Target And r >= 14 r = r - 1 Wend If r < 14 Then MsgBox "Нет соответствий", 16: Exit Sub Application.EnableEvents = 0 Cells(r, 5).Resize(1, 16).Copy Cells(Target.Row, 5).Resize(1, 16) 'правка Application.EnableEvents = 1 End If End Sub _Boroda_>> Re: сумма ячеек в столбцах через 1 или 2 2012-06-15 15:17 http://forum.msexcel.ru/profiles/boroda-u12234.html И поставьте соответствующий диапазон =B4-СУММ(D4:DW4)+2*СУММПРОИЗВ((D$3:DW$3="перемещение в")+(D$3:DW$3="возврат");D4:DW4) verdim>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 15:28 http://forum.msexcel.ru/profiles/verdim-u145537.html Что если указать путь до функции точнее? Щас попробую. Правда смущает то, что Module1 аж Цвай Штукен.
Код: Module1.СомЦвет [диапазон] cheshiki1>> Re: макрос копирования строки по критерию 2012-06-15 15:35 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html ещё раз большое спасибо. на этом пожалуй все. verdim>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 15:47 http://forum.msexcel.ru/profiles/verdim-u145537.html Увы. Не находит. Смущает, однако, и то, что мне никак не избавиться от "#ЗНАЧ!" в ячейке с курсором при организации функции "СомЦвет", в то время как у Вас в этом смысле все чисто. Надо же ей как-то передать интервал ... Все тихо до тех пор, пока не "дотронешься" до комментария ... После этого "СомЦвет" и не находится. Т.е., Worksheet, я так понимаю, запускается, но не может по какой-то причине найти "СомЦвет". Я проверил шрифт в вызове и имени функции: то и другое на русском. Может быть Worksheet недолюбливает Россию Шпец Докапыч>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 16:17 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html Тут следует уточнить один момент. Функция СомЦвет в моём примере равноценна процедуре: Код: Sub СомЦвет(диапазон As Range) Т.е. подобная реализация не годится для использования функции в качестве пользовательской (UDF). Соответственно диапазон нужно указывать при вызове процедуры из кода (должен быть прописан в Worksheet_SelectionChange). Если же задача ставится обойти ограничения пользовательской функции и менять заливку формулой, то реализация уже будет другой. Как минимум лучше будет использовать событие Worksheet_Calculate или заливать уже непосредственно формулой (что вряд ли имеет смысл).Ещё можно объединить код в один (тогда не надо будет искать СомЦвет): [code]Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim i As Range If [A1] <> Comments.Count Then For Each i In [диапазон] If i.Comment Is Nothing Then i.Interior.ColorIndex = 6 Else i.Interior.ColorIndex = 4 End If Next [A1] = Comments.Count ... verdim>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 16:32 http://forum.msexcel.ru/profiles/verdim-u145537.html Произведен эксперимент (это, конечно, бред, но, все-таки, результат). "Target" был помещен в параметр ComЦвет вместо "диапазон" и начались удивительные вещи: 1.при движении кусора по ячейкам, они раскрашивались сообразно с алгоритмом; 2.при действии с комментарием раскрас происходил, но довольно странным образом: надо было уйти на любую ячейку, а затем вернуться. Уточнение: красятся все ячейки; даже те, которые вне диапазона. Полученное указывает на то, что функция находится () и никакого "#ЗНАЧ!" нет. Возникает вопрос: почему с "диапазон" не происходит хотя бы тоже самое и сама функция не находится (+ #ЗНАЧ) verdim>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 16:37 http://forum.msexcel.ru/profiles/verdim-u145537.html Тут следует уточнить один момент. Функция СомЦвет в моём примере равноценна процедуре:
Код: Sub СомЦвет(диапазон As Range) Т.е. подобная реализация не годится для использования функции в качестве пользовательской (UDF). Соответственно диапазон нужно указывать при вызове процедуры из кода (должен быть прописан в Worksheet_SelectionChange). Если же задача ставится обойти ограничения пользовательской функции и менять заливку формулой, то реализация уже будет другой. Как минимум лучше будет использовать событие Worksheet_Calculate или заливать уже непосредственно формулой (что вряд ли имеет смысл).Ещё можно объединить код в один (тогда не надо будет искать СомЦвет): [code]Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim i As Range If [A1] <> Comments.Count Then For Each i In [диапазон] If i.Comment Is Nothing Then i.Interior.ColorIndex = 6 Else ... verdim>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 17:02 http://forum.msexcel.ru/profiles/verdim-u145537.html Честно говоря, я несовсем понимаю, как мы будем ограничивать диапазон в случаи объединения: боюсь, функция будет метелить все подряд ячейки без разбора ... Извините: это уже бандитизм. Кстати, объединил и проверил: функция действительно не видна ... Поэтому передать ей диапазон у меня не получилось. Шпец Докапыч>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 17:09 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html Откуда берётся "#ЗНАЧ!", если на листе нет формул? А если есть и функция возвращает "#ЗНАЧ!", то это означает, что функция определяется, иначе было бы "#ИМЯ?". Во вложении я поместил в свой пример код из ответа #29. Предлагаю поэкспериментировать с ним. ) verdim>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 17:26 http://forum.msexcel.ru/profiles/verdim-u145537.html Откуда берётся "#ЗНАЧ!", если на листе нет формул? А если есть и функция возвращает "#ЗНАЧ!", то это означает, что функция определяется, иначе было бы "#ИМЯ?". Во вложении я поместил в свой пример код из ответа #29. Предлагаю поэкспериментировать с ним. ) Готовлю пистолет: сегодня застрелюсь ... С такой скоростью ... и опять не понятно ... Где мои патроны Шпец Докапыч>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 17:39 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html А что не так? В [abbr=правой кнопкой мыши по ярлычку листа -> Исходный текст]модуле листа[/abbr], вместо [хрю], указываем [F5:G15], например. verdim>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 17:44 http://forum.msexcel.ru/profiles/verdim-u145537.html Я перед Вами преклоняю колени: Вы выделили диапазон и дали ему имя "хрю". : Далее, вы с этим именем работаете как с массивом ... Мать моя женщина: значит мозги у меня не окончательно завяли ... : Единственный остался теперь вопрос: хотелось бы, чтобы он увеличился после вставки в конец (после последней ячейки) Опять переназначать диапазон Как-то против автоматизации, понимаете ... С добавлением и удалением то внутри диапазона все O'key ... : Шпец Докапыч>> Re: Автоматическое изменение заливки ячеек в зависимости от наличия комментария 2012-06-15 17:54 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html Определить последнюю ячейку и сделать "резиновый" диапазон, - это классика жанра, например: Код: LR = [A65536].End(xlUp).Row
For Each i In Range("A2:A" & LR) IKor>> Re: сумма ячеек в столбцах через 1 или 2 2012-06-15 21:59 http://forum.msexcel.ru/profiles/ikor-u6827.html наверное я не указала- просчитывать все повторные ячейки до конца строки -раньше это было IV.. счас даже и незнаю какое буквенное обозначение будет соответсвовать концу строки Теоретически можно использовать динамически расширяемый диапазон (т.е. рассматриваемый диапазон будет автоматически расширяться при добавлении новых столбцов). Функция =СЧЁТЗ($3:$3)-2 вернет количество значимых столбцов, правее столбца C. Здесь константа -2 вычитается для отбрасывания не пустых значений в ячейках В3 и С3. Если в реальном файле в строке 3:3 есть другие "лишние" не пустые ячейки, то константу нужно поправить. Тогда функция =СМЕЩ($B4;0;2;1;СЧЁТЗ($3:$3)-2) вернет ссылку на диапазон, D4:S4 - т.е. на строку длиной 16 и высотой 1 ячейку, отодвинутую вправо на 2 ячейки относительно ячейки B4. Вы можете вставить эту функцию (без знака = ) вместо целевого диапазона в любую понравившуюся вам формулу. например: =B4-СУММ([color=... KuklP>> Re: Загрузка файла .CSV, в табличную часть 2012-06-16 07:40 http://forum.msexcel.ru/profiles/kuklp-u39713.html Вариант: Код: Sub www()
Dim wb As Workbook ThisWorkbook.Sheets("Пример").UsedRange.Clear Set wb = Workbooks.Open("H:\post.csv", local:=True) wb.Sheets(1).UsedRange.Copy ThisWorkbook.Sheets("Пример").[a3] wb.Close 0: Set wb = Nothing End Sub radist>> Re: Отображение в формуле не номером ячейки,а значениями ячеек 2012-06-16 16:18 http://forum.msexcel.ru/profiles/radist-u144958.html Вроде такая,казалась бы,простая задача, а решается очень уж сложно. Даже странно,что в Excel нельзя так сделать. Очень полезная была бы команда. Просто, проверяя формулы, искать глазами ячейки по названию и цвету,мне кажется,не всегда удобно бывает. А вот по значениям было бы вполне быстрее. Не всегда, но в моем случае очень часто IKor, спасибо вам огромное за ответы. Spicker>> Количество вложений "ЕСЛИ" больше 7 2012-06-16 16:28 http://forum.msexcel.ru/profiles/spicker-u15674.html Здравствуйте. Подскажите пожалуйста как можно увеличит количество вложений "ЕСЛИ" больше 7, или может каким оператором можно дополнить формулу? =ЕСЛИ(M26=Q14;R14;ЕСЛИ(M26=Q15;R15;ЕСЛИ(M26=Q16;R16;ЕСЛИ(M26=Q17;R17;ЕСЛИ(M26=Q18;R18;ЕСЛИ(M26=Q19;R19;ЕСЛИ(M26=Q20;R20;ЕСЛИ(M26=Q21;R21;ЕСЛИ - дальше не принимает - как продолжить??? Спасибо. Шпец Докапыч>> Re: Количество вложений "ЕСЛИ" больше 7 2012-06-16 17:36 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html Надо продолжить изучать другие популярные функции. =ВПР($M$26;$Q$14:$R$99;2;0) Шпец Докапыч>> Re: Отображение в формуле не номером ячейки,а значениями ячеек 2012-06-16 17:59 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html Для отладки формул удобно вычислять промежуточный результат, выделяя непосредственно в строке формул и нажимая F9: (синим то, что выделяется) =A1+B1 → [F9] → =A1+3 → [F9] → =2+3 Spicker>> Re: Количество вложений "ЕСЛИ" больше 7 2012-06-16 20:19 http://forum.msexcel.ru/profiles/spicker-u15674.html Как вы не заблудитесь среди нескольких сайтов?.. На Планете в приемы чего не заглянуть - http://www.planetaexcel.ru/tip.php?aid=322... Смотрел, искал но повторюсь ВПР и ПОИСКПОЗ ищут либо точное значение либо ближайшее. Spicker>> Re: Количество вложений "ЕСЛИ" больше 7 2012-06-16 20:20 http://forum.msexcel.ru/profiles/spicker-u15674.html Так пример будет или нам самим рисовать? да обязательно, щас просто вытяну отдельно и предоставлю. IKor>> Re: Количество вложений "ЕСЛИ" больше 7 2012-06-16 20:25 http://forum.msexcel.ru/profiles/ikor-u6827.html Не успел TimSha>> Re: Количество вложений "ЕСЛИ" больше 7 2012-06-16 20:31 http://forum.msexcel.ru/profiles/timsha-u13313.html Как вы не заблудитесь среди нескольких сайтов?.. На Планете в приемы чего не заглянуть - http://www.planetaexcel.ru/tip.php?aid=322... Смотрел, искал но повторюсь... Не надо, пожалуйста... По ссылке "Пример 2. Приблизительный двумерный поиск" - как вам? Или - из пруда да без труда... Spicker>> Re: Количество вложений "ЕСЛИ" больше 7 2012-06-16 20:51 http://forum.msexcel.ru/profiles/spicker-u15674.html Вот пример Serge 007>> Re: Количество вложений "ЕСЛИ" больше 7 2012-06-16 21:20 http://forum.msexcel.ru/profiles/serge_007-u25260.html Так что ли: Код: =ПРОСМОТР(B5;E6:E15;D6:D15)
ZORRO2005>> Re: Количество вложений "ЕСЛИ" больше 7 2012-06-16 21:31 http://forum.msexcel.ru/profiles/zorro2005-u4225.html Код: =ИНДЕКС(D6:D15;ПОИСКПОЗ(1;Ч(E6:E15-B5>=0);)) Если список не сортирован по возрастанию:Код: =ИНДЕКС(D6:D15;ПОИСКПОЗ(1;Ч(ЕСЛИ(E6:E15>=B5;E6:E15-B5)=МИН(ЕСЛИ(E6:E15>=B5;E6:E15-B5)));)) формулы массива
IKor>> Re: Количество вложений "ЕСЛИ" больше 7 2012-06-16 22:27 http://forum.msexcel.ru/profiles/ikor-u6827.html вот решение. даже два... Spicker>> Re: Количество вложений "ЕСЛИ" больше 7 2012-06-16 22:43 http://forum.msexcel.ru/profiles/spicker-u15674.html вот решение. даже два... Отлично- даже растерялся сколько примеров ВСЕМ СПАСИБО за помощь. pashamt8>> Оптимизирование инвестиций 2012-06-17 01:39 http://forum.msexcel.ru/profiles/pashamt8-u145838.html Задача такая. Срок планирования - 3 года. Бюджет каждого года - 15 млн Есть стоимость и отдача инициатив. Инициативы взаимосвязаны - добыча руды -> доставка на завод -> переработка. То есть в итоге надо получить равные максимальные значения добычи, доставки и переработки для 3 года. Главное, что добыча опеределяет сколько нам надо доставлять и обрабатывать. Я мало знаком с экселем, есть только представление о пути решения. Думаю так - надо задать два параметра для инициативы - отдачу и стоимость. По вертикали три инициативы, по горизонтали - 3 года. Условия - значение отдачи от инициативы по добыче максимально после 3 года, отдачи от остальных инициатив меньше либо равны, стоиомсть при этом меньше 15 для каждого года в сумме. При этом некоторые инициативы применяются только раз ( применили и они не должны повторяться). Плюс время реализации разное - год либо два. В итоге - надо получить оптимальные значения добычи, обработки и доставки руды. Устно я сделал, цифры легкие, а как ре... b1b1g0n>> Сравнение двух столбцов на совпадения ячеек с сортировкой и заменой ячеек 2012-06-17 19:47 http://forum.msexcel.ru/profiles/b1b1g0n-u145901.html В общем задача. Представьте, есть четыре столбца - два с ценами, два с артикулами. Соответственно, сочетаются попарно: артикул-цена, артикул-цена. Задача: сравнить два столбца с артикулами, при нахождении совпадения желательно окрасить эти ячейки, отсортировать чтобы одинаковые ячейки находились друг напротив друга, и главное: если артикулы совпадают, то из первого столбца с ценами (из первой пары артикул-цена), вставить цену в другой столбец "цена" (соответственно из второй пары артикул-цена). Помогите, пожалуйста! Никак не могу дать ума... vater>> Изучение VBA 2012-06-17 20:59 http://forum.msexcel.ru/profiles/vater-u144728.html Здравствуйте, хочу изучить этот язык для более удобного освоения Excel, но столкнулся с проблемой в выборе учебника. Это слишком упрощенная подача материала, я хоть и гуманитарий, но заметил, что в учебниках по Excel и VBA очень много воды. Есть ли учебники или сайты, где рассказывают все на примерах, начиная с банального Hello word и арифметики, и идя все глубже, как в обучении языкам программирования? Андрей Евстигнеев>> Re: Соединение данных из нескольких таблиц 2012-06-17 21:30 http://forum.msexcel.ru/profiles/andrey_evstigneev-u145906.html В примере в файле все есть. Смотрите, если что непонятно, спрашивайте. Пришлите, пожалуйста, файл примера.
_Boroda_>> Re: Сравнение двух столбцов на совпадения ячеек с сортировкой и заменой ячеек 2012-06-17 21:52 http://forum.msexcel.ru/profiles/boroda-u12234.html Для начала почитайте правила форума Без этого только общие рекомендации - используйте [url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url] и функцию ВПР Rinalaz>> Re: Вычисление суммы частных, где делителем является пустая ячейка 2012-06-18 11:05 http://forum.msexcel.ru/profiles/rinalaz-u9639.html Наверное я неправильно действительно сформулировала задачу. Упрощаю. Надо, чтоб при делении на пустую ячейку, или на ноль не отображалась ошибка "деление на ноль" - надо чтоб была просто пустая ячейка. Пример. Чтоб пользователи не видели сообщений об ошибках и при печати это не выходило тоже. Serge 007>> Re: Вычисление суммы частных, где делителем является пустая ячейка 2012-06-18 11:11 http://forum.msexcel.ru/profiles/serge_007-u25260.html Можно скрыть УФом: =еош(E7) или =если(C7*D7;D7*100/C7;"") или (для xlsx) =еслиошибка(D7*100/C7;"") Fedbul>> Re: Вычисление суммы частных, где делителем является пустая ячейка 2012-06-18 11:27 http://forum.msexcel.ru/profiles/fedbul-u31035.html Можно и так =ЕСЛИ(C7>0;D7/C7*100;) или =ЕСЛИ(C8>0;D8/C8*100;ЕСЛИ(C8=0;"")) shamilganiev>> Двигаю вертикальный ползунок чууууточку, перескакивает 2000 строк, как исправить 2012-06-18 12:58 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html Двигаю вертикальный ползунок чууууточку, перескакивает 2000 строк, как исправить? Согласен, у меня много используемых строк, но я фильтрую, оставляя лишь 100 строк к примеру. STEROID>> Re: Создание списка из списка по выбранному критерию 2012-06-18 13:00 http://forum.msexcel.ru/profiles/steroid-u114348.html или так без доп. ст. (на основе формулы в столбце Е) =ИНДЕКС(A$1:A$9;НАИМЕНЬШИЙ(ЕСЛИ($D$2:$D$9>0;СТРОКА(E$2:E$9));СТРОКА()-1)) [abbr=Вводится через Ctrl+Shift+Enter]формула массива[/abbr] =ИНДЕКС(A$1:A$9;НАИМЕНЬШИЙ(ЕСЛИ($D$2:$D$9>0;СТРОКА(E$2:E$9));СТРОКА()-1)) Можете пояснить, сижу азы формул разбираю - не могу все сложить в одну формулу? Serge 007>> Re: Создание списка из списка по выбранному критерию 2012-06-18 13:15 http://forum.msexcel.ru/profiles/serge_007-u25260.html Подробно см. здесь Serge 007>> Re: Двигаю вертикальный ползунок чууууточку, перескакивает 2000 строк, как исправить 2012-06-18 13:17 http://forum.msexcel.ru/profiles/serge_007-u25260.html Необходимо удалить все строки ниже данных и все столбцы правее данных, сохранить файл и закрыть открыть. _Boroda_>> Re: Создание списка из списка по выбранному критерию 2012-06-18 13:26 http://forum.msexcel.ru/profiles/boroda-u12234.html =ИНДЕКС(A$1:A$9;НАИМЕНЬШИЙ(ЕСЛИ($D$2:$D$9>0;СТРОКА(E$2:E$9));СТРОКА()-1)) 1) ЕСЛИ($D$2:$D$9>0;СТРОКА(E$2:E$9) - если в D значения больше 0, то формула дает номер этой строки (2;3;4;...), иначе - ЛОЖЬ 2) из полученного в п.1 выбираем n-ую наименьшую цифру, где n - СТРОКА()-1 - это номер строки, в которой находится сама формула, минус 1 В итоге получаем последовательно номера строк (минус 1), в которых D>0 3) Индексом выковыриваем по этим номерам значения из А shamilganiev>> Re: Двигаю вертикальный ползунок чууууточку, перескакивает 2000 строк, как исправить 2012-06-18 13:33 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html Сделал. Не помогает. Я уже так делал раньше. Обычно это помогало, но сейчас что-то не так. Ниже определённой строчки данных нет, я всё удалил, не только данные, но и сами строки. shamilganiev>> Re: Забава (Звабаа) 2012-06-18 13:38 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html Вот какой раз уже захожу сюда в Ваш вопрос, мне всё больше и больше кажется стандартными функциями тут не обойтись... STEROID>> Re: Создание списка из списка по выбранному критерию 2012-06-18 13:42 http://forum.msexcel.ru/profiles/steroid-u114348.html =ИНДЕКС(A$1:A$9;НАИМЕНЬШИЙ(ЕСЛИ($D$2:$D$9>0;СТРОКА(E$2:E$9));СТРОКА()-1)) 1) ЕСЛИ($D$2:$D$9>0;СТРОКА(E$2:E$9) - если в D значения больше 0, то формула дает номер этой строки (2;3;4;...), иначе - ЛОЖЬ 2) из полученного в п.1 выбираем n-ую наименьшую цифру, где n - СТРОКА()-1 - это номер строки, в которой находится сама формула, минус 1 В итоге получаем последовательно номера строк (минус 1), в которых D>0 3) Индексом выковыриваем по этим номерам значения из А Вопрос - можно ли привязанные массивы в этой формуле заменить динамическими? zarl>> Re: Забава (Звабаа) 2012-06-18 13:45 http://forum.msexcel.ru/profiles/zarl-u56773.html У меня получается только если огроооомную таблицу изобрести. Но это не интересно... Serge 007>> Re: Создание списка из списка по выбранному критерию 2012-06-18 13:47 http://forum.msexcel.ru/profiles/serge_007-u25260.html Вопрос - можно ли привязанные массивы в этой формуле заменить динамическими? Можно. Что мешает самому проверить?ЗЫ Только размерность массивов должна быть одинаковой. STEROID>> Re: Создание списка из списка по выбранному критерию 2012-06-18 13:52 http://forum.msexcel.ru/profiles/steroid-u114348.html Вопрос - можно ли привязанные массивы в этой формуле заменить динамическими? Можно. Что мешает самому проверить?ЗЫ Только размерность массивов должна быть одинаковой. Проверяю не получается! и еще, хотел поменять условие, так как по условию столбцом D пользоваться нельзя, условие ЕСЛИ($E$2:$E$9="применяется";СТРОКА(F$2:F$9) не выполняется..... Serge 007>> Re: Создание списка из списка по выбранному критерию 2012-06-18 13:55 http://forum.msexcel.ru/profiles/serge_007-u25260.html Проверяю не получается! Выкладывайте что не получаетсяЦитировать так как по условию столбцом D пользоваться нельзя В моём варианте этот столбец не используется
verdim>> Проблема с точностью вычисления 2012-06-18 19:45 http://forum.msexcel.ru/profiles/verdim-u145537.html Добрый день !!! Вот я и опять у Вас в гостях. Принес подарок. А именно. Есть функция, простенькая такая: Function СумЦвет (диапазон As Range, критерий As Range) As Single Application.Volatile True Dim i As Range For Each i In диапазон If i.Interior.ColorIndex = критерий.Interior.ColorIndex Then СумЦвет = СумЦвет + i.Value End If Next EndFunction Что она делает, - не мне Вам рассказывать. Расскажу только о том, чем она меня убила .... наповал. Задумал я сложить цифры с двумя знаками после точки ... Задумано, - сделано: выставил их столбиком, завел функцию, выделил столбик, установил критерий ... И получил ... довольно неприятно и не туда, куда хотел. Сложиться то они сложились, но, сколько бы я ни стучал головой об стенку, цифры после точки напрочь не хотели реагировать. Я, желая их умаслить, умножал два слагаемых на сто, а потом делил сумму на эти злосчастные сто, - ни в какую. Увеличиваю цифирю на одну сотую, проделываю эту манипуляцию, а резу... Nurikus>> Работа с базой данных. 2012-06-18 20:08 http://forum.msexcel.ru/profiles/nurikus-u145967.html Есть очень большой список аппаратов с их выручкой, данные из системы выгружаются ежедневно. Хочу прописать формулу чтобы в тотальной таблицы она по названию аппарата вытаскивала его выручку из нужного листа. Как такое сделать? Попробовал функцию ВПР, не получилось. Serge 007>> Re: Работа с базой данных. 2012-06-18 20:38 http://forum.msexcel.ru/profiles/serge_007-u25260.html Как такое сделать? Сбор информации с нескольких листов. Использование названий листов в формуле
Prist>> Re: Двигаю вертикальный ползунок чууууточку, перескакивает 2000 строк, как исправить 2012-06-18 21:36 http://forum.msexcel.ru/profiles/prist-u4859.html Сделал. Не помогает. А теперь необходимо проверить лист на наличие объектов:Я уже так делал раньше. Обычно это помогало, но сейчас что-то не так. Ниже определённой строчки данных нет, я всё удалил, не только данные, но и сами строки. В Excel 2003: меню Правка- Перейти – Выделить – Объекты. в Excel 2007-2010: вкладка Главная-Найти и выделить-Выделение группы ячеек-Объекты. Нажмите Delete. Все объекты на листе будут удалены. Правда есть небольшой шанс, что у Вас есть скрытые объекты. Тогда надо идти в редактор VBA(Alt+F11)-Ctrl+R. Отображаете окно свойств(F4). Находите объект ЭтаКнига(ThisWorkbook) и в окне свойств свойство — DisplayDrawingObjects и ставите там значение — -4104-xlDisplayShapes. После этого переходите опять на лист и повторяете операции по выделению и удалению объектов, описанные выше. Нахождение на листе объектов не означает, что Вы их видите. Serge 007>> Re: Двигаю вертикальный ползунок чууууточку, перескакивает 2000 строк, как исправить 2012-06-18 21:54 http://forum.msexcel.ru/profiles/serge_007-u25260.html Дим, в файле нет объектов Ни скрытых, ни видимых ЗЫ На работе я не мог посмотреть файл, слишком он большой, но дома посмотрел ZORRO2005>> Re: Работа с базой данных. 2012-06-18 22:27 http://forum.msexcel.ru/profiles/zorro2005-u4225.html Попробуйте СУММЕСЛИ. MCH>> Re: Проблема с точностью вычисления 2012-06-19 00:17 http://forum.msexcel.ru/profiles/mch-u48782.html 1. вместо Single используйте Double 2. если хотите округлять до двух знаков, то округляйте: СумЦвет = СумЦвет + Round(i.Value, 2) shamilganiev>> Re: Двигаю вертикальный ползунок чууууточку, перескакивает 2000 строк, как исправить 2012-06-19 08:09 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html В оригинале у меня там 7 листов, в том листе который я Вам дал я удалил некоторые столбцы, но думаю там не было объектов. Думаю в принципе в файле не должно быть сверхсекретных данных, может его выложить для исследования? Или просто скопировать на новый лист и закрыть вопрос, как вы думаете? SanSanych>> Как правильно написать макрос сохраняющий файл в Excel2007? 2012-06-19 08:46 http://forum.msexcel.ru/profiles/sansanych-u146002.html Добрейшего времени суток! Как корректно написать макрос сохраняющий обновленную сводную таблицу в формате Excel2007? Есть такой макрос: Sub Auto_Open() ' Auto_Open Макрос ' Range("B9").Select ActiveSheet.PivotTables("СводнаяТаблица2").PivotCache.Refresh Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:= _ "D:\FileName.xlsx", FileFormat _ :=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:= _ False, CreateBackup:=False ThisWorkbook.Close False End Sub Макрос отрабатывает без ошибок, но при открытии сохраненного файла выдает ошибку: "Не удается открыть файл, так как формат или расширение этого файла являются недопустимыми. Убедитесь, что файл не поврежден ...." FileFormat:=xlExcel8 - так же не помог. Та же ошибка. Что не так? shamilganiev>> Re: Работа с базой данных. 2012-06-19 09:02 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html вопрос: как точно будут подписаны листы? просто месяц.год или день.месяц.год? и как будут подписаны названия столбцов в тотал? shamilganiev>> Re: Работа с базой данных. 2012-06-19 09:11 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html Посмотри, примерно так? Nurikus>> Re: Работа с базой данных. 2012-06-19 09:58 http://forum.msexcel.ru/profiles/nurikus-u145967.html Посмотри, примерно так? Работает, а можно к примеру данную операцию сделать через функцию ВПР или ГПР?За помощь спасибо! shamilganiev>> Re: Работа с базой данных. 2012-06-19 10:02 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html к сожаленью я не пользовался данными функциями, но насколько я смутно знаю про эти функции, то можно. может кто другой форумчанин поможет... Nurikus>> Re: Работа с базой данных. 2012-06-19 10:06 http://forum.msexcel.ru/profiles/nurikus-u145967.html вопрос: как точно будут подписаны листы? просто месяц.год или день.месяц.год? и как будут подписаны названия столбцов в тотал? Страницы могут быть подписаны по разному, столбцы тоже. Возможно это будет аналитика по дням.
Serge 007>> Re: Работа с базой данных. 2012-06-19 10:17 http://forum.msexcel.ru/profiles/serge_007-u25260.html ...можно к примеру данную операцию сделать через функцию ВПР? Код: =ВПР($B5;ДВССЫЛ("'"&Total!C$4&"'!b2:c300");2;)
IKor>> Re: Работа с базой данных. 2012-06-19 10:21 http://forum.msexcel.ru/profiles/ikor-u6827.html Попробуйте СУММЕСЛИ. Одной СУММЕСЛИ() не обойтись.Я рекомендую попробовать еще ДВССЫЛ() Пример в файле основан на том, что в заголовках Тотальной таблицы указаны точные названия заранее подготовленных именованных диапазонов данных. Если диапазонов будет много и возиться с отдельным именованием каждого не хочется, то я рекомендую придумать правило их именования и мало-мало автоматизировать аргументы ДВССЫЛ() shamilganiev>> Re: Работа с базой данных. 2012-06-19 10:40 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html Попробуйте СУММЕСЛИ. Одной СУММЕСЛИ() не обойтись.Я рекомендую попробовать еще ДВССЫЛ() Пример в файле основан на том, что в заголовках Тотальной таблицы указаны точные названия заранее подготовленных именованных диапазонов данных. Если диапазонов будет много и возиться с отдельным именованием каждого не хочется, то я рекомендую придумать правило их именования и мало-мало автоматизировать аргументы ДВССЫЛ() научи а Serge 007>> Re: Работа с базой данных. 2012-06-19 10:44 http://forum.msexcel.ru/profiles/serge_007-u25260.html как ты из ДВССЫЛ("янв2012") получаешь '01.2012'!B2:C263 ? Пример в файле основан на том, что в заголовках Тотальной таблицы указаны точные названия заранее подготовленных именованных диапазонов данных. shamilganiev, Ctrl+F3 нажмите Nurikus>> Re: Работа с базой данных. 2012-06-19 10:52 http://forum.msexcel.ru/profiles/nurikus-u145967.html ...можно к примеру данную операцию сделать через функцию ВПР? Код: =ВПР($B5;ДВССЫЛ("'"&Total!C$4&"'!b2:c300");2;) Помогите плиз! Serge 007>> Re: Работа с базой данных. 2012-06-19 10:58 http://forum.msexcel.ru/profiles/serge_007-u25260.html Как вы подвязали диапазон b2:c300 к странице 01.2012! Nurikus, Вы по ссылке, что я дал в первом своём посте этой темы, ходили?Там всё подробно и с картинками cheshiki1>> Re: Работа с базой данных. 2012-06-19 11:07 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html Цитировать Как вы подвязали диапазон b2:c300 к странице 01.2012! походу Вы про ф-цию СЦЕПИТЬ в исполнении & не знаете.два значения (текст или число не важно) можно сцепить: так =СЦЕПИТЬ(A1;A2) или так =A1&A2 На форуме Вы можете получить совет по любым вопросам работы в Microsoft Excel. Добро пожаловать на форум! |
В избранное | ||