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

Wasilic>> Re: Макрос для заполнения кассовых ордеров


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

Выпуск 49
от 2010-12-10

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

Рассылка сайта "Профессиональные приемы работы в 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"


Wasilic>> Re: Макрос для заполнения кассовых ордеров
2010-12-02 15:06 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Ну вот, еще с таким вариантом побалуйся!
В нем и сотню можно!  Улыбка

rumex2010>> Вакансия "маркетолог-аналитик"
2010-12-02 15:37 http://forum.msexcel.ru/profiles/rumex2010-u53647.html
Добрый день!

Группа-компаний, работающая на рынке медицинской техники с 1991 года, объявляет конкурс на открытую вакансию «Аналитик-маркетолог».

Требования:
∙   высшее образование
∙   опыт работы от 1 года в аналогичной сфере
∙   знание методов изучения рынка, статистических методов анализа данных
∙   отличное знание Excel (знание Access, VBA приветствуется)
∙   английский – upper intermediate

Обязанности:
∙   анализ баз данных: составление прогноза продаж, анализ выполнения плана продаж
∙   участие в ценообразовании
∙   систематизация информации конкурентной среды
∙   описание стратегии вывода продукта на рынок для поставщиков
∙   анализ статистики сайтов, написание статистических отчетов
∙   подготовка количественное информации по запросу продакт-менеджеров

Условия:
∙   комфортная адаптация,
∙   обучение и развитие
∙   возможность карьерного роста
∙   Д.М.С, О.М.С.
∙   компенсация проезда
∙   соблюдение ТК РФ
∙   офис в современном бизнес-комплексе в Строгино
З/П по результатам собеседования.

Обращаться:

http://hh...

Джоник>> Re: Макрос для заполнения кассовых ордеров
2010-12-02 15:45 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Василич!
Скачал, распаковал и протестировал на скорую руку (потому что много текучки сугубо бухгалтерской накопилось, некоторую надо поскорее разгрести). При нажатии на кнопку "Сформировать ВКО" ругается на строке : Workbooks("Реестры").Close макроса под именем "Формировать()".
Сама конструкция подходит на все сто.
Позжее буду вникать детальнее.
Спасибо!

Wasilic>> Re: Макрос для заполнения кассовых ордеров
2010-12-02 16:00 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Причины не знаю! Попробуй дописать расширение
Workbooks("Реестры.xls").Close
Кроме того, после строки:
Sheets("ВКО").Select
ДОПИШИ-
Range("A1")=1

PS. Столбец А на листе ордеров желательно скрыть.

ItIsMe>> Re: Макрос для метода Монте Карло
2010-12-02 16:38 http://forum.msexcel.ru/profiles/itisme-u52471.html
Что это NVP?  Шокирован

ХАха>> Re: Порекомендуйте внятную книгу по VBA
2010-12-02 16:43 http://forum.msexcel.ru/profiles/haha-u43957.html
Serge007, спасибо большое!

ItIsMe>> Re: Первый положительный корень cos^2(x)
2010-12-02 16:44 http://forum.msexcel.ru/profiles/itisme-u52471.html
Что то с "x ∈ [0..2]" не совсем понятно.

iron priest>> Re: переделка отчета из 1-с в данные в в виде списка. Или "растусовка " по столбцам
2010-12-02 17:02 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
если есть возможность скинуть отчет 1С, то на выходных могбы поковыряться

ХАха>> Re: экспорт excel-word, если ячейки расположены "не подряд"
2010-12-02 17:30 http://forum.msexcel.ru/profiles/haha-u43957.html
finder, приложите, пожалуйста, пример того, что вы хотите получить!
Попробуйте также использовать средства Word для всязи между файлами.
В Word есть слияние документов - оно позволяет связать данные из файла Excel с документом.

ItIsMe>> Re: Первый положительный корень cos^2(x)
2010-12-02 17:44 http://forum.msexcel.ru/profiles/itisme-u52471.html
Попробуй вот такой проект VBA. Там используются именованые диапазоны ячеек. Правда, такой алгоритм останавливается в первом попавшемся на его пути локальном минимуме целевой функции, которая в данном случае равна F=Y(Xтекущее)-Yцелевое. Поэтому не подходит для решения задач с функциями более сложного вида.

Джоник>> Re: Макрос для заполнения кассовых ордеров
2010-12-02 19:01 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Василич!
Ознакомился с проектом более детально. Но ошибка при записи в реестр, существенно ограничивает дальнейшее тестирование. Чтобі исправить ее внес предложенные вами поправки, не пляшет. Плюс попытался сам докопаться до сути ошибки. Не дполучилось, поэтому ошибка мною не устранена.
А теперь два в одном , вопросика:
Планируете ли вы, очистку шаблона ВКО после их печати и допускаете ли вы возможность редактирования отдельных кассовых ордеров на случай выявления ошибок. Как мне кажется.без этого обойтись нельзя.

kate19>> Почему столбцы стали именоваться цифрами?
2010-12-02 19:55 http://forum.msexcel.ru/profiles/kate19-u53656.html
Почему столбцы стали именоваться цифрами, а не буквами? И как сделать обратно?

iron priest>> Re: Почему столбцы стали именоваться цифрами?
2010-12-02 20:29 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
в параметрах изменить стиль ссылок R1C1

Serge 007>> Re: Почему столбцы стали именоваться цифрами?
2010-12-02 20:36 http://forum.msexcel.ru/profiles/serge_007-u25260.html

Почему столбцы стали именоваться цифрами, а не буквами? И как сделать обратно?
Более чем подробно здесь:
http://www.excelworld.ru/forum/2-55-1

kate19>> Re: Почему столбцы стали именоваться цифрами?
2010-12-02 20:48 http://forum.msexcel.ru/profiles/kate19-u53656.html
Спасибо!!!

Виктория Зуева>> Re: как правильно записать эмэйлы и занести их в адресную книгу gmail?
2010-12-02 23:24 http://forum.msexcel.ru/profiles/buka3-u2668.html
А вы ТУТ смотрели?
это - справка gmail:
http://mail.google.com/support/bin/answer.py?answer=12119
http://mail.google.com/support/bin/answer.py?answer=14024

SusiWats>> Re: Выкладывание файлов на форуме
2010-12-03 01:10 http://forum.msexcel.ru/profiles/susiwats-u53673.html
In my opinion you are not right. Let's discuss it. Write to me in PM, we will talk.

------------------------------------------------
cealis hawaii gernic
pills viaga online

Саша01>> Таблица
2010-12-03 01:56 http://forum.msexcel.ru/profiles/sasha01-u53678.html
Помогите пожалуйста..(( 

2.Создать таблицу в Excel по расчету равномерной амортизации.
Клиент учел 1 февраля 1992 года вексель на сумму 40000руб., срок которого 1 июня того же года, и получил за него 38790 руб. Какова учетная ставка банка?

Задачу решила..тока как её в таблице сделать незнаю(((
вот решение задачи :

P=N*(1-d/365*t), где
Р - цена учтенного векселя
N - номинал
d - ставка банковского дисконта
t - срок до погашения векселя в днях
Отсюда имеем
d=(1-Р/N)*365/t
d= (1-38790/40000)*365/121=0,09125 (9,125%)

Шпец Докапыч>> Re: Меню навигации в UserForm
2010-12-03 03:11 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Расположил на форме ListBox с кликабельным перечнем листов.

Slava447284>> Re: Определить размер открытого документа Word
2010-12-03 07:11 http://forum.msexcel.ru/profiles/slava447284-u53514.html
Премного блогадарен!! С утра оно как-то понятнее.
 Переставил в Word Normal, всё работает.
  У меня MS 2003. И 4,3Гб книг досталось на халяву.
Пришлось делать каталог в Excel, а читать и править в Word.
 С надеждой что кому-нибуть понадобится.
В общем большое спасибо за ответ.
С уважением, Вячеслав.

GWolf>> Re: Отображение зарплатных данных
2010-12-03 09:07 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Думаю, функция ВПР Вам в помощь.
Хотя я бы на VBA для себя решал. Подмигивающий

Wasilic>> Re: Макрос для заполнения кассовых ордеров
2010-12-03 10:11 http://forum.msexcel.ru/profiles/wasilic-u24852.html

ошибка при записи в реестр, существенно ограничивает дальнейшее тестирование.
О какой ошибке речь? Распакуй, и оба файла положи в одну папку. Если ошибка повторится  В замешательстве  ищи у себя.
У меня работает без ошибок.
Так же, прошу форумчан протестировать на ошибку работу макросов.

А теперь два в одном , вопросика:
Планируете ли вы, очистку шаблона ВКО после их печати и допускаете ли вы возможность редактирования отдельных кассовых ордеров на случай выявления ошибок. Как мне кажется.без этого обойтись нельзя.
Очистка производится при следующем формировании ордеров,
а до этого делай что хочешь, печатай через день, через неделю, выключай эл.энергию, вешай комп.
Редактировать можно в ведомости или штатах, а после снова нажав кнопку "сформировать ВКО"  обновить инфу в списке для реестра.
Ибо ордер содержит ссылку на ведомость и редакт...

GWolf>> Re: Макрос для заполнения кассовых ордеров
2010-12-03 10:12 http://forum.msexcel.ru/profiles/gwolf-u4652.html

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

Доброго дня коллега! (для Джоник-а)

Тема для меня интересна, поэтому, если Вы друзья не против, поучаствую. Так вот, редактирование сформированного программой РКО не есть хорошая идея. Если уж закралась ошибка, то лучьше (и надежнее) проверить и отредактировать источник информации. А РКО переформировать. Не правда ли, коллеги?

Wasilic>> Re: Макрос для заполнения кассовых ордеров
2010-12-03 10:19 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Совершенно в дырочку!  Смеющийся
GWolf, Пжлст, протестируйте на ошибку! СПСБ  Улыбка

missttv>> Re: Автоматическое создание листов книги.
2010-12-03 11:31 http://forum.msexcel.ru/profiles/missttv-u51690.html
я только, что попробовала ввести Иванов Иван Иванович и с таким же именем у меня создался лист.

foxjon>> Re: Меню навигации в UserForm
2010-12-03 12:35 http://forum.msexcel.ru/profiles/foxjon-u52521.html

Расположил на форме ListBox с кликабельным перечнем листов.

Спасибо.

В перечень открываемых листов входят все листы книги, а каким образом можно указать в перечне конкретные листы в моем примере например Лист1 Лист3 Лист5 (соответственно все остальные листы не участвуют в меню).

В данном направление возможен вариант решения вопроса?

ХАха>> Re: Средний процент выработки
2010-12-03 13:27 http://forum.msexcel.ru/profiles/haha-u43957.html
Юля, опишите, пожалуйста, задачу подробнее.
Лучше всего приложить пример - что есть и что хочется получить

С.М.>> Re: Таблица
2010-12-03 14:45 http://forum.msexcel.ru/profiles/sm-u19758.html
Тёзка, смотри прикреплённый.

iron priest>> найти последнее отрицательное значение
2010-12-03 15:52 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
Добрый день.

есть вот такой список чисел


(49,795)   (84,467)   (224,434)   (208,105)   (126,932)   (75,671)   (135,553)   (93,691)   (89,040)   (72,179)   (52,273)   37,005   111,404   173,403   225,069   225,069   225,069   225,069   225,069   225,069   225,069   225,069   225,069   225,069   225,069

нужно найти последнее отрицательное значение, тоесть (52,273)

как это сделать одной формулой?

Спасибо

Serge 007>> Re: найти последнее отрицательное значение
2010-12-03 15:58 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Здравствуйте.

Как и где расположены числа?
Давайте файл.

Хотя мож так пойдёт:

Код:
=ИНДЕКС(A1:A5;МАКС(ЕСЛИ(A1:A5<0;СТРОКА(A1:A5))))

iron priest>> Re: найти последнее отрицательное значение
2010-12-03 16:01 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
все в строчку

если нада то выложу файл, хотя их можно просто скопировать))

Serge 007>> Re: найти последнее отрицательное значение
2010-12-03 16:17 http://forum.msexcel.ru/profiles/serge_007-u25260.html

если нада то выложу файл, хотя их можно просто скопировать))
Нельзя.
При копировании получаются числа в скобках, а в файле это числа без скобок.

Но ответ вобщем-то уже дан. Для Вашего файла будет так:
Код:
=ИНДЕКС($A3:$Y3;;МАКС(ЕСЛИ($A3:$Y3<0;СТОЛБЕЦ($A3:$Y3))))

iron priest>> Re: найти последнее отрицательное значение
2010-12-03 16:36 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
гениально!

Джоник>> Re: Макрос для заполнения кассовых ордеров
2010-12-03 16:40 http://forum.msexcel.ru/profiles/dzhonik-u30110.html

ошибка при записи в реестр, существенно ограничивает дальнейшее тестирование.
О какой ошибке речь? Распакуй, и оба файла положи в одну папку. Если ошибка повторится  В замешательстве  ищи у себя.
У меня работает без ошибок.
Так же, прошу форумчан протестировать на ошибку работу макросов.

А теперь два в одном , вопросика:
Планируете ли вы, очистку шаблона ВКО после их печати и допускаете ли вы возможность редактирования отдельных кассовых ордеров на случай выявления ошибок. Как мне кажется.без этого обойтись нельзя.
Очистка производится при следующем формировании ордеров,
а до этого делай что хочешь, печатай через день, через неделю, выключай эл.энергию, вешай комп.
Редактировать можно в ведомости или штатах, а после снова нажав кнопку "сформировать ВКО"  обновить ин...

Wasilic>> Re: Макрос для заполнения кассовых ордеров
2010-12-03 17:39 http://forum.msexcel.ru/profiles/wasilic-u24852.html

Цитировать
напишите мне для образца макрос для вставки в соответствующий реестр, самой платежной ведомости.

А где файл соответствующего реестра?

Шпец Докапыч>> Re: Меню навигации в UserForm
2010-12-03 17:39 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Для указания конкретных листов упрощаем код так:

Код:
  'For Each sh In Worksheets 'убираем заполнение всеми именами листов
  '  Me.ListBox1.AddItem sh.Name
  'Next
  Me.ListBox1.List = Array("Лист1", "Лист3", "Лист5") 'заполняем список определёнными

Кот>> Re: Выбор значений по году и месяцу
2010-12-03 17:59 http://forum.msexcel.ru/profiles/kot-u24077.html
Появилась новая проблема, по этим датам которые мы извлели нужно извлечь и заполнить остольные столбцыпо строкам соответствующие этим датам, в примере столбцы выделены одинаковыми цветами.

ХАха>> Re: Таблица
2010-12-03 18:16 http://forum.msexcel.ru/profiles/haha-u43957.html
вот так можно:
=СКИДКА("01.02.1992";"01.06.1992";40000;38790;1)

Для лучшего понимания, найдите функцию и выведите справку. Там все оч. подробно написано.

Удачи, тезка Улыбка

Dmitr68>> Re: найти последнее отрицательное значение
2010-12-03 18:48 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
Еще вариант:

Код:
=ПРОСМОТР(;A3:Y3)

foxjon>> Re: Меню навигации в UserForm
2010-12-03 18:58 http://forum.msexcel.ru/profiles/foxjon-u52521.html

Для указания конкретных листов упрощаем код так:
Код:
  'For Each sh In Worksheets 'убираем заполнение всеми именами листов
  '  Me.ListBox1.AddItem sh.Name
  'Next
  Me.ListBox1.List = Array("Лист1", "Лист3", "Лист5") 'заполняем список определёнными

Пробовал по Вашему примеру упростить код, но получаю ошибку в строке:
Private Sub UserForm_Initialize()
Возможно не так что-то изменил?

iron priest>> Re: найти последнее отрицательное значение
2010-12-03 19:03 http://forum.msexcel.ru/profiles/iron_priest-u20725.html

Еще вариант:
Код:
=ПРОСМОТР(;A3:Y3)

жаль только СМЕЩ нельзя прикрутить к этой функции

Шпец Докапыч>> Re: Меню навигации в UserForm
2010-12-03 19:06 http://forum.msexcel.ru/profiles/shpetsealist-u3583.html
Весь код события Инициализация:

Код:
Private Sub UserForm_Initialize()
  'For Each sh In Worksheets
  '  Me.ListBox1.AddItem sh.Name
  'Next
  ListBox1.List = Array("Лист1", "Лист3", "Лист5")
  ReDim shc(ListBox1.ListCount - 1)
End Sub

Dmitr68>> Re: найти последнее отрицательное значение
2010-12-03 19:07 http://forum.msexcel.ru/profiles/dmitr68-u18737.html

Еще вариант:
Код:
=ПРОСМОТР(;A3:Y3)

жаль только СМЕЩ нельзя прикрутить к этой функции
аргументируй?

Виктория Зуева>> Re: Таблица
2010-12-03 19:11 http://forum.msexcel.ru/profiles/buka3-u2668.html
для таблицы от C.M. - для ячейки К3 формула:

=ИНОРМА(H3;I3;G3;F3;3)

Эта функция используется как раз для векселей.

Саша01>> Re: Таблица
2010-12-03 19:13 http://forum.msexcel.ru/profiles/sasha01-u53678.html
Огромнейшее вам спасибо..,просто спасли..))

iron priest>> Re: найти последнее отрицательное значение
2010-12-03 19:15 http://forum.msexcel.ru/profiles/iron_priest-u20725.html

Код:
СМЕЩ(ПРОСМОТР(;A3:Y3);-1;1;;)

Dmitr68>> Re: найти последнее отрицательное значение
2010-12-03 19:22 http://forum.msexcel.ru/profiles/dmitr68-u18737.html

Код:
СМЕЩ(ПРОСМОТР(;A3:Y3);-1;1;;)
Честно говоря, я не понял. Судя по приведенной формуле надо таки найти первое положительное , а не последнее отрицательное, да еще и не в строке 3 а в строке 2. Ну так ПРОСМОТР с этим спокойно справится и без  СМЕЩ:
Код:
=ПРОСМОТР(;A3:Y3;B2:Z2)

iron priest>> Re: найти последнее отрицательное значение
2010-12-03 19:28 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
в конечном результате мне нужно последнее отрицательное число разделить на число в следующей ячейке выше


(52,273)/89,278

Dmitr68>> Re: найти последнее отрицательное значение
2010-12-03 19:36 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
Ну так соедини обе формулы:

Код:
=ПРОСМОТР(;A3:Y3)/ПРОСМОТР(;A3:Y3;B2:Z2)
если нужно положительное число, то:
Код:
=ABS(ПРОСМОТР(;A3:Y3)/ПРОСМОТР(;A3:Y3;B2:Z2))

iron priest>> Re: найти последнее отрицательное значение
2010-12-03 19:41 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
 Улыбка

спасибо

Джоник>> Re: Макрос для заполнения кассовых ордеров
2010-12-03 20:26 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Василич!
В той же книге "Реестры" где и лист "Журнал ВКО". Только под  именем "ЖурналВід."

С.М.>> Re: Таблица
2010-12-03 21:06 http://forum.msexcel.ru/profiles/sm-u19758.html

вот так можно:
=СКИДКА("01.02.1992";"01.06.1992";40000;38790;1)
Для лучшего понимания, найдите функцию и выведите справку. Там все оч. подробно написано.
Удачи, тезка Улыбка
To ХАха:
СКИДКА("01.02.1992";"01.06.1992";40000;38790;1)=-0,09435

ItIsMe>> Re: Определить размер открытого документа Word
2010-12-03 21:46 http://forum.msexcel.ru/profiles/itisme-u52471.html
Служу Российской Федерации  Подмигивающий

Юлия25>> Re: переделка отчета из 1-с в данные в в виде списка. Или &quot;растусовка &quot; по столбцам
2010-12-03 22:20 http://forum.msexcel.ru/profiles/yuliya25-u27685.html
огромное всем спасибо, моя цель достигнута. Все получилось! Выражаю искреннюю благодарность всем откликнувшимся.

Джоник>> Re: Макрос для заполнения кассовых ордеров
2010-12-03 23:24 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Да! Забыл приложить файл с формулами.
Исправляюсь

alexexcel>> VBA макрос виноват в странном поведении формул?
2010-12-03 23:47 http://forum.msexcel.ru/profiles/alexexcel-u29749.html
Я сделал макрос, предлагаемый здесь http://msexcel.ru/content/view/50/1/ ([url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url]). Теперь, когда я на другой странице делаю ссылку на ту страницу, в которой применяется это [url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url], после нажатия Enter результат ссылки появляется не там, где я его сделал, а на той странице и в той ячейке, на которую была ссылка. Например, я сделал макрос для страницы Sheet 1. В странице Sheet2 в ячейке А1 я пишу ='Sheet1'!F10. Результат возникает в ячейке Sheet1!F10 в виде ='Sheet1'!#REF!

Slava447284>> Re: Макрос, условие времени
2010-12-04 07:27 http://forum.msexcel.ru/profiles/slava447284-u53514.html
условие времени - если макрос то на событие, открытие\закрытие книги, нажатие кнопки, щелчок по ячейке. Макрос будет проверять условие и реагировать на него.
 Просто так запускать время - ждать окончания работы макроса.
При запуске макроса должно проверятся текущее время, и если оно соотв\не соответствует
выполняется действие.

missttv>> скрыть строки при условии
2010-12-04 12:28 http://forum.msexcel.ru/profiles/missttv-u51690.html
Нашла на одном из форумов макрос для скрытия пустых строк, однако мозгов для его переделки не хватает, а тема там уже закрыта. Мне необходимо, что бы скрывались строки в которых есть слова "суббота" и "воскресенье". Подскажите, где что нужно изменить, что бы получить желаемый результат. На всякий случай, если необходимо дни недели у меня прописаны в столбце "В".

Sub HideBlankRows()    ' скрывает все пустые строки
    Dim sh As Worksheet, ro1 As Range, ro2 As Range, ro As Range, rowss As Range, isBlank As Boolean
    Application.ScreenUpdating = False
    With ActiveSheet
        Set ro1 = .UsedRange.Cells(.UsedRange.Cells.Count).Offset(1): Set ro2 = ro1.End(xlDown)
        Range(ro1, ro2).EntireRow.Hidden = True
        For Each ro In .UsedRange.EntireRow
            isBlank = False: Set f = ro.Find("*", , xlValues)
            If f Is Nothing Then isBlank = True Else If Not f Is Nothing Then If f.Value = "" Then isBlank = True
            If isBlank Then If rowss Is Nothing Then Se...

AesmaDiv>> Частичное подчеркивание
2010-12-04 13:20 http://forum.msexcel.ru/profiles/aesmadiv-u53776.html
Выручите пжлста.
Как реализовать частичное подчеркивание (например с 6-го по 10-ый символы), если в ячейке содержится не текст, а формула (например ="Итого: "&CуммаПрописью(А1))
ps. Сломали 3 головы уже  Непонимающий

Serge 007>> Re: Частичное подчеркивание
2010-12-04 13:49 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Ответил здесь.

tgm>> Re: скрыть строки при условии
2010-12-04 16:04 http://forum.msexcel.ru/profiles/tgm-u43423.html
Методом тыка:)
Sub HideBlankRows()    ' скрывает все пустые строки
    Dim sh As Worksheet, ro1 As Range, ro2 As Range, ro As Range, rowss As Range, isBlank As Boolean
    Application.ScreenUpdating = False
    With ActiveSheet
        Set ro1 = .UsedRange.Cells(.UsedRange.Cells.Count).Offset(1): Set ro2 = ro1.End(xlDown)
        Range(ro1, ro2).EntireRow.Hidden = True
        For Each ro In .UsedRange.EntireRow
            isBlank = False: Set f = ro.Find("*", , xlValues)
            If f Is Nothing Then isBlank = True Else If Not f Is Nothing Then If f.Value = "Суббота" Then isBlank = True
            If f Is Nothing Then isBlank = True Else If Not f Is Nothing Then If f.Value = "Воскресенье" Then isBlank = True
            If isBlank Then If rowss Is Nothing Then Set rowss = ro Else Set rowss = Union(rowss, ro)
        Next
        If Not rowss Is Nothing Then rowss.EntireRow.Hidden = True
    End With
    Cells(1).Select: Application.ScreenUpdating = True
End Sub

nilem>> Re: скрыть строки при условии
2010-12-04 17:25 http://forum.msexcel.ru/profiles/nilem-u30547.html
Еще вариант:

Код:
Sub HideHolidaysOnly()    ' скрывает все выходные в столбце В
Dim x As Range, y As Range, z As Range, adr As String
Dim hol, h: Application.ScreenUpdating = False

hol = Array("суббота", "воскресенье")
Set z = Range([b1], Cells(Rows.Count, 2).End(xlUp))

For Each h In hol
    Set x = z.Find(what:=h, LookAt:=xlWhole)
    If Not x Is Nothing Then
        adr = x.Address
        Do
            If y Is Nothing Then Set y = x Else Set y = Union(y, x)
            Set x = z.FindNext(x)
        Loop While adr <> x.Address
    End If
Next

If Not y Is Nothing Then y.EntireRow.Hidden = True
Application.ScreenUpdating = True
End Sub

KuklP>> Re: Частичное подчеркивание
2010-12-04 19:26 http://forum.msexcel.ru/profiles/kuklp-u39713.html
В один столбец ="Итого: ", в соседний =CуммаПрописью(А1). В первом столбце шрифт подчеркнутый.

KuklP>> Re: скрыть строки при условии
2010-12-04 21:17 http://forum.msexcel.ru/profiles/kuklp-u39713.html
А с [url=http://msexcel.ru/content/view/27/2/]_автофильтр_[/url]ом не проще?

KuklP>> Re: скрыть строки при условии
2010-12-04 21:22 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Макрореком:
Sub Макрос1()
' Макрос записан 04.12.2010 (Sergey)
    Selection.AutoFilter Field:=7, Criteria1:="<>*Суббота*", Operator:=xlAnd, _
        Criteria2:="<>*Воскресенье*"
End Sub

AesmaDiv>> Re: Частичное подчеркивание
2010-12-04 21:32 http://forum.msexcel.ru/profiles/aesmadiv-u53776.html

В один столбец ="Итого: ", в соседний =CуммаПрописью(А1). В первом столбце шрифт подчеркнутый.
Нет. Нужно именно в одной и той же ячейке. В том то и дело. В замешательстве

gluzal>> Re: организация таблицы
2010-12-04 21:33 http://forum.msexcel.ru/profiles/gluzal-u17755.html
Я благодарю всех, участвующих в моей проблеме, и надеюсь на дальнейшее сотрудничество. Хотелось бы немного подробнее, но постараюсь разобраться...

Tai>> использование вложенных циклов, заполнение ячеек листа при выполнении условия
2010-12-04 21:37 http://forum.msexcel.ru/profiles/tai-u53801.html
Здравствуйте!
Пытаюсь сделать макрос для следующей задачи: есть список заявок, для каждой дано: номер заявки, дата заезда, дата выезда, число человек в группе. Дана таблица, в которой для каждого номера, на весь период планирования указан статус 0- свободен, 1 - занят. Заявка принимается, если номеров на нужные даты хватает на всех людей в заявке.
В общем алгоритм решения такой:
для каждой заявки (s)
счетчик = 0
для каждого человека в заявке (v)
по всем номерам
своб. = 0
на нужные даты :
если а = 0, то число своб. + 1,
в ячейку а номер группы (s),
переход к след дате,
если своб. = нужному кол-ву дней, то счетчик + 1,
переход к след номеру
переход к следующему человеку в заявке
если счетчик = числу человек в заявке, то отмечаем заявку принятой
иначе на нужные даты
где а = s, a = 0
след заявка

В файле то, что у меня пока получилось и таблицы, которые нужно использовать и заполнять. Ругается уже на "Set c = Application.ActiveCell.Value"
Буду благодарна, если кто-то сможет ...

KuklP>> Re: Частичное подчеркивание
2010-12-04 21:50 http://forum.msexcel.ru/profiles/kuklp-u39713.html
А никак. Тока с доп. столбцом. Ну и куда такой геморрой?

foxjon>> Re: Меню навигации в UserForm
2010-12-04 22:49 http://forum.msexcel.ru/profiles/foxjon-u52521.html
Спасибо.

Все отлично работает, вопрос темы исчерпан.
Итоговый файл в архиве.
Еще раз всем спасибо.

Tai>> Re: использование вложенных циклов, заполнение ячеек листа при выполнении условия
2010-12-05 16:58 http://forum.msexcel.ru/profiles/tai-u53801.html
Спасибо за ответ! уже пробовала менять типы переменных, и с Set строки менять... всё равно ошибки выдавал.

Левая таблица: столбец A - номер заявки (s), столбец B - "дата" заезда (start_d) (c)(для простоты числа от 1 до 10), столбец C - "дата" выезда (end_d(b)), столбец D - число человек в заявке (num_p (v)). По строке информация о заявке, т.е. условиях, выполнение которых проверяется в верхней таблице.

Верхняя таблица: столбец A - номера, столбцы с B по K - "даты".  По строке получается информация о том, на какие даты каждый номер занят (1) и свободен (0).

Нужно взять данные из строки в левой таблице.
Начиная с первой строки из верхней таблицы, найти в ней столбцы с "даты заезда" по "дату выезда" и, если в них 0, то заполнить их номером заявки, увеличить счетчик подходящих номеров на единицу. Рассмотреть аналогично следующие строки верхней таблицы пока не выполнится условие: счетчик = числу человек в заявке, тогда в правую таблицу поставить 1 в строку, соответствующую заявке, кото...

afilin>> Re: Автоматическое создание листов книги.
2010-12-05 17:21 http://forum.msexcel.ru/profiles/afilin-u47386.html
Действительно имя листа соответствует  введеному  в ячейке имени... а возможно так так указано выше...

ItIsMe>> Re: использование вложенных циклов, заполнение ячеек листа при выполнении условия
2010-12-05 18:11 http://forum.msexcel.ru/profiles/itisme-u52471.html
О, да! Т.е. номера, насколько я понял, одноместные? Хорошо, попробую...

Tai>> Re: использование вложенных циклов, заполнение ячеек листа при выполнении условия
2010-12-05 18:17 http://forum.msexcel.ru/profiles/tai-u53801.html
ага, одноместные. спасибо  Улыбка

ItIsMe>> Re: использование вложенных циклов, заполнение ячеек листа при выполнении условия
2010-12-05 20:16 http://forum.msexcel.ru/profiles/itisme-u52471.html
     Вот смотри. Переделал твой файл (слегка). Там используются именованные диапазоны, так что при просмотре кода не пугайся имен "RoomInfo" - это строки верхней таблицы, "AppDate" - это ячейки левой таблицы (без шапки) и "AppComplete" - это ячейки правой таблицы.
     Ячейки таблицы "Заявка выполнена" становится зеленой, если вся братия из заявки может быть заселена, красным - если заявка не может быть выполнена (для этого используется [url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url]). А вообще в эти ячейки записываются значения ИСТИНА/ЛОЖЬ (TRUE/FALSE). И если выделить эти ячейки и поменять цвет шрифта, то ты увидишь эти значения.
     Вообще говоря, програмка получилась довольно сырая, т.к. если дата заселения будет больше даты выселения, то программа затупит. Или если не найдется таких дат в верхней таблице, VBA также выйдет в режим отладки приложения, вместо того, чтобы выдать соответствующее сообщение об ошибке и остановиться. Короче, основа есть, дальше - сама. Если че непонятно - обращайся!  Подмигивающий

Tai>> Re: использование вложенных циклов, заполнение ячеек листа при выполнении условия
2010-12-05 21:21 http://forum.msexcel.ru/profiles/tai-u53801.html
В принципе поняла, что и как. Вот только один момент: получается, что макрос проверяет только условие, чтобы номеров всем хватило. Не учитывая информацию о том, свободен ли номер на эти даты (0 и 1 в исходной верхней таблице). Вот этой строкой эта инфа "убирается"
RANGE("RoomInfo").RANGE(Cells(2, 2), Cells(endRow, endCol)).ClearContents

И в ф-ии Test проверка работает, только если у нас не заполнена таблица вся, а только там, где мы уже приняли заявку, да:
If Range("RoomInfo").Cells(R, C).Value <> Empty Then
            Test = False
по идее, эта проверка должна быть на "Empty" или "1"..

как можно исправить?

alexexcel>> Re: VBA макрос виноват в странном поведении формул?
2010-12-05 23:54 http://forum.msexcel.ru/profiles/alexexcel-u29749.html
Спасибо за желание помочь. В прилагаемом файле попробуйте из листа Sheet3 сделать ссылку на другой лист (в котором в очерченном черными полосами регионе сделано conditional formatting, не знаю относится это к делу или нет) и мои проблемы станут понятными.

С.М.>> Re: VBA макрос виноват в странном поведении формул?
2010-12-06 03:39 http://forum.msexcel.ru/profiles/sm-u19758.html
Вот:

ItIsMe>> Re: использование вложенных циклов, заполнение ячеек листа при выполнении условия
2010-12-06 05:01 http://forum.msexcel.ru/profiles/itisme-u52471.html
     По поводу очистки ячеек, это да. Но если этого не сделать, то мы рискуем "удовлетворить" заявку дважды. Как вариант, конечно, можно проверять состояние ячеек правой таблицы, чтобы при следующем запуске поиск свободных номеров осуществлялся только для невыполненных заявок, т.е. для тех, напротив которых стоит значение ЛОЖЬ (FALSE).
     А что касается функции тест, то она включена в цикл проверки строк верхней таблицы (см. главную функцию).

Код:
For RoomNum = 2 To RANGE("RoomInfo").Rows.Count
        If Test(RoomNum, stCol, endCol) Then
            Meter = Meter + 1
            RoomNums(Meter) = RoomNum
        End If
        If Meter = NumVisitors Then
            Exit For
        End If
    Next RoomNum
     Этот код проверяет каждую строку (с номером RoomNum) в верхней таблице (RANGE("RoomInfo")) на предмет наличия в ней заполненных ячеек на заданном интервале дат (Empty соответствует пустому значению). Например, мы пытаемся найти места самой первой заявки (№4). Для э...

gruzdev_f>> Re: установитьпорядок ввода текста в нужные ячейки
2010-12-06 08:46 http://forum.msexcel.ru/profiles/gruzdevf-u52302.html
Спасибо!
вариант с защитой пожалуй самый универсальный

Wasilic>> Re: Макрос для заполнения кассовых ордеров
2010-12-06 10:19 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Примерно так.

VIP77>> Как на графике в Excel в отдной точке отобразить 2 значения?
2010-12-06 11:48 http://forum.msexcel.ru/profiles/vip77-u54079.html
Подскажите, пожалуйста, как на на графике в Excel 2003 в отдной точке отобразить 2 значения?

John Silver>> Помогите с созданием формы с таблицей внутри
2010-12-06 11:53 http://forum.msexcel.ru/profiles/john_silver-u30749.html
Здравствуйте, подскажите пожалуйстай как создать форму в эксель.

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

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

Возможно ли это вообще сделать? Если да, то подскажите пожалуйста как.

Заранее благодарен за помощь!

vovik_lmz>> Re: Пополняемый список+вывод позиций из списка по первым введенным буквам
2010-12-06 12:29 http://forum.msexcel.ru/profiles/voviklmz-u35820.html
Добрый день
По поводу места где должен появляться список:
Можно как и в стандартной функции, но хотелось бы чтобы появлялся выпадающий список
На самом деле буду вводить названия организаций. их очень много. а у меня другие функции в экселе планируется привязать к названию организации. поэтому важно чтобы одна и таже организация была забита в ячейку точно так же как и в предыдущие разы
Например
Есть ООО "Торговый дом "Срань"
Можно ввести как "ООО "ТД "Срань"
Но у меня привязка будет к названию ООО "Торговый дом "Срань"
и если я забуду как она правильно забита, то в случае ввода
ООО "ТД "Срань" функция работать не будет
И важно, чтобы эта организация в списке появлялась после набора например Срань и в списке сразу все название бы высвечивалось

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

nilem>> Re: Помогите с созданием формы с таблицей внутри
2010-12-06 12:43 http://forum.msexcel.ru/profiles/nilem-u30547.html
Вот посмотрите такой примерчик

John Silver>> Re: Помогите с созданием формы с таблицей внутри
2010-12-06 12:52 http://forum.msexcel.ru/profiles/john_silver-u30749.html
Спасибо Огромное! Теперь все понятно!
А не подскажите, можно ли в такой таблице сделать сетку и наименование столбцов?

lovko>> Заполнение ячеек по порядку при каждом изменении значения в предыдущей
2010-12-06 13:23 http://forum.msexcel.ru/profiles/lovko-u30610.html
Помогите, пожалуйста, по возможности. Ячейки одного столбца должны заполняться по порядку одна за другой. Если ячейка А1 заполнена, то автоматически заполняется ячейка А2. Если заполнена ячейка А2, то автоматически заполняется ячейка А3. И т.д. Значения для этих ячеек Excel должен брать из одной и той же ячейки другого листа. В ней значение я ввожу сам, и оно постоянно меняется. Однако в ячейках А1, А2, А3 и т.д. оно должно сохраняться в том виде, в каком было введено в первый раз. Так, если я ввожу значение 123, то оно появляется в ячейке А1. Далее я ввожу 456. В ячейке А1 должно остаться 123, а в ячейке А2 появиться 456. Далее я ввожу 789. При этом в ячейке А1 должно оставаться 123, в ячейке А2 - 456, а в ячейке А3 должно появиться 789. И т.д. Наверное, задача не из легких. Но очень надеюсь на ваш опыт. Большое спасибо!

ВЕВ>> Сумма по условию
2010-12-06 13:33 http://forum.msexcel.ru/profiles/vev-u37607.html
Имеется в столбца. В одном  - буквенный индекс, а в другом - число. Как сделать формулу, чтобы она считала суммы чисел, соответствующих определённому индексу? НАПРИМЕР:
 9   всп
10  От
5    всп
6    Ч
и т.д.
как посчитать сумму "всп"?

Serge 007>> Re: Сумма по условию
2010-12-06 13:49 http://forum.msexcel.ru/profiles/serge_007-u25260.html
=СУММЕСЛИ(критерий;"всп";числа)
=СУММЕСЛИ(B1:B4;"всп";A1:A4)

nilem>> Re: Помогите с созданием формы с таблицей внутри
2010-12-06 14:20 http://forum.msexcel.ru/profiles/nilem-u30547.html

... можно ли в такой таблице сделать сетку и наименование столбцов?
На форме расположен ListBox, за названия колонок у него отвечает свойство ColumnHeads (можно в процедуру инициализации формы добавить строку:
.ColumnHeads = True
Только надо учесть, что .RowSource - это диапазон на листе без заголовков.
А вот с сеткой, имхо, не получится.

stas-voislav>> Re: Макрос для метода Монте Карло
2010-12-06 14:23 http://forum.msexcel.ru/profiles/stasvoislav-u53245.html
NPV - чистая приведенная стоимость. Показатель используется для оценки инвест проектов Улыбка

Джоник>> Re: Макрос для заполнения кассовых ордеров
2010-12-06 14:24 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Добрый день!
Василич! Испытал по-всякому, работает без сбоев. Но есть еще одно неудобство.Это отсутствие возможности просмотра Журналов реестрации, для просмотра и визувльного контроля, не выходя из листа "ВКО_шаблон". То есть, посмотреть и убедиться, что все распечатаные ордера занесены в журнал.иТо же самое - и в отношении Платежной ведомости.
Интуиция подсказывает мне, что макрос(ы) должен(ны) открывать/закрывать книгу "Реестры" из другой книги , под именем "Ведомость". Но написать эти, вроди бы не очень сложные мвкросы, у меня не получается.
Еще раз спасибо за помощь!
С уважением, Джоник! 

Виктория Зуева>> Re: Как на графике в Excel в отдной точке отобразить 2 значения?
2010-12-06 14:24 http://forum.msexcel.ru/profiles/buka3-u2668.html
Пример графика покажите (картинку нарисуйте), по каким данным строится?

John Silver>> Re: Помогите с созданием формы с таблицей внутри
2010-12-06 14:29 http://forum.msexcel.ru/profiles/john_silver-u30749.html
Спасибо! С границами вертикальными разобрался, сделаю их псевдографикой... с заголовками тоже! Благодарю за ответ.

Shadowmaker>> Как реализовать счёт с условиями (+)
2010-12-06 15:03 http://forum.msexcel.ru/profiles/shadowmaker-u4828.html
Есть некий список терминов, по одному на строку.
Каждый термин принадлежит определённому разделу, их порядка 16.
Соот-но имеем 2 столбца, в первом - номер раздела, во втором сам термин.
Нужно чтобы в 3м столбце появился номер термина, который из себя бы представлял следующее:
"Х - У" - где "Х" это номер раздела и "У" номер термина внутри раздела.
Например - в разделе 1 у нас 20 терминов 1 - 1, 1 - 2, и т.д., когда начинается раздел 2 то их номера опять начинаются с 1 - т.е. 2 - 1, 2 - 2 и т.д...

afilin>> Re: Статистика на гео.карте в Excel
2010-12-06 15:47 http://forum.msexcel.ru/profiles/afilin-u47386.html
К сожалению поиск на форуме ничего не дал по этой тематике...

Wasilic>> Re: Макрос для заполнения кассовых ордеров
2010-12-06 16:16 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Книга "реестры", в момент перезаписи в нее данных открывалась, но на экран не выводилась и сразу же автоматически закрывалась.
Теперь выводится, но закрывать нужно через кнопку уже в самом реестре.

Serge 007>> Re: Как реализовать счёт с условиями (+)
2010-12-06 16:20 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Прикладывайте пример в файле.
Пока сделал так как понял.

С.М.>> Re: Заполнение ячеек по порядку при каждом изменении значения в предыдущей
2010-12-06 16:37 http://forum.msexcel.ru/profiles/sm-u19758.html
Пишем в A1 на листе 'Лист2', читаем в A1 и ниже на лиcте 'Лист1' :

VIP77>> Re: Как на графике в Excel в отдной точке отобразить 2 значения?
2010-12-06 16:58 http://forum.msexcel.ru/profiles/vip77-u54079.html
на графике надо что бы в значении РД-к.441 график с 3,0 снизился на 2,8/1,6 (в зависимости от линии)

ВЕВ>> Re: Сумма по условию
2010-12-06 17:04 http://forum.msexcel.ru/profiles/vev-u37607.html
В точку! Спасибо!

С.М.>> Re: Как на графике в Excel в отдной точке отобразить 2 значения?
2010-12-06 17:07 http://forum.msexcel.ru/profiles/sm-u19758.html
VIP77, попробуйте ещё раз перечитать Вашу хотелку: "на графике надо ..."

Shadowmaker>> Re: Как реализовать счёт с условиями (+)
2010-12-06 18:11 http://forum.msexcel.ru/profiles/shadowmaker-u4828.html
Это собственно ПОЧТИ то что нужно... загвоздка вот в чём - изначально все позиции имеют сквозную нумерацию несмотря на раздел. Т.е. тот термин который должен иметь номер 2-1 (т.е. первый термин второго раздела) может быть в списке 30-м, если это изменить в файле то он получится 2-30 - а должен быть 2-1 - потому что он первый во 2м разделе несмотря на то что 30 в общем списке.

alexexcel>> Re: VBA макрос виноват в странном поведении формул?
2010-12-06 18:34 http://forum.msexcel.ru/profiles/alexexcel-u29749.html
А не могли бы вы объяснить, почему была проблема (что я сделал неправильно) и как вы ее исправили? Я в VBA плохо разбираюсь.

Bomont>> Макрос копирования значений
2010-12-06 18:36 http://forum.msexcel.ru/profiles/bomont-u4849.html
Добрый день!

Есть лист со значениями (не формулами). Пишу макрос для копирования значений:


    cn = Sheets("День").Cells(2, 1).Value
    cn2 = Sheets("День").Cells(2, 1).Value - 349
    Worksheets("День").Range("B" & cn2 & ":O" & cn).Copy
     
    Worksheets("День").Range("B4:O350").PasteSpecial _
        Operation:=xlPasteSpecialOperationAdd


После запуска макроса, эксель выдает окно с вопросом "Заменить значения ячеек?". Подскажите как подправить макрос копирования/вставки, чтобы копировались значения ячеек и не выдавалось дополнительных вопросов?

VIP77>> Re: Как на графике в Excel в отдной точке отобразить 2 значения?
2010-12-06 19:31 http://forum.msexcel.ru/profiles/vip77-u54079.html

VIP77, попробуйте ещё раз перечитать Вашу хотелку: "на графике надо ..."


на графике в одном значении по оси X надо что бы было 2 значения по оси Y

Serge 007>> Re: Как реализовать счёт с условиями (+)
2010-12-06 20:29 http://forum.msexcel.ru/profiles/serge_007-u25260.html

Это собственно ПОЧТИ то что нужно...
Прикладывайте пример в файле.

С.М.>> Re: Как на графике в Excel в отдной точке отобразить 2 значения?
2010-12-06 20:38 http://forum.msexcel.ru/profiles/sm-u19758.html
VIP77, всё равно ничего не понял.
Формулы рядов на Вашей диаграмме ссылаются на "неизвестный источник".
Можете прикрепить файл с таблицей исходных данных для диаграммы, с пояснениями где у Вас P_Факт и P_Рачётная, что такое "3,8" и "2,8/1,6" ?
Если в исходняке у Вас "многоступенчатые" формулы, сделайте копию только значений (выделяете диапазон - Копировать, Специальная вставка->Вставить: значения).

С.М.>> Re: VBA макрос виноват в странном поведении формул?
2010-12-06 21:35 http://forum.msexcel.ru/profiles/sm-u19758.html
1. Моя неточность, функция должна быть такой:

Код:
Function IsFormulaInCell(Cell As Range)
    Rem формула формулы начинается со знака равенства
    If InStr(1, Cell.Cells(1).Formula, "=") = 1 Then IsFormulaInCell = 1 Else IsFormulaInCell = 0
End Function
2. 'IsFormulaInCell = InStr(1, Cell.Cells(1).Formula, "=") = 1' тоже работает.
3. А почему 'IsFormulaInCell = Cell.Cells(1).HasFormula' саботирует работу Условного форматирования - не знаю.

Виктория Зуева>> Re: Макрос копирования значений
2010-12-06 22:10 http://forum.msexcel.ru/profiles/buka3-u2668.html
    Возможно, так:
 

Код:
  cn = Sheets("Äåíü").Cells(2, 1).Value
    cn2 = Sheets("Äåíü").Cells(2, 1).Value - 349
    Worksheets("Äåíü").Range("B" & cn2 & ":O" & cn).Copy
    Application.DisplayAlerts = False
    Worksheets("Äåíü").Range("B4:O350").PasteSpecial _
        Operation:=xlPasteSpecialOperationAdd
    Application.DisplayAlerts = True

Zaparich>> Форматирование сводной таблицы
2010-12-06 22:25 http://forum.msexcel.ru/profiles/zaparich-u53916.html
Коллеги, привет!

Нужна ваша помощь:

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

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

Спасибо!

Serge 007>> Re: Форматирование сводной таблицы
2010-12-06 23:25 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Здравствуйте Zaparich  Подмигивающий

Смотрим скрин и выставляем параметры как на нём.
Параметры, естественно, вызываем [abbr=клик правой кнопкой мыши]ПКМ[/abbr] по сводной.

ЗЫ Из 2007-го в 2003-м можно сохранять [url=http://msexcel.ru/content/view/34/2/]_сводные_[/url] при работе в режиме совместимости.

Tai>> Re: использование вложенных циклов, заполнение ячеек листа при выполнении условия
2010-12-06 23:34 http://forum.msexcel.ru/profiles/tai-u53801.html
Переделала немного, всё работает как надо. Спасибо огромное за помощь!!!  Улыбка

VIP77>> Re: Как на графике в Excel в отдной точке отобразить 2 значения?
2010-12-07 07:58 http://forum.msexcel.ru/profiles/vip77-u54079.html

.... что такое "3,8" и "2,8/1,6" ?

В том то и дело что я не знаю как мне график построить так что бы он в одном значении по оси Х (РД-к.441) имел два значения по оси Y (2,6 и 3,0), если это вообще теоретически возможно в Excel.
Не знаю я еще как мне объяснить то, что я хочу получить, кроме того как я уже обьяснил.

Спасибо всем откликнувшимся

GWolf>> Re: Статистика на гео.карте в Excel
2010-12-07 08:46 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Доброго дня!

Тема на самом деле актуальна для всех, кто работает по управлению региональными представителями и т.п. ...

Как и любая задача в Excel, эта может быть решена несколькими способами. Один из них:

Если отрисовать как отдельные объекты - регионы на контурной карте (Напрасно Вы карту не выложили!  Плачущий), то вставка в эти рисованные объекты данных из Вашей таблицы становится тревиальной задачей. Подмигивающий Соответственно, города будут отдельными обектами - кружками.

Zaparich>> Re: Форматирование сводной таблицы
2010-12-07 10:35 http://forum.msexcel.ru/profiles/zaparich-u53916.html
Все точно, Сергей спасибо за ясный и понятный ответ!

Bomont>> Re: Макрос копирования значений
2010-12-07 10:54 http://forum.msexcel.ru/profiles/bomont-u4849.html
Спасибо, работает!

alexfc>> Изменение форматирования активной ячейки по умолчанию
2010-12-07 11:20 http://forum.msexcel.ru/profiles/alexfc-u54342.html
Добрый  день! Простой вопрос, но ответа нигде найти не смог. Как изменить форматирование активной ячейки по умолчанию. Т.е., обычно, если ячейка становится активной (при перемещении по ячейкам, например), ее границы меняют толщину. Как сделать так чтобы менялась не только только толщина границ, но и цвет и даже заливка? Вопрос связан с тем, что часто из-за пользовательского форматирования ячеек на листе активной ячейки бывает просто не видно, - сливается с другими ячейками и ее приходится искать на экране (например, при перемещении по гиперссылкам или по Ctrl-G).

GWolf>> Перенесено: Опросник в Excel
2010-12-07 11:37 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Тема перенесена в Проекты VBA.

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

TimSha>> Re: Изменение форматирования активной ячейки по умолчанию
2010-12-07 12:26 http://forum.msexcel.ru/profiles/timsha-u13313.html
Все зависит от версии XL. Как вариант -  координатное выделение, но внимательно, т.к. есть версии, в которых при "Del" в одной ячейке удалается весь выделенный крест - и строка, и поле...

Джоник>> Re: Макрос для заполнения кассовых ордеров
2010-12-07 12:54 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Василич, доброго вам дня!
С просмотром все окей. Именно так, как я и планировал. Спасибо вам еще раз сто.
А вот в процессе очередного тестирования обнаружил следующее.
Например, напечатал ордера и записал в журнал, им лишь потом обнаружил ошибку. Теперь, чтобы запустить новую печать, нужно очистить журнал от неправильных данных. Делаю это вручную. В этом случае, вновь введенные ( исправленные)  ордера печатаются и заносятся в журнал, вроди как  исправно.
А вот последний номер в реестре , в ячейке D4, после повторного их формирования - не отражается. Вместо него , появляется нолик.
Это или я че то не так делаю, или , скорее всего, какой то сбой в нумерации. Потому что, даже в скачанном файле, нумерация начинается с 78-ми.
Как мне кажется, сама собой , напрашивается очистка Журналов от неправильно внесенных данных. Или что то другое – для этой цели. А может я на самом деле где то ошибочно не то делаю.
Далее, слова «ПЕЧАТАЕТЯ» И «ЗАНЕСЕНО В РЕЕСТР», печатаются. Чего не должно быть.
Ка...

Domenika>> Из нескольких слагаемых получить необходимую сумму
2010-12-07 14:50 http://forum.msexcel.ru/profiles/domenika-u54401.html
Есть столбец с цифрами. необходимо найти некое число, которое получилось бы при сложении двух/трех/четырех цифр (стоящих не друг за другом) Шокирован.

missttv>> Re: скрыть строки при условии
2010-12-07 15:35 http://forum.msexcel.ru/profiles/missttv-u51690.html

А с _автофильтр_ом не проще?

с [url=http://msexcel.ru/content/view/27/2/]_автофильтр_[/url]ом не проще, т.к. автоматически будут создаваться десятки листов и в каждом из них [url=http://msexcel.ru/content/view/27/2/]_автофильтр_[/url]ом руками убирать...... Злой влом

missttv>> Re: скрыть строки при условии
2010-12-07 15:36 http://forum.msexcel.ru/profiles/missttv-u51690.html
tgm, KuklP  и nilem спасибо! Вы молодцы! Веселый

missttv>> Re: Из нескольких слагаемых получить необходимую сумму
2010-12-07 16:25 http://forum.msexcel.ru/profiles/missttv-u51690.html
насколько я поняла, то нужно поставить = затем выделить первую слагаему ячечку, поставить плюс, выделить вторую и т.д., а затем нажать энтер.
или Вы это макросом хотите?

Domenika>> Re: Из нескольких слагаемых получить необходимую сумму
2010-12-07 16:39 http://forum.msexcel.ru/profiles/domenika-u54401.html
неееее, мы хотим, например найти некое число 3587  (всего строк с цифрами 100. 1-ая строка - 205, 2-ая строка  - 758, 3-строка - 144,...75 строка  - 3000, 99 строка - 587 и т.д.). И чтобы получилось 3587 необходимо чтобы сложились 75 строка и 99 строка....но строк то м.б. 10 000  Улыбка

Wasilic>> Re: Макрос для заполнения кассовых ордеров
2010-12-07 17:17 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Чем дальше в лес тем страшнее.

Цитировать
Например, напечатал ордера и записал в журнал, и лишь потом обнаружил ошибку. Теперь, чтобы запустить новую печать, нужно очистить журнал от неправильных данных. Делаю это вручную.
Как мне кажется, сама собой , напрашивается очистка Журналов от неправильно внесенных данных. Или что то другое – для этой цели.
Леонид, давайте так. Бухгалтера, часто допускающего ошибки, по головке не гладят, должность не дефицитная.  Работать надо внимательно, без ошибок, а уж если допустил, то потрудись ручками. Это будет профилактикой для внимательности.
Писать макрос для исправления ошибок, извини, я не буду.
Цитировать
А вот последний номер в реестре , в ячейке D4, после повторного их формирования - не отражается. Вместо него , появляется нолик.
Это или я че то не так делаю, или , скорее всего, какой то сбой в нумерации. Потому что, даже в скачанном файле, нумерация начинается с 78-ми.
Еще раз поясняю, в «реестре», в ячейке «В1» формулой =МАКС(B13:B1...

Виктория Зуева>> Re: Из нескольких слагаемых получить необходимую сумму
2010-12-07 18:32 http://forum.msexcel.ru/profiles/buka3-u2668.html
Так всё-таки:
- требуется подобрать слагаемые (всё равно из какой строки, в каком количестве), чтобы получить нужный итоговый результат? или
- сложить значения из определенных строк (тогда - сколько значений в строке, т.е. сколько столбцов в строке м.б. заполнено?) ?
- сложить определенные каким-то условием (каким?) значения?

Domenika, определитесь с условиями задачи, + хорошо бы получить пример данных (в виде файла).

iron priest>> Re: Из нескольких слагаемых получить необходимую сумму
2010-12-07 19:26 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
а вы уверены что "некое число" обязательно получится?

foxjon>> Печать через UserForm
2010-12-07 22:05 http://forum.msexcel.ru/profiles/foxjon-u52521.html
Всем доброго времени суток.

Есть необходимость решить одну задачку, буду признателен всем кто примет участие.

Суть вопроса в следующем;

Книга содержит некоторое количество листов, на каждом листе есть определенная информация, для удобства перемещения по листам создано меню навигации в UserForm вызов формы осуществляется кликом по кнопке Открыть меню. В этом же меню помимо навигации расположена кнопка Print, каким образом можно организовать печать листа на который осуществлен переход по меню формы.

Если возможно предлагаемые варианты решения отобразить в примере файла.

Всем спасибо.

robert23>> Выбор оптимальных значений
2010-12-07 22:29 http://forum.msexcel.ru/profiles/robert23-u54534.html
День простоял - не нашел решение.
Ночь просидел - не видать мыси.
Нету сил

Владленка>> Функция если, отобрать рабочие выходные дни.
2010-12-07 23:28 http://forum.msexcel.ru/profiles/vladlenka-u54550.html
Здравствуйте, не могу никак решить задачу в экселе((((
Сама задача:
Записать в ячейках А3:А32 даты всех дней сентября, после чего в столбце С для каждого дня записать буквы «р» или «в» в зависимости от того, является ли соответствующий день рабочим или выходным. Принять, что рабочими являются все дни недели, кроме субботы или воскресенья..

Вот.Как я поняла, в столбцах В надо было проставить какой это день недели, так я сделала и в столбце С, с помощью функции ЕСЛИ должно действовать так, что если этот день суббота или воскресенье, то истина будет "в", а ложь "р". Правильный или нет у мня ход мыслей, просто я уже и так и так вводила условие, а он не выводит, пишет либо ошибку, либо недопустимое значение, буду очень благодарна за помощь, если подскажите как именно написать в строке формул правильное условие....

Serge 007>> Re: Функция если, отобрать рабочие выходные дни.
2010-12-07 23:32 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Здравствуйте.

Код:
=ЕСЛИ(ДЕНЬНЕД(A3;2)>5;"в";"р")

Владленка>> Re: Функция если, отобрать рабочие выходные дни.
2010-12-07 23:42 http://forum.msexcel.ru/profiles/vladlenka-u54550.html
Serge 007
спасибо огромное, если честно даже не знала такую функцию, такой способ!!!спасибочки!!!!!!! Улыбка Улыбка Улыбка

filimon2000>> Доработка данных до требуемого вида
2010-12-08 00:18 http://forum.msexcel.ru/profiles/filimon2000-u54572.html
Прошу помощи. необходимо имеющиеся данные привести к требуемому виду (шаблону). Условия задачи в прикрепленном файле.

Serge 007>> Re: Доработка данных до требуемого вида
2010-12-08 00:30 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Тупо ВПР

filimon2000>> Re: Доработка данных до требуемого вида
2010-12-08 00:40 http://forum.msexcel.ru/profiles/filimon2000-u54572.html

Тупо ВПР
Результат вижу. Попробую разобраться, конечно, но хотелось бы поподробней ... Спасибо.

Serge 007>> Re: Доработка данных до требуемого вида
2010-12-08 00:43 http://forum.msexcel.ru/profiles/serge_007-u25260.html

Тупо ВПР
Результат вижу. Попробую разобраться, конечно, но хотелось бы поподробней ... Спасибо.
Дык формулы в файле Улыбка
Кроме ВПР там есть проверка на ошибку - ЕНД и ЕСЛИ для возврата ноля а не #Н/Д.
Вот собственно и всё...

filimon2000>> Re: Доработка данных до требуемого вида
2010-12-08 00:53 http://forum.msexcel.ru/profiles/filimon2000-u54572.html

Дык формулы в файле Улыбка
Формулы вижу, но они не раскидывают фактические ключи (B) по своим местам ...  Плачущий
Прошу бить меня не сильно ...

filimon2000>> Re: Доработка данных до требуемого вида
2010-12-08 00:57 http://forum.msexcel.ru/profiles/filimon2000-u54572.html
Похоже разобрался  Веселый Сам ступил маленько. Спасибо. Работает!

С.М.>> Re: Как на графике в Excel в отдной точке отобразить 2 значения?
2010-12-08 01:08 http://forum.msexcel.ru/profiles/sm-u19758.html
VIP77, а что за числа в таблице, справа от чёрных треугольничков ? Они имеют отношение к P ?

Russel>> Как протянуть формулу через строку!!!!ПаМаГиТе!!!!!!!!!!
2010-12-08 01:53 http://forum.msexcel.ru/profiles/russel-u54174.html
Обыскал весь интернет,но так и не понял как же этого сделать!!!!
Позже скину вложение!!!!

Aqil_f>> Можно ли делать в Excel отчет в типе как Delphi или Foxpro?
2010-12-08 08:37 http://forum.msexcel.ru/profiles/aqilf-u14854.html
Есть 4 листа, надо получить отчет как показано в листе "OTCET"

В цикле сначало из Лист1 нужен взять 1-й запись, потом из Лист1_1 только те записи где столбец В в обоих листа одинаковый (в данном случае столбец В равно В)

Потом из Лист2 нужен взять 1-й запись, потом из Лист2_1 только те записи где столбец В в обоих листа одинаковый (в данном случае столбец В равно А)

Сразу же этот отчет должен отправится на печать.

Потом цикл продолжается для 2-го, 3-го записи .... и т.д.

alexfc>> Re: Изменение форматирования активной ячейки по умолчанию
2010-12-08 08:39 http://forum.msexcel.ru/profiles/alexfc-u54342.html
Спасибо за подсказку, способ хороший, но не совсем удобный, когда при перемещении по ячейкам возникает большое количество выделенных ячеек.
А другого способа нет?

alexfc>> изменение форматирования примечания
2010-12-08 08:44 http://forum.msexcel.ru/profiles/alexfc-u54342.html
Добрый день, можно ли задать форматирование примечания по умолчанию? Чтобы при создании нового примечания был уже заранее заданный формат (например "автоматический размер").

iron priest>> Re: Как протянуть формулу через строку!!!!ПаМаГиТе!!!!!!!!!!
2010-12-08 09:16 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
давайте пример

Wasilic>> Re: Как протянуть формулу через строку!!!!ПаМаГиТе!!!!!!!!!!
2010-12-08 09:31 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Ответ на вопрос "Как протянуть формулу через строку!"
Выделяешь ячейку с формулой и ячейку в следующей строке (пустую),
На выделенном квадрате двух ячеек, в правый нижний угол подводишь указатель мышки и нажимаешь правую кнопку. Должен появиться + (плюсик), тянешь его вниз сколько надо, и будет тебе формула через строку.

Wasilic>> Re: Выбор оптимальных значений
2010-12-08 10:21 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Так?
Только пример выкладывать желательно в формате 2003 (xls)

iron priest>> Re: Как протянуть формулу через строку!!!!ПаМаГиТе!!!!!!!!!!
2010-12-08 10:37 http://forum.msexcel.ru/profiles/iron_priest-u20725.html

Ответ на вопрос "Как протянуть формулу через строку!"
Выделяешь ячейку с формулой и ячейку в следующей строке (пустую),
На выделенном квадрате двух ячеек, в правый нижний угол подводишь указатель мышки и нажимаешь правую кнопку. Должен появиться + (плюсик), тянешь его вниз сколько надо, и будет тебе формула через строку.

это если следующая ячейка снизу пуста))

Domenika>> Re: Из нескольких слагаемых получить необходимую сумму
2010-12-08 10:43 http://forum.msexcel.ru/profiles/domenika-u54401.html
нам необходимо найти не из заданных НАМИ строк, а из всего столбца нужное значение (сумму) (т.е. мы не знаем из каких строк она сложится Улыбка).
например,
3550
11
258
35547
241
1
9874
1450
321
55
нужно найти сумму 1505 (если сложить 1450 и 55, эта сумма и получится)

robert23>> Re: Выбор оптимальных значений
2010-12-08 10:55 http://forum.msexcel.ru/profiles/robert23-u54534.html
Спасибочки Василик! Веселый
Замечание учту. Исправлюсь - честное слово Смеющийся

Wasilic>> Re: Выбор оптимальных значений
2010-12-08 11:21 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Василич я! Улыбка

Wasilic>> Re: Как протянуть формулу через строку!!!!ПаМаГиТе!!!!!!!!!!
2010-12-08 11:33 http://forum.msexcel.ru/profiles/wasilic-u24852.html

Цитировать
это если следующая ячейка снизу пуста))
Какой вопрос, такой и ответ.  Улыбка

robert23>> Re: Выбор оптимальных значений
2010-12-08 11:37 http://forum.msexcel.ru/profiles/robert23-u54534.html
Василич!
Хотелось бы решение циклом...А то, если параметров не 1-2-3 скоко писанины...
 Грустный
Последнее действие - аналог ВПР, типа выбрать соответствие из таблицы максимальному и минимальному значению.
Все равно = спасибочки

Виктория Зуева>> Re: Из нескольких слагаемых получить необходимую сумму
2010-12-08 11:51 http://forum.msexcel.ru/profiles/buka3-u2668.html
Подобные задачи и варианты решения посмотрите ТУТ:
http://forum.msexcel.ru/microsoft_excel/summirovanie_znacheniy_kolonki_na_predmet_poiska_summy_chisel_ravnoy_x-t977.0.html

Wasilic>> Re: Выбор оптимальных значений
2010-12-08 11:55 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Ответ согласно примера.

А то, если параметров не 1-2-3 скоко писанины...
Ну и скоко же? Особенно для второй таблицы.
Задачу нуно было правильно ставить.

MCH>> Re: Из нескольких слагаемых получить необходимую сумму
2010-12-08 11:59 http://forum.msexcel.ru/profiles/mch-u48782.html
Задачу лучше всего решать макросом, например перебором всех возможных вариантов сложения и нахождения оптимального.
Количество таких вариантов расчитывается по формуле 2^n-1, где n - количество используемых чисел.
Для большого количества (более 20-30) лучше подойдут другие алгоритмы.

Для небольшого количества чисел можно решить перебором и без макроса, см. вложение.
Попробуйте изменить число в ячейке Е1.

Domenika>> Re: Из нескольких слагаемых получить необходимую сумму
2010-12-08 12:07 http://forum.msexcel.ru/profiles/domenika-u54401.html
Спасибо огромное Улыбка!!!! Всё поняла

Wasilic>> Re: Выбор оптимальных значений
2010-12-08 13:31 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Так что ли?

Wasilic>> Re: Печать через UserForm
2010-12-08 14:00 http://forum.msexcel.ru/profiles/wasilic-u24852.html

на каждом листе есть определенная информация
И где же эта информация?
Ведь для печати нужно указать ее координаты!

Джоник>> Re: Макрос для заполнения кассовых ордеров
2010-12-08 14:00 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Доброго дня Василич!
Прочитал , понял, принимаю.
Буду стараться «ручками» искупать свою склонность иногда делать ошибки. Хотя, как говорят в народе : «не ошибается тот, кто ничего не делает!». И если буквально исполнять вторую часть этой народной мудрости, то тогда и макрос по исправлению ошибок, совсем ни к чему. (шутка).
А если серьезно, то вы мне очень и очень здорово помогли в автоматизации приличной части моего ручного труда. За что вам огромнейшее СПАСИБО111

А, что касается вот этой части : «А вот здесь – наверное плохо пробовал!!!  В примере,  я  оставил с фильтром по дате и ФИО. Осталось выделить и распечатать», то здесь я пробовал прилямпичить к существующему фильтру очень удобную сортировку при помощи макросов, которая у меня имеется.
Да ладно! Буду дерзать сам. Может че нибудь и сооружу. А если и не сооружу, то не страшно, обойдусь и без сортировки.
Еще раз, мой вам респект и большущее уважение!!!!
Джоник

Wasilic>> Re: Макрос для заполнения кассовых ордеров
2010-12-08 14:40 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Установи курсор на колонку по которой нужно произвести сортировку и сортируй на здоровье!

Виктория Зуева>> Re: изменение форматирования примечания
2010-12-08 15:32 http://forum.msexcel.ru/profiles/buka3-u2668.html
Посмотрите топик ТУТ:

http://www.planetaexcel.ru/forum.php/files.php?thread_id=10135

И еще - как вариант ("ручками"): можно скопировать-вставить уже "оформленное" примечание через специальную вставку. Размер и форматирование примечания сохраняются. Текст - поменять. Значения/формулы в самих ячейках не изменяются.
Можно повторить спец.вставку для нескольких ячеек через F4.

Джоник>> Re: Макрос для заполнения кассовых ордеров
2010-12-08 15:45 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Василич!
Еще тысячу раз СПАСИБО!!!!!!!!!! .....!
Тогда выходит, что и мой макрос , который допускает сортировку по 6-ти параметрам, должен работать. Очевидно, что по своей тупости, я че то не то делаю. Но если так, то буду долбаться сам, пока не заработает.

Wasilic>> Re: Можно ли делать в Excel отчет в типе как Delphi или Foxpro?
2010-12-08 16:25 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Можно! Но, так часто бывает, решив задачу на приложенном примере, потом оказывается, что в оригинале имена листов не такие, размещение таблиц на листах не такое и макрос к оригиналу не подходит и снова начинай переделывать.
Сейчас, к примеру, проверка должна быть по столбцу В, а потом окажется что надо по D или Е и т.д.
Поэтому, пример нужен один к одному с оригиналом.
Он такой? Один к одному?

robert23>> Re: Выбор оптимальных значений
2010-12-08 18:40 http://forum.msexcel.ru/profiles/robert23-u54534.html
Василич - ты гений! Шокирован
Пока ниче не понял - но работает!

foxjon>> Re: Печать через UserForm
2010-12-08 20:03 http://forum.msexcel.ru/profiles/foxjon-u52521.html

на каждом листе есть определенная информация
И где же эта информация?
Ведь для печати нужно указать ее координаты!

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

В моем пример некоторая информация есть на листе 1 3 5
В последующем она может появится на всех остальных листа.

MCH>> Re: Задача по делению массива данных на части с равномерным распределением
2010-12-08 22:38 http://forum.msexcel.ru/profiles/mch-u48782.html
Если тема еще актуальна, то предлагаю формульное решение

Джоник>> Re: Печать через UserForm
2010-12-08 22:41 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Добрый вечер!
Может вот так вам подойдет.
Джоник

foxjon>> Re: Печать через UserForm
2010-12-09 00:35 http://forum.msexcel.ru/profiles/foxjon-u52521.html

Добрый вечер!
Может вот так вам подойдет.
Джоник

Спасибо, наверное ваш пример будет наиболее оптимальным, поскольку книга будет использоваться на разных ПК и естественно у каждого свои настройки принтера, клик по кнопке Print немного приукрасил банальный клик на панели управления, про перебор клавищ Ctrl+P также не стоит забывать.

Да вот только как можно поправить такой момент, чтобы после клика по кнопке Print UserForm не уходила а оставалась открытой, ведь так намного удобнее перемещаться по ссылкам и отправлять на печать вновь открытые страницы, в противном случае приходится повторно вызывать форму.

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

Джоник>> Re: Печать через UserForm
2010-12-09 01:34 http://forum.msexcel.ru/profiles/dzhonik-u30110.html
Наверное как то так

MCH>> Re: Из нескольких слагаемых получить необходимую сумму
2010-12-09 15:20 http://forum.msexcel.ru/profiles/mch-u48782.html
У меня получилось максимально использовать в подобной формуле 12 слагаемых.
Для большего количества нужно писать макрос

Domenika>> Re: Из нескольких слагаемых получить необходимую сумму
2010-12-09 15:26 http://forum.msexcel.ru/profiles/domenika-u54401.html
Понятно...жаль Грустный!!! Но все-равно спасибо!

budda31rus>> Как растянуть формулу содержащую ссылку на лист?
2010-12-09 15:32 http://forum.msexcel.ru/profiles/budda31rus-u54883.html
Как растянуть формулу содержащую ссылку на лист?

Имеем столбец в котором размещена формула типа: ='лист (1)'.A1 (нужно выбрать значение)
Листов около 700, формат наименования листов: лист (*)
Можно ли растянуть формулу чтобы менялось цифровое значение листа которое в скобках?

Надеюсь понятно написал     Улыбка  Заранее спасибо...

Prist>> Re: Как свести информацию из нескольких книг в одну???
2010-12-09 15:46 http://forum.msexcel.ru/profiles/prist-u4859.html
Здравствуйте.
Может что-то из этого подойдет?
Вариант1
Вариант2

Serge 007>> Re: Как растянуть формулу содержащую ссылку на лист?
2010-12-09 15:50 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Можно.
Давайте пример.

budda31rus>> Re: Как растянуть формулу содержащую ссылку на лист?
2010-12-09 16:12 http://forum.msexcel.ru/profiles/budda31rus-u54883.html
В примере 2 листика с протоколами (их будет много) и лист в котором сводятся данные. Можно в качестве примера показать на колонке "A" листа "сводная", там выбираются номера протоколов.

nilem>> Re: Табель: Отработано за день
2010-12-09 16:41 http://forum.msexcel.ru/profiles/nilem-u30547.html
Вот попробуйте так:
[code]Sub BuilderPopUpMenu()
Dim cb As CommandBar, cbPopUp As CommandBarPopup
Set cb = CommandBars.Add(Name:="TemporaryPopUpMenu", Position:=msoBarPopup)
With cb
    Set cbPopUp = .Controls.Add(Type:=msoControlPopup)    '1-й пункт меню с подменю
    With cbPopUp
        .Caption = "Объект"
        With .Controls.Add(Type:=msoControlButton)     'добавляем 1-й пункт подменю
            .OnAction = "MyMacro1"     '.OnAction = "ObjektInsertOrDelete"
            .FaceId = 15: .Caption = "добавить"
            .TooltipText = "добавляем что-то там"
        End With
        With .Controls.Add(Type:=msoControlButton)    'добавляем 2-й пункт подменю
            .OnAction = "MyMacro2"
            .FaceId = 14: .Caption = "удалить"
            .TooltipText = "удаляем что-либо"
        End With
    End With: Set cbPopUp = Nothing
    With .Controls.Add(Type:=msoControlButton)    '2-й пункт меню
        .OnAction = "WorkedByOtherTrade": .FaceId = 72: .Caption = "Работал по дру...

alexfc>> Re: изменение форматирования примечания
2010-12-09 16:50 http://forum.msexcel.ru/profiles/alexfc-u54342.html
Спасибо! Сделал аналогичный макрос - все работает.

GWolf>> Re: Табель: Отработано за день
2010-12-09 16:50 http://forum.msexcel.ru/profiles/gwolf-u4652.html
Добрый вечер!

Супер! Все встало на свои места!

Виктория Зуева>> Re: Из нескольких слагаемых получить необходимую сумму
2010-12-09 19:25 http://forum.msexcel.ru/profiles/buka3-u2668.html
А вот этот вариант от Zorro2005  Вы пробОвали?
http://forum.msexcel.ru/microsoft_excel/vybrat_iz_stolbtsa_s_chislami_v_summe_maksimalno_priblizhennoe_k_zadannomu_chislu-t967.0.html

Реально нормально работает через Поиск решения!

scrackan>> Чтобы на обратной стороне листа всегда печаталось одно и то же
2010-12-09 19:27 http://forum.msexcel.ru/profiles/scrackan-u35579.html
Имеется документ (см. аттач).

Там 2 экселевских листа. "стр1" - это то, что всегда печатается на лицевой стороне листа бумаги, "стр2" - на обратной стороне листа бумаги.

На лицевой стороне каждого листа всё время печатается разное, но обратная сторона у всех листов - одинаковая.

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

Serge 007>> Re: Как растянуть формулу содержащую ссылку на лист?
2010-12-09 19:34 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Надо было больше строчек заполнить, так алгоритм не понятен.
Пока так:

Код:
=ДВССЫЛ("'протокол ("&СТРОКА(A1)&")'!$H$9")

Toha153>> Перенос результатов на другой лист по заданным условиям
2010-12-09 19:47 http://forum.msexcel.ru/profiles/toha153-u39281.html
Добрый вечер! Проблема с переносом результатов с одного листа на другой по заданным условиям:
Копирование данных из определенных ячеек любой одной обозначенной кодовым словом строки, находящейся в диапазоне "таблицы1" в "таблицу2".
В "таблице2" поиск последней пустой ячейки (колонки А в данном случае) и продолжение нумерации для строки в которую вставляются значения из обозначенной строки "таблицы1". Допускается отсутствие данных в некоторых ячейках, поэтому необходима привязка к поиску последней пустой ячейки ПЕРВОЙ колонки "таблицы2", что бы не произошло сдвига в результате случайного отсутствия данных, как если бы такая привязка была к каждой колонке "таблицы2". Формулы должны переноситься каждый раз при заполнении новой строки в "таблице2".
Таблица1 - служит для расчета (результаты расчетов сохраняются, удаляются, и затем новые расчеты), таблица2 - для отчета (данные сохраняются последовательно со сдвигом вниз в каждой строке)
Кнопка запуска макроса переноса в акти...

KuklP>> Re: Чтобы на обратной стороне листа всегда печаталось одно и то же
2010-12-09 21:47 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Ну и печатайте сначала 1 сторону листов(односторонняя печать), а потом нужное к-во обратных сторон. Какие уж тут особые извращения? Тем более, что лицевые стороны у Вас с альбомной ориентацией, а тыльные с книжной. Извращением будет одно нажатие кнопки менять на то, что Вы хотите. Даже не буду подсказывать Вам, как это сделать, потому как ИМХО проще, быстрей и технологичней будет то, что я описал сначала.

Elavio>> Необходимо решение на ЛОГИКУ(Ф-ции ЕСЛИ,И,ИЛИ,ВПР)
2010-12-09 22:32 http://forum.msexcel.ru/profiles/elavio-u51778.html
Предлагаю выкладывать здесь интересные примеры или решение задач из собственого опыта или работы

Например надо было когда-то решить какой-то вопрос по таблицах ,долго мучались,но решили

Может кому-то это и поможет

Начну с моего примера

Надо чтобы в ячейке J3 проставлялся день ,когда значение продаж минимальное ,если при этом минимальных значений несколько ,то последнее день последнего (или первого)

Elavio>> Re: Решения на ЛОГИКУ(Ф-ции ЕСЛИ,И,ИЛИ,ВПР)
2010-12-09 22:40 http://forum.msexcel.ru/profiles/elavio-u51778.html
Ребят ,ну что ,никто не хочет помочь ,может и Вам когда-нибудь помогут ...

Пример в приложении

Виктория Зуева>> Re: Необходимо решение на ЛОГИКУ(Ф-ции ЕСЛИ,И,ИЛИ,ВПР)
2010-12-09 22:59 http://forum.msexcel.ru/profiles/buka3-u2668.html
Уважаемый Elavio!

Ваше первое сообщение в теме, как и заголовок темы, не похожи на просьбу о помощи.
Интересных примеров с не менее интересными решениями на данном форуме предостаточно, и своими "как у меня получилось" мы тут также делимся.
Отнюдь не начиная с Вашего примера.

Над Вашим вопросом - подумаем. Тему - переименовала, чтоб было понятнее.

С наилучшими пожеланиями,
один из модераторов форума.

Elavio>> Re: Решения на ЛОГИКУ(Ф-ции ЕСЛИ,И,ИЛИ,ВПР)
2010-12-09 23:01 http://forum.msexcel.ru/profiles/elavio-u51778.html
Хорошо,пусть будет так ,только чтоб помогло )))

ZORRO2005>> Re: Необходимо решение на ЛОГИКУ(Ф-ции ЕСЛИ,И,ИЛИ,ВПР)
2010-12-09 23:06 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
=СМЕЩ($B$2;;ПОИСКПОЗ(МИН(C3:I3);C3:I3;0))

kimtan>> Re: Необходимо решение на ЛОГИКУ(Ф-ции ЕСЛИ,И,ИЛИ,ВПР)
2010-12-09 23:10 http://forum.msexcel.ru/profiles/kimtan-u12219.html
Формула массива.
Для варианта: "если при этом минимальных значений несколько ,то последнее день последнего"
=ПРОСМОТР(1E+22;ЕСЛИ(МИН(C3:I3)=C3:I3;C3:I3);$C$2:$I$2)
Вводить Ctrl+Shift+Enter


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


В избранное