Отправляет email-рассылки с помощью сервиса Sendsay

Форум по Microsoft Excel

  Все выпуски  

Виктория Зуева>> Re: ВПР наоборот


Форум по Microsoft Excel

Выпуск 23
от 2011-06-16

Подписчиков: 563

Рассылка сайта "Профессиональные приемы работы в Microsoft Excel"

Основные разделы сайта
Статьи
Форум

Новости сайта в формате RSS
Новые сообщения форума в формате RSS
Читать в Яндекс.Ленте

Порекомендуйте нашу рассылку друзьям

Обратная связь
Поддержка
(форум рассылки)

Наши рассылки:

Рассылки Subscribe.Ru
Православные:
Ежедневные библейские чтения
Смоленский календарь
Для выздоравливающих алкоголиков и наркоманов
Книга "День за днем"
Книга "24 часа в сутки"
Ежедневные размышления анонимного алкоголика
Самообразование:
"Профессиональные приемы работы в Microsoft Excel"

Наши сайты

Профессиональные приемы работы в Microsoft Excel
Excel от новичка до эксперта

bonifatiy.narod.ru
В помощь выздоравливающим алкоголикам и наркоманам

Собор Смоленских святых. Жития, иконы, календарь памятных дат Смоленской епархии.

StudentTools.Narod.Ru Для тех, кто любит учиться

Наши друзья

VBAtips.ru -
подсказки и решения на VBA

wordexpert.ru
Профессиональная работа с текстом

planetaexcel.ru
Когда заешь - все просто

Новые сообщения форума "Профессиональные приемы работы в Microsoft Excel".



Виктория Зуева>> Re: ВПР наоборот
2011-06-08 16:06 http://forum.msexcel.ru/profiles/buka3-u2668.html
Серёженька, ну зачем сразу смеяться над женщиной!
В конце концов, иногда важен РЕЗУЛЬТАТ... а вот средства для его получения каждый выбирает сам.
По мне, так эта "пушка" функция весьма удачна и универсальна! И легко справляется с поставленной задачей.
Сама я использовала её уже неоднократно, и другим рекомендую освоить. Особенно удобно, когда надо из таблиц без заголовков или с мудреными заголовками (из СУБД) данные подгрузить в пользовательскую форму.


maxim020>> Re: график в эксель - помогите пожалуйста
2011-06-08 16:10 http://forum.msexcel.ru/profiles/maxim020-u89153.html
Ну у меня как раз данные для BCG, с оговоркой что не проставлены категории звёзды, дети, собаки, коровы.
как Вы можете видеть в примере шарики расположены в той четверти, к которой относятся ( по категорям)

а у меня они в одном месте.
то ли оси нужно как-то корректировать или "шаг" . я не знаю.
но есть не сложная система демонстрации доли рынка, и роста за год.
как это показать, что бы было видно Непонимающий?

я могу расписать в ручную что из моего списка звезды, что собаки... но только что это изменит - цифры и так это показывают, "график" должен же как то это понимать. есть 4 четверти
высокий рост + высокая доля - звезды
высокий рост + низкая доля - трудные дети
низкий рост + высокая доля - дойные коровы
низкий рост + низкая доля - собаки.

теперь нужно имеющиеся данные каким то образом занести в график что бы было видно что есть что. Так?

По логике 20 строка - Азербайджан.
маленькая доля (0.07%) и большой рост (128.67%) - значит это Трудный ребенок.
8 строка - SOUTH
ну в силу того что дол...

Виктория Зуева>> Re: график в эксель - помогите пожалуйста
2011-06-08 16:16 http://forum.msexcel.ru/profiles/buka3-u2668.html
Не вдаваясь пока в подробности, давайте так:
для точки данных должны быть 3 значения - X, Y и Z, где X и Y - координаты центра "шарика", а Z - его объем (величина кружка)

1) Вот для Азербайджана на вашем графике какое число из ячейки должно быть координатой, а какое - значением Z?
2) Для чего - значения за два года?


maxim020>> Re: график в эксель - помогите пожалуйста
2011-06-08 16:17 http://forum.msexcel.ru/profiles/maxim020-u89153.html
ну а размер шарика - это фактические деньги ( например).
тут уже без долей - много денег в последний год - большой диаметр, мало денег - маленький.

вот в принципе то что я хочу показать на графике.

другими словами перспективы рынков оценить. я понимаю что большинство там с минусами. Ну и что же. не все бизнесы ростут...

maxim020>> Re: график в эксель - помогите пожалуйста
2011-06-08 16:22 http://forum.msexcel.ru/profiles/maxim020-u89153.html
Не вдаваясь пока в подробности, давайте так:
для точки данных должны быть 3 значения - X, Y и Z, где X и Y - координаты центра "шарика", а Z - его объем (величина кружка)

1) Вот для Азербайджана на вашем графике какое число из ячейки должно быть координатой, а какое - значением Z?
2) Для чего - значения за два года?


поехали

- диаметр - это . колонка "С" - 162890 ( по сравнению с остальными должен быть точкой)
- ось X - это доля рынка - "D"
- соответственно рост  "E"  - это ось Y.

вот и должно быть 4 четверти. ( см выше)


2) зачем 2 года?
что бы получить колонку  Е - рост. или РОСТ ЗА ГОД.



я так понимаю мне нужно сместить точку пересечения Х и У и задать другой шаг по осям что бы мои шарики расползлись по 4-м четвертям.
но я не знаю как это делать.
например пусть по У ноль - это ноль. ( то есть все + сверху оси, и "_" - снизу)
а по оси Х - пусть нулем будет "5.5%"
но какой шаг сделать что бы ша...

Pterodahtil>> Как прибавить к дате секунды?
2011-06-08 16:40 http://forum.msexcel.ru/profiles/pterodahtil-u4966.html
Добрый день.
Одна ячейка А1 тип "Дата" - 03.05.2011  6:37:44
вторая ячейка А2 тип "число" - 96. 96 это есть секунды. Нужно эти секунды прибавить к ячейки А1.
третья ячейка А3 - результат - 03.05.2011  6:39:20

Как сделать?

Спасибо.

Maggi>> Re: ВПР наоборот
2011-06-08 16:42 http://forum.msexcel.ru/profiles/maggi-u4754.html
Виктория Зуева, спасибо.

Serge 007>> Re: ВПР наоборот
2011-06-08 16:51 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Виктория Зуева, спасибо.
Женская солидарность? Подмигивающий

Виктория, никакого смеха, просто лёгкая ирония, дружеская шутка Улыбка


Serge 007>> Re: Как прибавить к дате секунды?
2011-06-08 17:04 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Здравствуйте.
Одна ячейка А1 тип "Дата" - 03.05.2011  6:37:44
вторая ячейка А2 тип "число" - 96. 96 это есть секунды. Нужно эти секунды прибавить к ячейки А1.
третья ячейка А3 - результат - 03.05.2011  6:39:20
Как сделать?
Вот так:
=A1+A2
  Улыбка

Pterodahtil>> Re: Как прибавить к дате секунды?
2011-06-08 18:02 http://forum.msexcel.ru/profiles/pterodahtil-u4966.html
не получается у меня. Когда ставлю формат ячейки [сс] число из 96 превращается в 8294400!
данные беру из txt файла. Когда его открываю, то первый столбец это дата (ставлю общий формат), 5й столбец - секунды (ставлю число).
И если прибавлять, то эксель это число за дни воспринимает.

Serge 007>> Re: Как прибавить к дате секунды?
2011-06-08 18:49 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Из txt умеете данные извлекать (не копированием)?
не получается у меня...
Поэтому всегда пример надо прикладывать.
См. вложение.

Виктория Зуева>> Re: график в эксель - помогите пожалуйста
2011-06-08 21:45 http://forum.msexcel.ru/profiles/buka3-u2668.html
Ну если только оси сместить...
см. вложение

Maggi>> Re: ВПР наоборот
2011-06-08 22:40 http://forum.msexcel.ru/profiles/maggi-u4754.html
Виктория Зуева, спасибо.
Женская солидарность? Подмигивающий

Сергей, я ж поблагодарила Викторию за ответ по поводу WinRap. Что Вас так задело? :Улыбка

А Вас лично могу поблагодарить за отзывчивость по многим вопросам. Корифеи Excel для меня - это объекты Уважения, Преклонения, Обожания и т.д.  Целующий

Serge 007>> Re: ВПР наоборот
2011-06-08 23:01 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Сергей, я ж поблагодарила Викторию за ответ по поводу WinRap. Что Вас так задело? :Улыбка
Ровным счётом ничего Улыбка
Просто хорошее настроение, вот и решил пошутить, пофлудить немного Улыбка))

А Вас лично могу поблагодарить за отзывчивость по многим вопросам. Корифеи Excel для меня - это объекты Уважения, Преклонения, Обожания и т.д.  Целующий
А вот за это - огромное спасибо! Нечасто слышишь такие тёплые слова.

ЗЫ Я хоть к "корифеям" себя и не отношу, но думаю что в контексте имелся ввиду и я тоже Подмигивающий

sergo44441>> Re: Выборка "чистых" ячеек в массив
2011-06-08 23:43 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
тут, думаю, макросы нужно применять, в нем можно предусмотреть выборку значений в массив в зависимости от формата ячеек, но тут нужно все конкретно указывать, какой должен быть форматирование, начертание шрифта и т.д., выкладывайте пример, и решение можно будет найти

sergo44441>> Re: Макроос выборка строк
2011-06-08 23:46 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
а почему во втором условии у вас ошибка значения, проверьте формулу

Шпец Докапыч>> Re: Фон между максимальным и минимальным значением в графике
2011-06-09 00:57 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Заранее благодарна за любую информацию.
Если можно не совсем строго, то сверху кинуть прямоугольничек.

Алина>> даты
2011-06-09 09:38 http://forum.msexcel.ru/profiles/alina-u17709.html
добрый день!
необходимо установить контроль за датами, например:
10.06.2011г.
05.03.2011г
15.05.2011г.
необходимо выделить цветом даты, которые РАНЕЕ СЕГОДНЯШНЕГО ДНЯ и даты, которые ранее, чем неделя до сегодняшнего дня
подскажите пожалуйста как это сделать

demon010>> Как удалить строки, которые дают в сумме 0?
2011-06-09 09:58 http://forum.msexcel.ru/profiles/demon010-u89161.html
Добрый день.
Поставили задачу следующего характера - написать макрос или VBA для удаления строк в файле, значения которых дают в сумме "0". В файле содержится более 30000 строк, сразу оговариваюсь
Строки суммируются строго по лицевому счету, а не по всему файлу
Подскажите, как лучше сделать, пожалуйста
Образец прилагаю, цветом выделил как должно суммироваться

Serge 007>> Re: даты
2011-06-09 10:07 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Здравствуйте.
подскажите пожалуйста как это сделать
Условным форматированием.
Код:
=A1<СЕГОДНЯ()
Код:
=A1<СЕГОДНЯ()-7


Pterodahtil>> Re: Как прибавить к дате секунды?
2011-06-09 10:07 http://forum.msexcel.ru/profiles/pterodahtil-u4966.html
спасибо, получилось.

iron priest>> Re: даты
2011-06-09 10:07 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
так?

Алина>> Re: даты
2011-06-09 10:43 http://forum.msexcel.ru/profiles/alina-u17709.html
огромное спасибо!!!!

Galandets>> Формула для сравнения данных
2011-06-09 11:05 http://forum.msexcel.ru/profiles/galandets-u44672.html
как можно сделать(ввести формолу) чтобы два чилса в разных клетках сравнивались,а в 3-ем окне выходило надпись одинаковые или не одинаковые, желательно еще бы цветом выделялось

Виктория Зуева>> Re: Формула для сравнения данных
2011-06-09 11:18 http://forum.msexcel.ru/profiles/buka3-u2668.html
Что подразумевается под фразой
Цитировать
"в 3-ем окне выходило надпись"
?
В третьей ячейке? Во всплывающем окне? Цветом выделять - при условии совпадения или несовпадения?

Виктория Зуева>> Перенесено: Перенос данных из таблицы.
2011-06-09 11:20 http://forum.msexcel.ru/profiles/buka3-u2668.html
Тема перенесена в Microsoft Excel.

http://forum.msexcel.ru/index.php?topic=5019.0

Serge 007>> Re: Формула для сравнения данных
2011-06-09 11:24 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Код:
=A1=B1
и УФ.

Galandets>> Re: Формула для сравнения данных
2011-06-09 11:25 http://forum.msexcel.ru/profiles/galandets-u44672.html
В третьей , можно всплывающем (не представляю просто как это будет выглядить) выделять если совпадает

Galandets>> Re: Формула для сравнения данных
2011-06-09 11:39 http://forum.msexcel.ru/profiles/galandets-u44672.html
Спасибо

Виктория Зуева>> Re: Формула для сравнения данных
2011-06-09 11:41 http://forum.msexcel.ru/profiles/buka3-u2668.html
или ТАК (см. вложение)

maaboo>> Re: Выборка &quot;чистых&quot; ячеек в массив
2011-06-09 11:55 http://forum.msexcel.ru/profiles/maaboo-u66654.html
Проблема в том, что форматирование пока не известно и будет меняться.

Интересует вопрос - можно ли просто спросить функцией является ли ячейка отформатированной отлично от "обычного"? Ну или указать в качестве проверки эталонную. Что-то вроде:

Код:
If Sheet.Cell.isSameFormatted(A1) = True Then ...


stydent99>> Нужные данные на отдельный лист
2011-06-09 12:39 http://forum.msexcel.ru/profiles/stydent99-u88682.html
Друзья, привет!

Вот такая задача:
Во вложении файл, который имеет 3 вкладки: Общий, Центр1, Центр2.

Необходимо на листе Центр1 отразить данные "номер" с листа Общий, соответственно только те которые принадлежат к Центру1, Центр2 то же самое, отображение не должно содержать пустых строк.

Помоги сделать.


Спасибо.

Serge 007>> Re: Формула для сравнения данных
2011-06-09 12:47 http://forum.msexcel.ru/profiles/serge_007-u25260.html
или ТАК (см. вложение)
или ТАК (см. вложение)


Виктория Зуева>> Re: Нужные данные на отдельный лист
2011-06-09 13:41 http://forum.msexcel.ru/profiles/buka3-u2668.html
Та же пользовательская функция, что и ранее предлагалась мною для другой задачи.
См. вложение - в архиве файл с расширением .xlsm

stydent99>> Re: Нужные данные на отдельный лист
2011-06-09 14:16 http://forum.msexcel.ru/profiles/stydent99-u88682.html
Виктория, спасибо большое!

На прилагаемом примере я с мог сам повторить данную формулу, но вот в других таблицах она не работает, возможно расшифровать значения в формуле.

Спасибо.


cheshiki1>> Re: Нужные данные на отдельный лист
2011-06-09 14:38 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html
http://planetaexcel.ru/tip.php?aid=62 - здесь расшифровка.

Русскоязычный код.
Код:
Function VLOOKUP22(Таблица As Range, номер_столбца_где_ищем As Integer, искомое_значение As Variant, _
                                        N As Integer, номер_столбца_из_которого_берем_значение As Integer)
    Dim i As Integer
    Dim iCount As Integer
         
    For i = 1 To Таблица.Rows.Count
            If Таблица.Cells(i, номер_столбца_где_ищем) = искомое_значение Then
                iCount = iCount + 1
            End If
            If iCount = N Then
                VLOOKUP22 = Таблица.Cells(i, номер_столбца_из_которого_берем_значение)
                Exit For
            End If
        Next i
End Function



erd_2002>> ! Объединение анализа данных &quot;что если&quot; и макроса !
2011-06-09 16:17 http://forum.msexcel.ru/profiles/erd2002-u73170.html
Друзья!
Может, кто сталкивался с такой задачей или возникнет идея, подскажите, пожалуйста.

Есть таблица подстановки данных с большим количеством сценариев (значений параметра для подстановки) и показателей финансовой модели, которые рассматриваем в зависимости от изменения параметра. В модель включен макрос, который необходимо запускать, если мы меняем параметр, иначе без пересчета искажаются значения.

Можно ли как-то прописать в VB, чтобы при подстановке значения параметра запускался макрос?


Спасибо

Andrey Lenets>> Re: ! Объединение анализа данных &quot;что если&quot; и макроса !
2011-06-09 16:22 http://forum.msexcel.ru/profiles/nitrolis-u1631.html
можно.

erd_2002>> Re: ! Объединение анализа данных &quot;что если&quot; и макроса !
2011-06-09 16:29 http://forum.msexcel.ru/profiles/erd2002-u73170.html
Здорово!  Улыбка
Подскажите, пожалуйста, как это можно сделать?

flyinsky>> Построение диаграммы
2011-06-09 16:46 http://forum.msexcel.ru/profiles/flyinsky-u89298.html
Всем привет. Нужно на основании данной таблицы (указана на скриншоте) построить диаграмму. В которой указывается процентное соотношение по уровням. (Всего их 4). В столбце "Уровень" показано какой уровень у человека.

Как получить такую диаграмму как на скриншоте?

http://photomonster.ru/full/ba193/04012/97b2ae494e.jpg.html

Andrey Lenets>> Re: ! Объединение анализа данных &quot;что если&quot; и макроса !
2011-06-09 16:49 http://forum.msexcel.ru/profiles/nitrolis-u1631.html
если параметр вводится на листе в ячейку, то можно воспользоваться событиями листа - Worksheet_Change

Виктория Зуева>> Re: Нужные данные на отдельный лист
2011-06-09 16:55 http://forum.msexcel.ru/profiles/buka3-u2668.html
Скорее всего, проблема у Вас с переносом функции в другую книгу.
Для этого надо:
1) Открыть в Excel 2 файла - файл примера (4_student) и Ваш файл, в котором Вы хотите использовать функцию
2) Нажать Alt+F11
3) В открывшемся окне Microsoft Visual Basic слева находим область Project - VBAProject, в ней - ниже строки VBAProject 4_student ищем объект Module
(см. рисунок во вложении)
4) Щелкаем по объекту, и простым перетаскиванием "тянем" его на название другого файла, где нужна эта функция. Должно получиться два модуля - в разных файлах.
5) Сохраните второй файл с расширением .xlsm



Виктория Зуева>> Re: Построение диаграммы
2011-06-09 17:24 http://forum.msexcel.ru/profiles/buka3-u2668.html
Про то, как построить круговую диаграмму, почитайте ТУТ:
http://office.microsoft.com/ru-ru/excel-help/HA010211848.aspx

Учитесь!



sergo44441>> копирование файлов через экселевский макрос
2011-06-09 18:58 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
Подскажите, пожалуйста, можно ли с помощью макроса скопировать файлы, находящиеся по определенному пути (определенное имя) в нужную папку (разного расширения). Нужно по работе ежедневно, хотелось бы чуть убыстрить процесс

andruxa-xa>> Как при помощи Ctrl + F заменить символ на &quot;энтер&quot; ?
2011-06-09 19:15 http://forum.msexcel.ru/profiles/andruxaxa-u43158.html
Такая ситуация. Есть строка, в которой параметры разделены между собой знаком |. Нужно составить эти параметры в столбик. Вручную очень долго, ибо параметров дофига.

Знаю, что можно это сделать при помощи замены Ctrl + F, но как там прописать энтер? У него есть свой код?
Может как-то по другому можно выполнить данную задачу? Может в Notepad++

Буду очень благодарен за помощь.

graffserg>> Формула ЕСЛИ и ее модернизация
2011-06-09 20:12 http://forum.msexcel.ru/profiles/graffserg-u87607.html
Уважаемые пользователи данного ресурса!
Помогите разобраться с данной формулой: ЕСЛИ((СУММЕСЛИМН(ЭкономическийЭффект!E2:E600;ЭкономическийЭффект!H2:H600;"=ЭкономЭффект";ЭкономическийЭффект!I2:I600;"=Возвращено (шт. или кг. или л.)";ЭкономическийЭффект!B2:B600;"="&AG1))=0;"";(СУММЕСЛИМН(ЭкономическийЭффект!E2:E600;ЭкономическийЭффект!H2:H600;"=ЭкономЭффект";ЭкономическийЭффект!I2:I600;"=Возвращено(шт. или кг. или л.)";ЭкономическийЭффект!B2:B600;"="&AG1)))
Суть: выделенное должно содержать разный диапазон.
Файл прилогаю

flyinsky>> Re: Построение диаграммы
2011-06-09 20:19 http://forum.msexcel.ru/profiles/flyinsky-u89298.html
и на этом огромное спасибо. Еще вопрос почему при выборе значений например 20,20,20,40  когда я строю круговую диаграмму и выбираю формат подписи данных (процентный) у меня подписываются данные в диаграмме как 2000%,2000%,2000%,4000%. Мне нужно чтобы было 20%,20%,20%,40%  то есть чтобы было не больше 100%

Serge 007>> Re: Формула ЕСЛИ и ее модернизация
2011-06-09 21:00 http://forum.msexcel.ru/profiles/serge_007-u25260.html
 И нафига темы дублировать?
Вторую удаляю.

По теме ответил здесь.

Serge 007>> Re: Как при помощи Ctrl + F заменить символ на &quot;энтер&quot; ?
2011-06-09 23:57 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Есть строка...
Блин, ну почему её не выложить, если она есть?
Ничего переделывать не буду.

sergo44441>> Re: Как удалить строки, которые дают в сумме 0?
2011-06-10 08:23 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
сделал макрос, идущие подряд строки одного лицевого счета, дающие в сумме 0, удаляются

Anton Stasenko>> формула в макросе - SUM (VLOOKUP)
2011-06-10 09:42 http://forum.msexcel.ru/profiles/antoine2000-u810.html
Добрый день, если кто поможет – буду очень признателен, так как не могу сообразить, как реализовать следующую задачу в макросе: Надо просуммировать 7 ячеек в файле, который выгружается из бухгалтерской программы. Т.к. могут быть изменения в расположении и названии файла, то я вставил адрес через path и «захват» названия из другого листа. Проблема в том, что из-за ограничения в длине строки (1000 знаков) у меня не хватило места для выборки значения по 7 признаку. Моя формула получилась такой:
ActiveCell.FormulaR1C1 = _
    "=SUM(IFERROR(VLOOKUP(""  2711"",'" & ThisWorkbook.Path & "\[" & Sheets("IS").Range("B2").Value & "]" & "RivileB'!C1:C6,5,FALSE),""""), IFERROR(VLOOKUP(""  2712"",'" & ThisWorkbook.Path & "\[" & Sheets("IS").Range("B2").Value & "]" & "RivileB'!C1:C6,5,FALSE),""""), IFERROR(VLOOKUP(""  2713"",'" & ThisWorkbook.Path & "\[" & Sheets("IS").Range("B2").Value & "]" & "RivileB'!C1:C6,5,FALSE),""""), IFERROR(VLOOKUP(""  2714"",'" & ThisWorkbook.Path & "\[" & Sheets("IS").R...

Виктория Зуева>> Re: Построение диаграммы
2011-06-10 10:31 http://forum.msexcel.ru/profiles/buka3-u2668.html
Выберите для подписей данных не значения, а доли.
А 20% - это 0,2 в процентном формате.

Prist>> Re: Как при помощи Ctrl + F заменить символ на &quot;энтер&quot; ?
2011-06-10 10:49 http://forum.msexcel.ru/profiles/prist-u4859.html
Выделяете нужный диапазон. Ctrl+H
В поле Найти: |
В поле Заменить на: зажимаете Alt и, удерживая её, на доп.клавиатуре(та, что справа от основной - цифровой блок) набираете 010
Заменить все.

nilem>> Re: формула в макросе - SUM (VLOOKUP)
2011-06-10 11:44 http://forum.msexcel.ru/profiles/nilem-u30547.html
У меня формула нормально записалась (около 500 знаков)
Код:
Sub tyu()
Dim pth As String, X As String
pth = ThisWorkbook.Path & "\["
X = Sheets("IS").Range("B2").Value & "]RivileB'!C1:C6,5,0),0)"
ActiveCell.FormulaR1C1 = "=SUM(IFERROR(VLOOKUP(""  2711"",'" & pth & X & _
        ", IFERROR(VLOOKUP(""  2712"",'" & pth & X & _
        ", IFERROR(VLOOKUP(""  2713"",'" & pth & X & _
        ", IFERROR(VLOOKUP(""  2714"",'" & pth & X & _
        ", IFERROR(VLOOKUP(""  2715"",'" & pth & X & _
        ", IFERROR(VLOOKUP(""  2716"",'" & pth & X & _
        ", IFERROR(VLOOKUP(""  2717"",'" & pth & X & _
        ", IFERROR(VLOOKUP(""  2718"",'" & pth & X & ")"
End Sub
Еще можно примерно так:
[code]Sub tyutyu()
Dim a$, poisk(), fnd As Range, i&, s#
poisk = Array("  2712", "  2713", "  2714", "  2715", "  2716", "  2717", "  2718")
a = ThisWorkbook.Path & "\" & Sheets("IS").Range("B2").Value
With GetObject(a)
    With .Worksheets("RivileB")
        For i = 0 To UBound(poisk)
            S...

Anton Stasenko>> Re: формула в макросе - SUM (VLOOKUP)
2011-06-10 12:16 http://forum.msexcel.ru/profiles/antoine2000-u810.html
Спасибо nilem'у, оба варианта добавлю в свою коллекцию макросов.

fure>> Поиск по критерию, обработка некоторой части найденного, сумма результатов
2011-06-10 13:12 http://forum.msexcel.ru/profiles/fure-u89390.html
Есть таблица с кучей данных. Для каждого адреса несколько строк (разное кол-во). В каждой строке несколько столбцов значений (тоже разное ко-во столбцов). Нужно не изменяя исходный файл найти все строки с одинаковым адресом, обработать только первую строку для каждого адреса, в которой есть данные, подсчитать, и если в обработке попадется ячейка удовлетворяющая условию, обработать и другие строки этого адреса для поиска дополнительного параметра.
На примере есть
улица-дом-оборудование-оборудование--оборудование
улица-дом-___порт_____-____порт____--____порт____
улица-дом-___пусто____-доп.параметр--____пусто___
улица-дом-___пусто____-___пусто____--___пусто____
следующ. адрес также
Надо посчитать сколько каждого оборудования для каждого адреса.

andruxa-xa>> Re: Как при помощи Ctrl + F заменить символ на &quot;энтер&quot; ?
2011-06-10 14:00 http://forum.msexcel.ru/profiles/andruxaxa-u43158.html
Всем спасибо, проблема решена.

_Boroda_>> Re: Макрос создать колонку данных из ячеек в определённых строках
2011-06-10 14:22 http://forum.msexcel.ru/profiles/boroda-u12234.html
Не совсем понял вопрос.
В другом файле вставляем такой макрос
Код:
Sub Макрос1()
Application.ScreenUpdating = 0
    c_ = Range("A1").SpecialCells(xlLastCell).Column
    Range("A1").Resize(3, c_).Copy
    sn_ = Worksheets.Add.Name
    With Sheets(sn_)
        .Range("A1").PasteSpecial Paste:=xlPasteAll, Transpose:=True
        Application.CutCopyMode = False
        .Columns("B:B").Delete Shift:=xlToLeft
        .Range("B2").Delete Shift:=xlUp
        .Range("A1:A" & c_).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
        .Range("A1").Select
    End With
Columns("A:B").EntireColumn.AutoFit
Application.ScreenUpdating = 1
End Sub
рисуем кнопку и вешаем а нее этот макрос
ии я что-то недоперепонял?

missttv>> Re: построчное добавление с разных листов на один
2011-06-10 15:45 http://forum.msexcel.ru/profiles/missttv-u51690.html
видимо это нереально  Грустный

iron priest>> Re: построчное добавление с разных листов на один
2011-06-10 16:10 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
нет примера нет ответа Веселый

missttv>> Re: построчное добавление с разных листов на один
2011-06-10 17:33 http://forum.msexcel.ru/profiles/missttv-u51690.html
что значит нет примера?  Злой а выше! все там есть!
нашла еще на другом сайте тему http://programmersforum.ru/showthread.php?t=104137 вот если бы обозвать кнопку "обновить"  и что что бы лист "Consolidated" не создавался а был постоянно, а еще при нажатии кнопки "обновить" лист "Consolidated" сначала чистился, потом сводил данные  Улыбка было бы уже классно!

tnnick>> Re: Palo-server
2011-06-10 18:10 http://forum.msexcel.ru/profiles/tnnick-u29088.html
Кому интересно научится работать с программой palo: открыта запись на бесплатный online тренинг.
Записаться можно тут: http://tnnick.livejournal.com/17835.html.


Джоник>> Закрытая книга и выпадающий список
2011-06-10 19:56 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Большой Привет спецыам!
Скадите пожалуйста, возможно ли сделать выпадающий список из даными закрытой книги?
Смотрите в примере Столбец А лист "Июнь" из книги "Получатель".
В моем примере, нужные даные, выпадаюший сисок берет на том же листе, где расположен сам (см. справа от основой таблицы). А надо, чтобы он брал их со столбца А, на листе "Перечень" из книги "Источник".
Заранее спасибо!


Prist>> Re: построчное добавление с разных листов на один
2011-06-10 20:19 http://forum.msexcel.ru/profiles/prist-u4859.html
Посмотрите эту статью. Я там выкладывал макрос, который как раз сбором данных с листов и книг и занимается.
Одно не понимаю: зачем лист не добавлять, а делать постоянным? Чтобы лишний раз жать кнопку Очистить и придти к тому же результату?
В коде по ссылке для добавления данных на фиксированный лист надо заменить строки:
Код:
ThisWorkbook.Sheets.Add After:=Sheets(Sheets.Count)
Set wsDataSheet = ThisWorkbook.ActiveSheet
на такую:
Код:
Set wsDataSheet = ThisWorkbook.Sheets("Consolidated")
Лист "Consolidated" должен уже существовать в книге.
Чтобы была возможность очистить, сразу после этой строки добавляете такую:
Код:
If MsgBox("Очистить итоговый лист перед сбором данных?", vbYesNo, "Запрос подтверждения") = vbYes Then
    wsDataSheet.UsedRange.Clear
End If

И до куч...

Алексей Шмуйлович>> Re: Palo-server
2011-06-10 22:07 http://forum.msexcel.ru/profiles/alexshm-u64.html
Спасибо, с удовольствием присоединюсь.

Dmitr68>> Re: Поиск по критерию, обработка некоторой части найденного, сумма результатов
2011-06-11 04:56 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
Так?

fure>> Re: Поиск по критерию, обработка некоторой части найденного, сумма результатов
2011-06-11 08:00 http://forum.msexcel.ru/profiles/fure-u89390.html
За решение с массивами спасибо.
Только если можно, как учесть дополнительные критерии? В данный момент Cisco 24 и Cisco 48 вообще не находит, и тем более не различает их между собой. И как сделать так, чтоб в результатах список адресов тоже сам формировался из уникальных значений? У меня в таблице исходников около 50000 строк, соответственно несколько тысяч адресов. Вручную забивать никакого желания.

Helg1989>> проблема со словарями
2011-06-11 15:31 http://forum.msexcel.ru/profiles/helg1989-u12943.html
Доброго времени суток.
Словом существует вот такая проблема


почему-то часть русских слов - ворд воспринимает, как английские( что делать ума не приложу... поставил язык словаря по умолчанию русский. однакож... как видите не помогло(


Maggi>> Re: Формула для сравнения данных
2011-06-11 22:00 http://forum.msexcel.ru/profiles/maggi-u4754.html
Последний вариант - самый удобный Аплодисменты

_Boroda_>> Re: Формула для сравнения данных
2011-06-12 03:25 http://forum.msexcel.ru/profiles/boroda-u12234.html
Ну уж и до кучи.

Разница - как и у Вики, работает с текстом (хоть в условии и не было); нет условного форматирования.

Виктория Зуева>> Re: проблема со словарями
2011-06-12 12:43 http://forum.msexcel.ru/profiles/buka3-u2668.html
Пока - просто ссылка:
http://wordexpert.ru/page/ispravlenie-jazyka-dlja-proverki-orfografii-v-microsoft-word

Михаил04060>> Можно ли открыть в Excel 2003 файл с расширением . xlsb?
2011-06-12 15:34 http://forum.msexcel.ru/profiles/mihail04060-u80843.html
Можно ли открыть в Excel 2003 файл с расширением .xlsb?


lich86>> Закрепление двух независимых областей
2011-06-12 18:34 http://forum.msexcel.ru/profiles/lich86-u89666.html
Пример: стандартная таблица с шапкой. Под шапкой пронумерованные строки от 1 до 100. Еще ниже - строк
а 'итого'.
Вопрос: как сделать одновременное закрепление шапки и строки 'итого' таким образом, чтобы и шапка и строка 'итого' были видны на одной области экрана, а строки 1-100 свободно прокручивались между ними?

iforgotmynick>> поиск соответствий в бд
2011-06-12 20:19 http://forum.msexcel.ru/profiles/iforgotmynick-u89668.html
Здравствуйте, у меня проблема. столкнулся с такой задачей: три листа с отчетами, каждый состоит из столбца с серийным номером (буквы-цифры), столбца с серийным номером в числовом виде (т.е. серийный номер у которого убрали буквы) и столбца с наименованием. причем очень часто серийные номера отсутствуют. все это необходимо внести в лист с результатами, где есть все серийные номера и наименования. и если найти соответствия по серийным номерам я могу при помощи [url=http://msexcel.ru/content/view/20/2/]ВПР(_)[/url], то наименования не приведены к общему виду и в одном листе может быть "контейнер 5 футовый", а в другом "5 футовый контейнер". как раз это я и не могу сделать - поставить это в соответствие.
к сожалению, с бейсиком дела не имел, да и экселем не занимался со времен школьной информатики, буквально за последние дни пробежался по учебнику Уокенбаха, но это мне мало помогло, поэтому буду рад любой помощи.
заранее спасибо.

Prist>> Re: Можно ли открыть в Excel 2003 файл с расширением . xlsb?
2011-06-12 21:01 http://forum.msexcel.ru/profiles/prist-u4859.html
Можно. Если установить специальный пакет совместимости с 2007 версией. Можно взять с офф.сайта по этой ссылке.

Serge 007>> Re: Закрепление двух независимых областей
2011-06-12 22:11 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Никак.

Михаил04060>> Re: Можно ли открыть в Excel 2003 файл с расширением . xlsb?
2011-06-12 22:50 http://forum.msexcel.ru/profiles/mihail04060-u80843.html
Спасибо большое. Сработало.
Уважение оказано.

sergo44441>> Re: поиск соответствий в бд
2011-06-12 22:54 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
интересная задача, а можете файлик с фрагментом данных приложить

Шпец Докапыч>> Re: поиск соответствий в бд
2011-06-12 23:08 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Используй нечёткое сравнение строк:

Код:
Function FindIM(lngMaxLen As Long, List, strStringStandart As String, lngCase As Long) As Long
  tmp = Application.Transpose(List)
  For i = 1 To List.Count
    iVal = IndistinctMatching(lngMaxLen, CStr(tmp(i)), strStringStandart, lngCase)
    If iVal > mVal Then n = i: mVal = iVal
  Next
  FindIM = n
End Function

=FindIM(5;Серийники;A1;0)

PS: Говорят, что круче всего юзать StrMatch.dll

Шпец Докапыч>> Re: Борьба с &quot;кракозябрами&quot;, вставляемыми из буфера обмена VISTA и Win-7
2011-06-12 23:21 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Тоже добавлю парочку рецептов:
1. Один моей пользовательской функцией:
Код:
Function CP1252in1(txt As String) As String
  For i = 1 To Len(txt)
    Mid(txt, i, 1) = StrConv(Mid(txt, i, 1), 64, 1049)
  Next
  CP1252in1 = txt
End Function

2. Другой от ZVI: Починка реестра - Rus.reg

lich86>> Re: Закрепление двух независимых областей
2011-06-12 23:22 http://forum.msexcel.ru/profiles/lich86-u89666.html
А возможно написать макрос, позволяющий это сделать?

Serge 007>> Re: Закрепление двух независимых областей
2011-06-12 23:37 http://forum.msexcel.ru/profiles/serge_007-u25260.html
А возможно написать макрос, позволяющий это сделать?
Не уверен, но думаю тоже нет.
Скорее всего - нет.


_Boroda_>> Re: Закрепление двух независимых областей
2011-06-13 00:18 http://forum.msexcel.ru/profiles/boroda-u12234.html
Посмотрите такие 3 варианта
Не совсем то, что нужно, но похоже

fdgdfgdg>> Re: уравнение полиномиальной линии тренда в excel
2011-06-13 00:26 http://forum.msexcel.ru/profiles/fdgdfgdg-u89720.html
См. приложенный файл
Расшифровку см. в столбце В




вот у меня задача, вывел уравнение y = 20,46x2 - 82025x + 8E+07
вместо Х надо подставить 2012 и должно получиться примерно 1200
Но никак не получается: 20,46*2012^2-82025*2012+80 000 000, что не так?

Шпец Докапыч>> Re: Закрепление двух независимых областей
2011-06-13 00:36 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Бросил полосу прокрутки на лист и прилепил к ней макрос.

Serge 007>> Re: Закрепление двух независимых областей
2011-06-13 00:42 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Бросил полосу прокрутки на лист и прилепил к ней макрос.
Серёг, привет.
Но в том виде, что вопрос задавал автор, решения нет?

lich86>> Re: Закрепление двух независимых областей
2011-06-13 00:56 http://forum.msexcel.ru/profiles/lich86-u89666.html
 полоса прокрутки не работает

Шпец Докапыч>> Re: Закрепление двух независимых областей
2011-06-13 01:02 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Но в том виде, что вопрос задавал автор, решения нет?
В Excel 2007 шапка списка (Ctrl+L) залазит на заголовки строк, а итог можно отобразить в разбитом экране.

полоса прокрутки не работает
А другие макросы работают?  Подмигивающий

cheshiki1>> Re: Закрытая книга и выпадающий список
2011-06-13 10:00 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html
создать в файле доп. столбец с формулой типа. ='C:\temp\Пример_4\[Источник.xls]Перечень'!$A3 и после по нему сделать список. Столбец в дальнейшем можно скрыть. Обязательное условие файл источник должен находиться по адресу указанному в формуле. в данном случае - C:\temp\Пример_4\.

Alexander VY>> Excel 2003, открытые файлы (впервые столкнулся с проблемой)
2011-06-13 12:24 http://forum.msexcel.ru/profiles/alexander_vy-u89835.html
Имею: Win 7 Home Premium, Ecxel 2003.

Вопрос: при открытии файлов из проводника Excel запускается каждый раз заново (во вкладке "Окно" отображается один файл, при закрытии программы остальные файлы не закрываются). В результате из файла в файл не сделать специальную вставку, не скопировать формат... Если открывать все файлы непосредственно из Excel, тогда всё нормально. Где что изменить: в настройках Excel, в Regedit, XLSTART или ещё где?
Аналогичная ситуация при работе в Word но там мне это не мешает.

Джоник>> Re: Закрытая книга и выпадающий список
2011-06-13 13:27 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Доброго дня всем!

создать в файле доп. столбец с формулой типа. ='C:\temp\Пример_4\[Источник.xls]Перечень'!$A3 и после по нему сделать список.

С этим способо я уже знаком.
Все хорошо, но есть один недостаток. При запуске книги, постоянно выпадает сообщение об обновлении.
А с помощью макроса это сделать можно?



andruxa-xa>> Как выделить цветом ячейки с определенными цифрами?
2011-06-13 13:53 http://forum.msexcel.ru/profiles/andruxaxa-u43158.html
Здравствуйте

Стоит такая задача. Есть таблица цифр. Нужно цифры из одного диапазона (например, от 1 до 10) выделить зеленым цветом, цифры другого диапазона (например, от 10 до 20) выделить салатовым и т.д.

Как можно это сделать быстро и удобно? Можно, конечно отсортировать по убыванию и вручную выделить, но у меня много столбцов, сортировать каждый и выделять цветом долго и муторно.

Спасибо.

Prist>> Re: Как выделить цветом ячейки с определенными цифрами?
2011-06-13 14:00 http://forum.msexcel.ru/profiles/prist-u4859.html
Применить Условное форматирование.

TimSha>> Re: Как выделить цветом ячейки с определенными цифрами?
2011-06-13 14:05 http://forum.msexcel.ru/profiles/timsha-u13313.html
... Как можно это сделать быстро и удобно?
Вариант - [url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url], если XL 2007/10 - можно комбинировать...

_Boroda_>> Re: уравнение полиномиальной линии тренда в excel
2011-06-13 16:30 http://forum.msexcel.ru/profiles/boroda-u12234.html
Цитировать
вместо Х надо подставить 2012 и должно получиться примерно 1200
А с чего Вы это взяли?

iforgotmynick>> Re: поиск соответствий в бд
2011-06-13 16:41 http://forum.msexcel.ru/profiles/iforgotmynick-u89668.html
когда пытался взять фрагмент таблицы чтобы все было видно, проблема отпала сама собой. но все равно спасибо за совет, может еще пригодится

fdgdfgdg>> Re: уравнение полиномиальной линии тренда в excel
2011-06-13 19:12 http://forum.msexcel.ru/profiles/fdgdfgdg-u89720.html
Цитировать
вместо Х надо подставить 2012 и должно получиться примерно 1200
А с чего Вы это взяли?

вот пример

o5tion>> &quot;текст содержит&quot;
2011-06-13 19:12 http://forum.msexcel.ru/profiles/o5tion-u39941.html
Интересует возможность в формуле прописывать что-то на подобии критериев условного форматирования. Т.е. нужно в формуле указать: если ячейки такого-то диапазона СОДЕРЖАТ(!) определенную комбинацию букв(либо прописывать ссылку на ячейку с текстом), то данная ячейка красится определенным цветом.

выходит два вопроса:
1)как в формуле прописать "текст содержит".
2)как в формуле прописать код цвета.

p.s. пример прикрепил.

Serge 007>> Re: &quot;текст содержит&quot;
2011-06-13 19:51 http://forum.msexcel.ru/profiles/serge_007-u25260.html
как в формуле прописать код цвета?
Никак.

ЗЫ А чем [url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url] не подходит?

o5tion>> Re: &quot;текст содержит&quot;
2011-06-13 20:14 http://forum.msexcel.ru/profiles/o5tion-u39941.html
как в формуле прописать код цвета?
Никак.

ЗЫ А чем условное_форматирование не подходит?
условий несколько, проще было бы их фразу для условия записывать в ячейку, на которую уже формула будет ссылаться при поиске и красить найденные ячейки в цвет искомой ячейки.

Serge 007>> Re: &quot;текст содержит&quot;
2011-06-13 20:18 http://forum.msexcel.ru/profiles/serge_007-u25260.html
условий несколько, проще было бы их фразу для условия записывать в ячейку, на которую уже формула будет ссылаться при поиске и красить найденные ячейки в цвет искомой ячейки.
Тогда только макросом.

kimtan>> Re: &quot;текст содержит&quot;
2011-06-13 21:45 http://forum.msexcel.ru/profiles/kimtan-u12219.html
В Excel 2007-2010, в условном форматировании, можно назначать более трех условий на одну ячейку.

Prist>> Re: &quot;текст содержит&quot;
2011-06-13 21:48 http://forum.msexcel.ru/profiles/prist-u4859.html
Как вариант. На листе "слова для поиска" находятся слова. Если какое-либо из слов будет найдено в ячейке на Лист1, то ячейка закрасится в зеленый цвет. Сделано через УФ.

Adar>> Удаление строк по цвету
2011-06-13 22:50 http://forum.msexcel.ru/profiles/adar-u8942.html
У меня есть строки - выходные и праздники, они покрашены серым (не [url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url]) хорошо бы их с помощью макроса удалять, так как подгрузку данных мне не удаётся настроить, а каждый раз за 5+ лет удалять строки я запарюсь (уже).

Спасибо!

sergo44441>> Re: Удаление строк по цвету
2011-06-13 23:05 http://forum.msexcel.ru/profiles/sergo44441-u3995.html
если у вас 2007 эксель, то там есть фильтр по цвету, поставить его и выделенные строки удалить
если 2003, то нужно вставить такой макрос
Sub delete_rows()
r = 1
While r <= ActiveSheet.UsedRange.Rows.Count
    If Cells(r, 1).Interior.ColorIndex <> xlNone Then
    Rows(r).Delete shift:=xlUp
    r = r - 1
    End If
r = r + 1
Wend
End Sub

fure>> Re: Поиск по критерию, обработка некоторой части найденного, сумма результатов
2011-06-14 11:17 http://forum.msexcel.ru/profiles/fure-u89390.html
А как сократить формулу или изменить ее:
=СЧЁТЕСЛИМН('исходные данные'!$A:$A;результат!$A6;'исходные данные'!$B:$B;результат!$B6;'исходные данные'!$D:$D;"*48*порт*")+СЧЁТЕСЛИМН('исходные данные'!$A:$A;результат!$A6;'исходные данные'!$B:$B;результат!$B6;'исходные данные'!$E:$E;"*48*порт*")+СЧЁТЕСЛИМН('исходные данные'!$A:$A;результат!$A6;'исходные данные'!$B:$B;результат!$B6;'исходные данные'!$F:$F;"*48*порт*")+СЧЁТЕСЛИМН('исходные данные'!$A:$A;результат!$A6;'исходные данные'!$B:$B;результат!$B6;'исходные данные'!$G:$G;"*48*порт*")...и т.д.
т.е. находим совпадение по первым двум столбцам, считаем совпадения для следующих в этом диапазоне. Только столбцов много, такой кривой записью все не влазят.



Alex_ST>> Re: Борьба с &quot;кракозябрами&quot;, вставляемыми из буфера обмена VISTA и Win-7
2011-06-14 13:05 http://forum.msexcel.ru/profiles/alexst-u65623.html
К сожалению, ВСЕ предлагавшиеся на разных форумах файлы для редактирования реестра, хотя и вносили требуемые изменения в реестр, но к ожидаемому результату не приводили. Это  многократно мною проверялось, в том числе и этот файл, предлагавшийся ZVI.
Реальный результат дала только выше описанная замена файлов.
Ну а для упрощения расшифровки искалеченных текстов в постах я из своей UDF сделал скрипт VBS, который расшифровывает данные, скопированные в буфер обмена:[code]   'берет текст из буфера обмена и выводит сообщение с исправленным текстом
   Dim GLUK, Arr, i, sTxt, sSymb
   With GetObject("New:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}")
      .GetFromClipboard: GLUK = .GetText   ' получить значение из буфера обмена
   End With
   Arr = Split(Replace(Replace(GLUK, "&#", ";&#"), ";;", ";"), ";")
   If UBound(Arr) > LBound(Arr) Then
      For i = LBound(Arr) To UBound(Arr)
         If Left(Arr(i), 2) = "&#" And IsNumeric(Mid(Arr(i), 3)) Then
            Arr(i) = CInt(Replace(Arr(i), "&...

Adar>> Re: Макрос создать колонку данных из ячеек в определённых строках
2011-06-14 13:28 http://forum.msexcel.ru/profiles/adar-u8942.html
Не совсем понял вопрос.
В другом файле вставляем такой макрос
Код:
Sub Макрос1()
Application.ScreenUpdating = 0
    c_ = Range("A1").SpecialCells(xlLastCell).Column
    Range("A1").Resize(3, c_).Copy
    sn_ = Worksheets.Add.Name
    With Sheets(sn_)
        .Range("A1").PasteSpecial Paste:=xlPasteAll, Transpose:=True
        Application.CutCopyMode = False
        .Columns("B:B").Delete Shift:=xlToLeft
        .Range("B2").Delete Shift:=xlUp
        .Range("A1:A" & c_).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
        .Range("A1").Select
    End With
Columns("A:B").EntireColumn.AutoFit
Application.ScreenUpdating = 1
End Sub
рисуем кнопку и вешаем а нее этот макрос
ии я что-то недоперепонял?

я скопировал один в один, нажимаю запуск макроса открывается лист где появляются названия колонок но значений дальше нет. Где мне тут задать название листа с которого выборку данных делать, у меня та...

Adar>> Re: Удаление строк по цвету
2011-06-14 13:32 http://forum.msexcel.ru/profiles/adar-u8942.html
А теперь задача немного изменилась - есть лист 1 с датами и есть лист 2 с датами, необоходимо удалить строки в обоих листах с единожды повторяющимеся значениями. таким образом остануться даты которые встречаются на обоих листах.

dronnet>> Удаление строки, регулярные выражения, без макросов
2011-06-14 15:07 http://forum.msexcel.ru/profiles/dronnet-u74053.html
Необходимо используя функцию Excel заменить (Ctrl+H) сделать на основе «Регулярных выражений» штуку, которая удаляла строки во всей книге (по всем листам), не содержащие последовательность символов. Строка должна удалятся полностью, а не только содержание строки (чтобы после удаления не оставалось пустых строк). Как сделать это??? Помогите



Prist>> Re: Удаление строки, регулярные выражения, без макросов
2011-06-14 15:10 http://forum.msexcel.ru/profiles/prist-u4859.html
Никак. Регулярные выражения поддерживаются только в VBA и то через подключение к соответствующей библиотеке. И удалить строки по условию можно только через VBA. Функции удалять не могут, а команд подобных просто нет среди встроенных. Тем более для всех листов.

baber75>> Нужна помощь в автоматизации заполнения сводной ведомости приниятия зачетов
2011-06-14 15:16 http://forum.msexcel.ru/profiles/baber75-u90119.html
Добрый день!
Возник вопрос автоматизация заполнения сводной ведомости приниятия зачетов.
Исходными данными являются: возрастная группа и непосредственно количественный показатель выполнения норматива (т.е. время или количество раз).
Возрастную группу и количественный показатель нужно вводить с клавиатуры.
Хотелось бы хранить формулу выставления оценки в ячейке оценки.
Общая оценка по каждому блоку (зеленое выделение) выводится как среднее арифметическое, округленное до целого числа.
Общая ощенка выводится по общим оценкам блоков.
В итоге должно быть указано количество сдававших, количество получивших оценку отлично, оценку хорошо, и оценку удовлетворительно ко каждому блоку отдельно.

missttv>> Re: построчное добавление с разных листов на один
2011-06-14 15:25 http://forum.msexcel.ru/profiles/missttv-u51690.html
как-то не совсем корректно получилось...
точнее не красиво

Serge 007>> Re: Нужна помощь в автоматизации заполнения сводной ведомости приниятия зачетов
2011-06-14 15:25 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Андрей, заполните несколько ячеек итогами, потому как непонятно что должно получиться и чем принципиально отличается эта задача от тех что Вы выкладывали здесь, здесь и здесь.

baber75>> Re: Нужна помощь в автоматизации заполнения сводной ведомости приниятия зачетов
2011-06-14 15:52 http://forum.msexcel.ru/profiles/baber75-u90119.html
Вот пример заполнения

Prist>> Re: построчное добавление с разных листов на один
2011-06-14 16:00 http://forum.msexcel.ru/profiles/prist-u4859.html
В Вашем конкретном случае можно заменить эту строку:
lLastRowMyBook = wsDataSheet.Cells.SpecialCells(xlLastCell).Row + 1

на такую:
lLastRowMyBook = wsDataSheet.Cells(wsDataSheet.Rows.Count,1).End(xlUp).Row+1

Что зачем и почему именно так, читайте в этой статье.

_Boroda_>> Re: Макрос создать колонку данных из ячеек в определённых строках
2011-06-14 16:19 http://forum.msexcel.ru/profiles/boroda-u12234.html
Макрос берет данные из активного листа. Короче - файл с непонятками и хочушками где?

Adar>> Re: Макрос создать колонку данных из ячеек в определённых строках
2011-06-14 16:33 http://forum.msexcel.ru/profiles/adar-u8942.html
Макрос берет данные из активного листа. Короче - файл с непонятками и хочушками где?
раз с активного то оставил три листа (иначе не влезет на форум) и захват данных должен идти с листа data.

И можно чтобы макрос не создавал новый лист а кидал всё на лист "sort risk"?

Спасибо

Alex_ST>> Re: Excel 2003, открытые файлы (впервые столкнулся с проблемой)
2011-06-14 16:49 http://forum.msexcel.ru/profiles/alexst-u65623.html
Кажется, на ХРюше с этим боролись так:
Панель управления-Свойства папки-Типы файлов. Находите файлы Excel и для каждого: Дополнительно-Просматривать в том же окне
Наверное, на Win 7 тоже что-то похожее.

flyinsky>> Ошибка макроса
2011-06-14 16:58 http://forum.msexcel.ru/profiles/flyinsky-u89298.html
Здравствуйте всем надеюсь на вашу помощь.
Мне нужно макросом добавить заголовок в существующюю диаграмму (текст заголовка нужно взять из определенных ячеек).
Выбрал способ по копированию ячейки как рисунка. Начинаю все свои действия записывать макросом
вот что получилось:
Код:
Sub sfg()
'
' sfg Макрос
'

'
    Range("A18:B23").Select
    Selection.Copy
    Application.CutCopyMode = False
    Selection.Copy
    Application.CutCopyMode = False
    Selection.CopyPicture Appearance:=xlPrinter, Format:=xlPicture
    Sheets("Диаграмма").Select
    ActiveSheet.ChartObjects("Диаграмма 1""""").Activate
    ActiveChart.Paste
    ActiveSheet.ChartObjects("Диаграмма 1").Activate
    ActiveChart.PlotArea.Select
    ActiveSheet.ChartObjects("Диаграмма 1").Activate
    ActiveChart.ChartArea.Select
End Sub

При запуске макроса выдает "ошибка очистки буфера обмена"
Подскажить как решить данную ситуацию??  А может есть другие способы добавления заголовка в диаграмму из ячеек Excel ?

_Boroda_>> Re: Макрос создать колонку данных из ячеек в определённых строках
2011-06-14 17:00 http://forum.msexcel.ru/profiles/boroda-u12234.html
А почему в первом примере в строке 3 значения, а во втором примере - формулы? Тогда другой тип вставки


_Boroda_>> Re: Ошибка макроса
2011-06-14 17:03 http://forum.msexcel.ru/profiles/boroda-u12234.html
файл где
и в нем пояснения что откуда и куда

flyinsky>> Re: Ошибка макроса
2011-06-14 17:28 http://forum.msexcel.ru/profiles/flyinsky-u89298.html
файл где
и в нем пояснения что откуда и куда
Вообщем нужно добавить заголовок в диаграмму из ячеек второго листа при помощи макроса. Вложил файл там уже готовый результат показан как оно должно быть.

Serge 007>> Re: Нужна помощь в автоматизации заполнения сводной ведомости приниятия зачетов
2011-06-14 18:05 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Дмитрий (DV68), предложил Вам готовое решение с подробным описанием здесь.
Оно целиком и полностью подходит под Ваши условия и естественно рабочее.
Не вижу смысла за Вас заниматься однообразной работой оператора по внесению циферек разных условий в разные именованые диапазоны. Это легко можете сделать и Вы сами. Удачи.

_Boroda_>> Re: Ошибка макроса
2011-06-14 18:26 http://forum.msexcel.ru/profiles/boroda-u12234.html
Без макроса
выделяем заголовок, в строке формул пишем = переходим на нужный лист, выделяем нужные ячейки.
У ячеек этих или границы покрасить белым можно, или на этом листе сделать невидимые линии сетки

Adar>> Re: Макрос создать колонку данных из ячеек в определённых строках
2011-06-14 18:40 http://forum.msexcel.ru/profiles/adar-u8942.html
как то не подумал что это имеет значение, спасибо! Улыбка


На форуме Вы можете получить совет по любым вопросам работы в Microsoft Excel.

Добро пожаловать на форум!


В избранное