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

Выпуск 44
от 2008-11-14

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

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

Основные разделы сайта

Статьи

Форум

Новости сайта в формате RSS
Новые сообщения форума в формате RSS

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

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

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

Наши сайты

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

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

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

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

Наши друзья

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

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

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

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

Как поймать событие изменения Interior.Colorindex выделеного диапазона ?
2008-11-07 07:17
Возможно ли  поймать событие изменения Interior.Colorindex выделеного диапазона ?

Ситуация такая : пользователь выделяет несколько столбцов (или строк или весь лист сразу) и устанавливает для всего диапазона  "нет заливки". При этом в диапазоне вероятн...

Re: как производить поиск среди PivotItems?
2008-11-07 09:27
Спасибо!
я правда писал For i = 1 To PT.PivotItems.Count
где PT -- переменная класса PivotTable -- выдавало ошибку. Теперь попробую написать, как вы посоветовали, спасибо еще раз

Re: как програмно вложить в ActiveCell сложную формулу?
2008-11-07 11:02
Сегодня дописал используя Rift и Left вырезки из адреса ячейки.
Andrey Lenets, подскажите, можно ли было решить проблему выделения от активной ячейки до конца массива (я использовал для его определения Application.Rows.Count) с использованием относител...

Re: Запрос на ввод в ячейку
2008-11-07 11:25
А реально такое же сделать в Опен Оффисе? Самое лучшее если б решение было кроссплатформенное (ну чтоб работало и в Екселе и ОпенОфисе) 

Нужна помощь с форматом данных
2008-11-07 12:45
Есть столбец который заполнен числами,например такого формата: 78549654.
Нужно с этого числа взять первые 4 цифры и сравнить их с числом в другой ячейке.
Подскажите пожалуйста как это сделать.
Заранее благодарю за помощь

Re: Нужна помощь с форматом данных
2008-11-07 13:22
если в A1 число, из которого вырезают 4 симв, а в В1 число, с которым сравнивают, то можно воспользоваться формулой:
=СОВПАД(ЛЕВСИМВ(A1;4);B1)

Re: Нужна помощь с форматом данных
2008-11-07 13:24
Благодарю за помощь

Решение задачи с двумя неизвестными
2008-11-07 17:41
Здравствуйте!
Задача: Магазин по продаже бытовой техники.
Есть возможность оформлять в кредит, при этом цена на товар больше на 5%. Если клиент хочет купить телевизор за 25 000р., а сумма денег в кармане, например, 10 000р., для экономии денег мы разби...

Про перенос текста в ячейке с формулой
2008-11-07 18:17
У меня большая таблица. Часть данных в ней стыкуется с другим файлом. Поэтому у меня через формулу происходит автоматические обновление содержимого. Т.е. например я выбираю в списке название фирмы и в другие ячейки автоматом вставляются Контакты, адрес...

Re: Как довести таблицу до ума?
2008-11-07 19:24
Подскажите почему  не работает формула
Если в ячейках А2 и B2  пусто , то дату из ячейки С2 поместить в D2

Re: Решение задачи с двумя неизвестными
2008-11-07 20:14
Ой, любезный. Что-то Вы сами себя запутали. Это элементарная задачка для третьего класса. Переменная здесь одна - полная цена - не переменная, а константа.
Пусть а - цена телевизора, х - сумма в кармане.
Тогда сумма кредита = (а-х)/0,895
Всё. Проценты ...

Re: Решение задачи с двумя неизвестными
2008-11-07 20:42
Уважаемый Алексей, спасибо за оперативный ответ.
Но видимо я и правда все слишком запутал!
Дело в том, что мне необходима формула (оператор) Excel'я, которая поможет мгновенно определить: 1. Сумму, каторая останется за наличный расчет; 2. Первый взнос....

Re: Про перенос текста в ячейке с формулой
2008-11-08 00:17

Вычисление по дням
2008-11-08 00:17
Здрасти,
Нужна формула чтоб,считала ячейки в определённых датах,в указаном диапазоне.Сам не могу дойти

Re: Вычисление по дням
2008-11-08 00:47

• D7: {=СУММ(('очки соревнован.'!B$1:II$1>=$C$...

Re: Вычисление по дням
2008-11-08 02:15
Списибо,я сам не мог сделать из за незнания массива,,,
Такой ещё вопрос,а есть формулы которые автоматически упорядычевыют по имени?

Re: Решение задачи с двумя неизвестными. Расч
2008-11-08 10:04
В ячейке В1: =(А1-А2)/0,895*1,05/10
В ячейке В2: =А2-В1

Re: Решение задачи с двумя неизвестными. Расч
2008-11-08 10:06
А вообще мне кажется, что брать проценты с первого взноса - не есть хорошо

Re: Вычисление по дням
2008-11-08 10:29

Re: Про перенос текста в ячейке с формулой
2008-11-08 12:33
К сожалению, не сработала.
Может я как то неправильно объяснил. Во вложенном файле скрин. Красным цветом список, который я выбираю. Черным соответсвенно результат выбора. А желтым помечена ячейка, в которой подобная формула
=СМЕЩ('База строителей'!$E...

Re: Решение задачи с двумя неизвестными
2008-11-08 14:44
Благодарю, Алексей!
Задача и правда оказалась за третий класс.

А по поводу процентов - это не наша воля просто банки хотят "посидеть на двух стульях", а мы выкручиваемся...
Успехов Вам!

Создание шаблона с меняющимся номером при каждом открытии документа
2008-11-08 18:29
Пожалуйста, подскажите, в WORD 2007/EXCEL2007:
1.   Как создать новый шаблон, т.е., с полями в документе или ячейками, необходимыми для  заполнения (окрашено серым в квадратных скобках) WORD 2007/EXCEL2007?
2.   Возможно ли создание в этих программах шабло...

Re: Про перенос текста в ячейке с формулой
2008-11-08 18:45

Ссылка на автофигуру
2008-11-08 19:35
подскажите пожалуйста как можно сделать ссылку на автофигуру?

Например в диапозоне ячеек A1:A500 У меня название автофигур, нажимая на ячейку A1 - выполняется действие ActiveSheet.Shapes("TAutoshape1").Select

Дополнительный вопрос. Можно ли как-нибудь ...

Re: Вычисление по дням
2008-11-08 21:15

Re: Как довести таблицу до ума?
2008-11-08 21:30
Уважаемый  Василий Алибабаевич , Спасибо ,   проблема решена!
Оказывается все вспомогательные столбцы были в  последней   версии  сводной , изменил лишь формулу в
столбце  "Период Мега"

получение всех комбинаций заданных чисел
2008-11-09 01:02
Всем добрый день!

Помогите решить такую задачу - нужно получить все комбинации из заданного диапазона чисел, например, мы имеем 4 числа: 20, 10, 5, 3 -должны получиться следующие наборы: 1) 20 2) 20, 10 3) 20, 10, 5 4) 20, 10, 5, 3 5) 10 6) 10, 20 7) 1...

Re: Про перенос текста в ячейке с формулой
2008-11-09 11:47

Цитата: brico от 08 Ноябрь 2008, 12:33:54

Например, скопировать и вставить в блокнотик.
Как вариант, отобразить в строке состояния:
[code]P...

Re: Ссылка на автофигуру
2008-11-09 12:35

Как найти ячейки с условным форматированием?
2008-11-09 14:22
Подскажите пожалуйста как найти на рабочем листе ячейки в которых есть [url=http://msexcel.ru/content/view/116/2/]условное форматирование[/url]?

Как выделить одинаковые ячейки?
2008-11-09 17:46
Здравствуйте! Такой вот вопросик нарисовался:
Есть к примеру столбец с 1000 строками. Нужно как-то (наверное макрос) найти все одинаковые ячейки столбца и выделить их например красным цветом..Подскажите как реализовать? А то я в VBA не шарю а в Delphi ...

Re: Как выделить одинаковые ячейки?
2008-11-09 17:50

Re: Как найти ячейки с условным форматированием?
2008-11-09 18:04
Да, спасибо, гиперссылки очень пригодились. А, интересно, можно ли вместо адресов ячеек вытащить еще и формулы, которые зашиты в условном форматировании?

Re: Возможно ли решение задачи...
2008-11-09 18:21
Календарь нарисовал, а с поиском проблемы. Корифеи где Вы? Как запихнуть колбасу в нужное место?

Re: Как выделить одинаковые ячейки?
2008-11-09 18:25
Спасибо за идею)) Но такой способ позволяет отслеживать повторение при вводе новых данных а мне надо подсветить дубликаты в уже набранном диапазоне Что-то разобраться не могу...Вот прикрепил файлик..Там нужно в столбце J подсветить все дублированные яч...

Re: Как выделить одинаковые ячейки?
2008-11-09 19:12

Вставить пустую строку после ячеек с определённым текстом
2008-11-09 19:25
Помогите написать макрос.

Нужно в таблице в колонке (например "F") находить ячейки с определённым текстом (например "Cумма:" ) после которых вставлять пустую строку. То есть надо перебирать от первой строчки до последней в таблице.

Re: Как выделить одинаковые ячейки? [РЕШЕНО]
2008-11-09 19:49
Спасибо тебе, добрый человек! Это то шо надо! Жил бы ты у нас в городе я б те пиво поставил))))
[Тема закрыта]

Re: Вставить пустую строку после ячеек с определённым текстом
2008-11-09 22:55

Re: Возможно ли решение задачи...
2008-11-09 23:36

Re: Вставить пустую строку после ячеек с определённым текстом
2008-11-09 23:53
Большое спасибо!

Re: Ссылка на автофигуру
2008-11-10 02:02
Спасибо! То что надо

Re: Запрос на ввод в ячейку
2008-11-10 06:04

Re: Как найти ячейки с условным форматированием?
2008-11-10 10:52

Re: Как довести таблицу до ума?
2008-11-10 13:00
Подскажите как преобразовать эти данные в числовые в столбцах "E"  " F " "G" "H"

Устранение указания МС Эксел "Слишком много форматов ячеек".
2008-11-10 13:53
Господа,

после поиска путей решения в форуме и апробации некоторых предложений, и понимая, что вопрос имеет "длинную бороду" с 2005 года прошу помощи у гуру Майкрософт. В Экселе 2003: книга имеет размер более 50Мб и более сотни листов. На некоторых лис...

Re: Как найти ячейки с условным форматированием?
2008-11-10 13:54
Тогда, наверно, не "вместо", а "вместе с"?

Конечно!!! Очепятка :-)
Спасибо!!!!!!!!!!!!!!!!! Просто гениально! А я мучился, проверяя формулы... Сам же пишу, проверяю и все равно ошибки ;-)

Re: Разбивка ячейки на строки с сохранением соседних ячеек, need help!
2008-11-10 15:05

Re: Устранение указания МС Эксел "Слишком много форматов ячеек".
2008-11-10 17:20

• - диаграммы есть?
• - листы идентичны по структуре?;
• - какой стандартный шрифт и ш...

Re: Как довести таблицу до ума?
2008-11-10 17:38

Макрос с заполнением пустых ячеек
2008-11-10 22:04
Доброе время суток!
Совсем не знаю VBA, но есть необходимость обработать большой объем информации.
Прошу помочь в написании макроса для выполнения следующего действия: необходимо заполнить в неком столбце все пустые ячейки теми значениями, которые стоя...

Re: Макрос с заполнением пустых ячеек
2008-11-11 07:34
Будьте любезны пример. Ведь не секрет, что макрос можно организовать поразному - в зависимости от конкретных условий информационного поля

Организация вывода на печать.
2008-11-11 07:45
Доброе всем утро! Вопрос: Есть три листа с таблицами различными по структуре. Как макросом организовать их вывод на печать. Вывод должен быть осуществлен на три листа формата А4, ориентация "Книжная"?

т.е. я так понимаю, что нужно в макросе менять, при...

Re: Устранение указания МС Эксел "Слишком много форматов ячеек".
2008-11-11 09:31
Спасибо за ответ,-
- диаграмм нет,
- листы идентичны по структуре (но тоже много самостоятельных форматов),
- стандартный - "Тахома", шрифт в ячейках в 10% случаях Тахома жирный или выделение подчёркивание,
- много единичных форматирований "цветом и се...

Re: Организация вывода на печать.
2008-11-11 09:34

Re: Организация вывода на печать.
2008-11-11 09:47
Большое спасибо! Пошел пробовать.
Листы физически - отдельные листы.

Re: Устранение указания МС Эксел "Слишком много форматов ячеек".
2008-11-11 10:09

Re: Макрос с заполнением пустых ячеек
2008-11-11 10:20

• выделите ячейки "A1:A8";
• включите мак...

Re: Устранение указания МС Эксел "Слишком много форматов ячеек".
2008-11-11 12:56

Re: Устранение указания МС Эксел "Слишком много форматов ячеек".
2008-11-11 13:02
Извините,- нет возможности, а как требуется ...
Будем работать и обязуюсь обязательно сообщить
результат - мне надо время, дабы сделать все  без
ошибок и чётко.

Спасибо вам за консультацию.

Re: подскажите с формулой
2008-11-11 13:07

• выделить весь столбец;
• Формат -> Ячейки -> Число -> (все форматы) -> Тип: -0...

Re: Устранение указания МС Эксел "Слишком много форматов ячеек".
2008-11-11 13:16

Re: подскажите с формулой
2008-11-11 13:26
все бы хорошо но числа формата 7785.112 не подходят, минусы к ним не подписываются:(  Числа без точек работают... Да... должны быть не запятые, а точки

Корректный вывод на печать флажков
2008-11-11 14:08
Добрый день!
Ситуация следующая: на листе excel создана форма, предлагающая пользователю выбор из множества позиций с помощью установления флажка напротив нужной позиции. Итоговая форма выводится одним листом. Для этих целей использована опция "размест...

Re: Возможно ли решение задачи...
2008-11-11 14:14
За подсказку спасибо, похоже это то, что нужно. Я пользуюсь справочником:
, книга толстая, но не все функции раскрыты.
На тему календаря, если Вы установите дату в ячейку, то и месяц ...

Re: Возможно ли решение задачи...
2008-11-11 14:46
Решение найдено, СПАСИБО!
Если не понятно ставил задачу, значит сам не знал, что хотел, ИЗВИНИТЕ.

Re: подскажите с формулой
2008-11-11 15:57

Все бы хорошо но числа формата 7785.112 не подходят, минусы к ним не подписываются

Re: чтобы менялось число каждое открытие файла
2008-11-11 16:49
Все получилось!!!!!!!!!!!! То, что нужно !!! спасибо большое Шпец Докапыч!!! 
    Только назревает к такому специалисту еще один вопросик заковырка -))) -- этот файл с числом (.txt) Можно ли его сделать хотябы скрытым?-)) Я попробовал , но тогда эта V...

Появилось окошко не могу убрать помогите.
2008-11-11 17:40
Здравствуйте! Не заметил как, но в таблице в я чейке появилось окошко.. как буд то вырезали кусок.. при наведении, курсор никак не реагирует. Ячейка под окошком функционирует нормально.. может кто подскажет что ето? Сдвинуть и убрать не получается.

Re: Появилось окошко не могу убрать помогите.
2008-11-11 17:44
вот картинка

Re: Появилось окошко не могу убрать помогите.
2008-11-11 17:50

• Кн. Office -> Параметры Excel -> Основные ...

Re: Не срабатывает On Error GoTo...
2008-11-11 18:00
По-моему не хватает этих самых меток, к которым надо перейти в результате возникновения ошибки...

Re: Не срабатывает On Error GoTo...
2008-11-11 19:11
До 89-и будет достаточно?

[code]Sub SHD_NextValInNameSheet()
  For Each i In Sheets
    For n = 1 To Len(i.Name)
      svl = Mid(i.Name, n, 1)
      If svl Like "#" Then
        If CByte(svl) + 1 = 10 And flag Then
          svl = 0
          NewName =...

Запись в текстовый файл
2008-11-11 21:09
Здравствуйте!Подскажите, как записывать из кода информацию в текстовый файл. Хочу записать массив чисел. Каждое число с новой строки.

Re: Запись в текстовый файл
2008-11-11 21:45

Re: подскажите с формулой
2008-11-12 07:02
Ну, тогда навесте на событие макрос, который и будет к Вашему числу "пристегивать" минус. И дело в шляпе

Re: подскажите с формулой
2008-11-12 09:41

Ну, тогда навесте на событие макрос, который и будет к Вашему числу "пристегивать" минус. И дело в шляпе

Re: Не срабатывает On Error GoTo...
2008-11-12 11:12

Re: Сохранение книги
2008-11-12 11:26
iName = Cells(1,1).Value
iPath = Activeworkbook.Path & "\"
ActiveWorkbook.SaveAs FileName:=iPath & iName

Re: Сохранение книги
2008-11-12 11:37
Спасибо, работает!
А каким образом необходимо изменить код, чтобы КНИГА (а не лист) сохранялась на диске "С" в Папке "Клиенты?"

Sub Кнопка1_Щелкнуть()
Application.DisplayAlerts = False
  Set WorkB = ActiveWorkbook
  WorkSH = ActiveSheet.Name
  ФИО = Ra...

Re: Сохранение книги
2008-11-12 11:40
iName = Cells(1,1).Value
iPath = "С\Клиенты\"
SaveAs FileName:=iPath & iName

Re: Сохранение книги
2008-11-12 11:48
Уважаемый Prist,
Программа ругается на "SaveAs"   
Как связать Ваши два кода, чтобы книга сохранялась в папке "клиенты" под именем, равным тексту из ячейки "Клиенты"?

Re: Сохранение книги
2008-11-12 12:43
iName = Cells(1,1).Value
iPath = "С\Клиенты\"
Activeworkbook.SaveAs FileName:=iPath & iName

Как из трех книг-листов Excel сбрать один документ Word?
2008-11-12 14:39
Добрый всем вечер!
Я незнаток ворда, а поэтому прошу помощи. Из трех книг Excel (в каждой - один лист с табличкой. Все таблички разного формата (количество строк и столбцов разное) нужно собрать документ Word.
Хотел пристегнуть архив с примером а недае...

Re: подскажите с формулой
2008-11-12 14:42
Так вы сначала преобразуйте значение переменной в Numeric, а затем уже *(-1)

Re: подскажите с формулой
2008-11-12 14:46

Как правильно изменить путь к файлу
2008-11-12 15:15
Всем - приветик!
Споткнулся о проблемку:

необходимо изменить путь к файлу, установленый по умолчанию c:\Temp, на путь к папке, которая находиться на сетевом ресурсе:
 \\nt_forall\myFolder
делаю это в модуле через ChDir " \\nt_forall\myFolder"
но при пр...

Re: чтобы менялось число каждое открытие файла
2008-11-12 15:27
Цитирую Докапыча  "В данном случае текстовый файл создастся в этой же папке, где и xls-файл, но можно использовать любую папку, исправив путь к файлу (txtFile)." из темы "Файл уже используеться Excel 2003" - смотри выше.
Создать папку которую никто ...

Перенос информации с одного документа в второй и обчисление етой информации
2008-11-12 15:36
Здравствуйте!
Интересует следующий вопрос:

Входная информация:

Документ 1 (.xls)  з данными
Документ 2  .xls)  з данными

Меняется в документах только числовая информация.

Задача:
Как сделать так, что-бы в Документ 3 (.xls) , переносились нужные данные ...

Re: подскажите с формулой
2008-11-12 16:26
Я тут посмотрел: Лучше всего - пристегните пример.

Re: Как из трех книг-листов Excel сбрать один документ Word?
2008-11-12 16:27
Где Вы Знатоки? Ау!

Re: Прогнозы по трендам
2008-11-12 19:32

Re: Перенос информации с одного документа в второй и обчисление етой информации
2008-11-13 06:23
Ежли док 1 и док 2 - документы с изменяемым количеством стро-столбцов данных, то - макросом. Ежли енти параметры - вещь постоянная, то ссылками
А вообще - пример в студию и на оперстол

Re: Как из трех книг-листов Excel сбрать один документ Word?
2008-11-13 06:24
Одна надежда - ШПЕЦ!!!!!!!!!!!!!!!!!!!!!!

Подскажите Автонумерация объединенных ячеек в строках
2008-11-13 08:01
Работаю над таблицей, очень большой.
Необходимо пронумеровать эту таблицу. Но в таблице в строках есть объединенные ячейки.
Ячейки объединены не равномерно по 2 3 и даже болще строк.
Помогите пожалуйста очень нужно!

Re: Сохранение книги
2008-11-13 11:43

Re: Как из трех книг-листов Excel сбрать один документ Word?
2008-11-13 11:55

Re: Как правильно изменить путь к файлу
2008-11-13 12:07

Re: Перенос информации с одного документа в второй и обчисление етой информации
2008-11-13 12:13

Ежли док 1 и док 2 - документы с изменяемым количеством стро-столбцов данных, то - макросом. Ежли енти параметры - вещь постоянная, то ссылками
А вообще - пример в студию и на оперс...

Re: Как из трех книг-листов Excel сбрать один документ Word?
2008-11-13 12:25
Пробую пристегнуть еще раз!
Ч-з минуту... Ну слава богу - получилось! Вообще-то в вордовский файл необязательно. Можно и в любимый Excel. Но чтобы при выводе на печать получалось тоже самое что и при печати .doc файла из вложения.

Re: Как из трех книг-листов Excel сбрать один документ Word?
2008-11-13 14:49

Ожидание завершения OLE-операции другим приложением
2008-11-13 15:00
подскажите плиз в чем дело, щелкаю на ечейку с почтовым адресом, Ecel сразу виснет и примерно через минуту выдает сообщение: Microsoft Office Ecel Ожидание завершения OLE-операции другим приложением.
и как с этим бороться?

Re: Как правильно изменить путь к файлу
2008-11-13 15:08

Re: Ожидание завершения OLE-операции другим приложением
2008-11-13 15:14
что ни кто не сталкивался что ли

Re: Как из трех книг-листов Excel сбрать один документ Word?
2008-11-13 15:21

Re: Ожидание завершения OLE-операции другим приложением
2008-11-13 16:06
Вообще установлен MS outlook 2003

Печать документов Excel из командной строки
2008-11-13 16:26
Добрый день! Столкнулся с необходимостью вывода на печать документов Excel из командной строки. Для других программ Microsoft есть набор параметров, который позволяет выводить документы на печать, для Excel ничего подобного не нашел. Есть только перече...

Как увязать объект календарь с ячейкой ехсеl.
2008-11-13 16:55
Подскажите пожайлуста как увязать объект календарь с ячейкой ехсеl. Заранее спасибо.

Re: Как увязать объект календарь с ячейкой ехсеl.
2008-11-13 17:22

Re: Сохранение книги
2008-11-13 18:18
Andrey Lenets, я Вам очень благодарен за ответ.
Но я не мог "усидеть на месте" и додумал кое-что своё, если позволите - поделюсь:

Sub Кнопка1_Щелкнуть()

Клиент = Range("Клиент")
ActiveWorkbook.SaveAs Filename:=Environ("HOMEDRIVE") & "\Клиенты\" & Клиен...

Re: Как из трех книг-листов Excel сбрать один документ Word?
2008-11-13 18:51

На сегодня все. До встречи на следующей неделе.