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

KuklP>> Re: Отображение даты и времени последнего сохранения/изменения файла


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

Выпуск 14
от 2012-09-28

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

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



KuklP>> Re: Отображение даты и времени последнего сохранения/изменения файла
2012-09-19 09:18 http://forum.msexcel.ru/profiles/kuklp-u39713.html
В модуль книги:

Код:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Sheets(1).[a1] = Now
    Me.Save
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    Sheets(1).[a2] = Now
End Sub


badhabit>> Построить гистограмму
2012-09-19 11:03 http://forum.msexcel.ru/profiles/badhabit-u38488.html
Добрый день. У меня есть таблица следующего вида:
Дата       Код 
15.05.12  6001
13.05.12  6001
01.05.12  6001
01.06.12  6001
12.06.12  6001
05.08.12  6001

Как мне построить гисторгамму в которой будет три столбика (соответсвенно по месяцам - май, июнь, август) и высота этих столбиков будет равняться "кол-ву строк"(записей) за этот месяц, т.е. в мае - 3, июне - 2, августе - 1?

Serge 007>> Re: Построить гистограмму
2012-09-19 11:18 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Так надо?

badhabit>> Re: Построить гистограмму
2012-09-19 11:41 http://forum.msexcel.ru/profiles/badhabit-u38488.html
Так надо?
Да, именно так. Спасибо, буду разбираться...

margoshat>> Re: Транспонирование данных или нахождение данных на пересечении столбцов и строк
2012-09-19 12:57 http://forum.msexcel.ru/profiles/margoshat-u148288.html
еще вариант, с помощью сводной с динамическим диапазоном, при добавлении ланных обновите ее, отобразите список полей, поставьте галочки около новых дат. Единственное, день недели - теперь как формула.

Ок, спасибо рассмотрю как вариант, может пригодится!

Kreygi>> Re: Отображение даты и времени последнего сохранения/изменения файла
2012-09-19 15:56 http://forum.msexcel.ru/profiles/kreygi-u152690.html
В модуль книги:
Код:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Sheets(1).[a1] = Now
    Me.Save
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    Sheets(1).[a2] = Now
End Sub

А вот это уже, увы, для меня проблема. Не владею VB.

Serge 007>> Re: Отображение даты и времени последнего сохранения/изменения файла
2012-09-19 16:19 http://forum.msexcel.ru/profiles/serge_007-u25260.html
...это уже, увы, для меня проблема. Не владею VB.
Для того что бы воспользоваться готовым решением владеть VBA необязательно Улыбка
Что надо делать, что бы заработало читайте здесь

badhabit>> Re: Построить гистограмму
2012-09-20 09:39 http://forum.msexcel.ru/profiles/badhabit-u38488.html
Так надо?
Что-то никак не разберусь, как такую сводную таблицу создать. Можно пожалуйста пошаговую инструкцию, как для дураков Улыбка

Serge 007>> Re: Построить гистограмму
2012-09-20 10:12 http://forum.msexcel.ru/profiles/serge_007-u25260.html
...как такую сводную таблицу создать? Можно пожалуйста пошаговую инструкцию?


badhabit>> Re: Построить гистограмму
2012-09-20 10:22 http://forum.msexcel.ru/profiles/badhabit-u38488.html
...как такую сводную таблицу создать? Можно пожалуйста пошаговую инструкцию?
Нда, сам бы врядли додумал, спасибо огромное!

margoshat>> Как собрать данные с нескольких листов без использования сводной таблицы
2012-09-20 11:11 http://forum.msexcel.ru/profiles/margoshat-u148288.html
Добрый день!

Подскажите, пожалста, как собрать информацию с нескольких листов не используя сводную таблицу.
Смысл формулы должен быть где-то средним между суммеслимн и СУММ(диапазон листов: с : по ).
или может я чересчур мудрю, и есть что-то проще?....


Barbarian12>> Re: Добавление введенного значения на другой лист
2012-09-20 20:06 http://forum.msexcel.ru/profiles/barbarian12-u139204.html
Есть файлик, с которым работает сразу несколько человек, занося ту информацию о своих клиентах (напротив каждого клиента стоит ФИО сотрудника, их внесшего). Вносится все это по специальной форме (см. файл), а сама инфо о клиенте поступает на другой скрытый лист. Необходимо как-то привязать учетную запись, из под которой заходит сотрудник к его клиентам, т.е. чтобы при нажатии на кнопку, каждому сотруднику выгружался список только его клиентов.

Возможно ли сделать так, чтобы при нажатии кнопки, макрос вытаскивал учетную запись человека, сверял ее с ФИО менеджера (колонка С второго листа) и выгружал только тех клиентов, напротив которых стоит его фамилия?

kartol>> упростить ввод
2012-09-20 21:19 http://forum.msexcel.ru/profiles/kartol-u121172.html
Здравствуйте! подскажите как упростить ввод данных (наверно макросом),сильно не пинайте.

KuklP>> Re: упростить ввод
2012-09-20 22:18 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Почитайте справку о формуле листа ВПР.
И я бы лучше искал по таб. номеру. В ФИО легче допустить ошибку.

ZORRO2005>> Re: Как собрать данные с нескольких листов без использования сводной таблицы
2012-09-20 23:25 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
Предлагаю сделать одну формулу.

Dmitr68>> Re: упростить ввод
2012-09-21 05:34 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
А зачем каждый раз вводить формулы?
Ввели один раз и подставляйте только фамилии.
Добавил проверку на повтор фамилии.

P.s. Почитайте про абсолютные и относительные ссылки.

badhabit>> Объеденить несколько файлов в один
2012-09-21 09:31 http://forum.msexcel.ru/profiles/badhabit-u38488.html
Добрый день. У меня есть порядка 100 однотипных/одноформатных excel файлов, если какой-нибудь стандартный способ объединить их в один большой? Я сделал это через vbs-скрипт, который построчно считывает инфу из исходных фалов и пишет в результирующий, но такой способ довольно медленный, может можно сделать проще и быстрее?

Serge 007>> Re: Объеденить несколько файлов в один
2012-09-21 09:43 http://forum.msexcel.ru/profiles/serge_007-u25260.html
http://www.planetaexcel.ru/tip.php?aid=111
http://www.excel-vba.ru/chto-umeet-excel/kak-sobrat-dannye-s-neskolkix-listov-ili-knig/

margoshat>> Re: Как собрать данные с нескольких листов без использования сводной таблицы
2012-09-21 10:05 http://forum.msexcel.ru/profiles/margoshat-u148288.html
Предлагаю сделать одну формулу.

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


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

P.S. P.S. кстати нумерацию статей нельзя перенести в один столбец, она д.б. именно в такой иерархии
1. д.б. в столбце А
1.1. в столбце В
1.1.1. в столбце С .........и т.д.

Antrate>> Использование подстановочных знаков в функции СУММЕСЛИМН
2012-09-21 11:28 http://forum.msexcel.ru/profiles/antrate-u152879.html
Здравствуйте, помогите решить проблему. Необходимо использовать в функции СУММЕСЛИМН вычисление суммы рядка 1, если в рядке 2 есть:
1. Цифровые значения, которые начинаются на две значимые цифры, а остальные не принимать во внимание (например необходимо выбрать все значения, которые начинаются на 24, причём значения имеют вид 2401, 2402, 2403 и т.д.)
2. Текстовые значения которые начинаются на словосочетание РОЗБ, причём полное выражение имеет вид РОЗБ СТВР и т.д.

Делаю и так =СУММЕСЛИМН(L:L;N:N;"РОЗБ*"), и так =СУММЕСЛИМН(L:L;N:N;"РОЗБ
  • "), и другие варианты, но не могу правильно выбрать комбинацию из подстановочных знаков.

Помогите.

Спасибо.

badhabit>> Re: Объеденить несколько файлов в один
2012-09-21 11:33 http://forum.msexcel.ru/profiles/badhabit-u38488.html

Спасибо!

iron priest>> Re: Использование подстановочных знаков в функции СУММЕСЛИМН
2012-09-21 12:14 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
у вас одно условие. используйте суммесли

ZORRO2005>> Re: Как собрать данные с нескольких листов без использования сводной таблицы
2012-09-21 12:22 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
Только вот при переносе формулы на реальный файл, она чего не хочет работать.
Может расскажете суть формулы, чтобы я сама до конца дотумкала.
Перенесите в свой файл имя "Листы".
Диспетчер имен - (CTRL+F3).

Цитировать
P.S.
в файле будут листы, с которых не надо собирать информацию, они вроде как справочные, а при этой формуле будут суммироваться абсолютно все листы
Тогда нужно создать список нужных листов.(в примере выделил зеленым)

Цитировать
P.S. P.S. кстати нумерацию статей нельзя перенести в один столбец, она д.б. именно в такой иерархии
1. д.б. в столбце А
1.1. в столбце В
1.1.1. в столбце С .........и т.д.
Подправил...

см. вложение

Antrate>> Re: Использование подстановочных знаков в функции СУММЕСЛИМН
2012-09-21 12:23 http://forum.msexcel.ru/profiles/antrate-u152879.html
Спасибо, но условий минимум два, поэтому предложенная Вами функция не подходит. Проблему с текстовыми значениями решил, а вот с цифровыми не могу, хотя и форматировал цифровые значения как текстовые - не помогает.

Serge 007>> Re: Использование подстановочных знаков в функции СУММЕСЛИМН
2012-09-21 12:48 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Проблему с текстовыми значениями решил, а вот с цифровыми не могу, хотя и форматировал цифровые значения как текстовые - не помогает.
Подстановочные знаки используются для текста, для чисел надо по другому
Вариант во вложении

toreto>> Зависимые ячейки со списками
2012-09-21 13:10 http://forum.msexcel.ru/profiles/toreto-u152882.html
Добрый День!!! Уважаемые Гуру!!!
Помогите сделать зависимые ячейки со списками
Есть документ в котором есть ячейки со списками внутри
Например 1 ячейка список в ней (а,б,в,г,д) и вторая ячейка со списком (1,2,3,4,5)
Список соответствия а=1, б=2, в=3, г=4, д=5
Как сделать так чтобы при выборе значения из списка в ячейки 1 (например а) во втрой ячейке из списка автоматический выбиралось значение равное соответствию (тоесть 1)?


Antrate>> Re: Использование подстановочных знаков в функции СУММЕСЛИМН
2012-09-21 13:19 http://forum.msexcel.ru/profiles/antrate-u152879.html
Спасибо. Познавательно. Свою проблему решил след. образом. СУММЕСЛИМН(L:L;O:O;">2400";C:C;"ВМР";O:O;"<2500"). Поясните, пожалуйста, как мне вставить в поле "Условие" из функции СУММЕСЛИ МН выражение из Вашего примера. Спасибо.

Serge 007>> Re: Использование подстановочных знаков в функции СУММЕСЛИМН
2012-09-21 13:27 http://forum.msexcel.ru/profiles/serge_007-u25260.html
...как вставить в поле "Условие" из функции СУММЕСЛИМН выражение из Вашего примера.
Никак. Функции СУММПРОИЗВ и СУММЕСЛИМН работают по разному

Antrate>> Re: Использование подстановочных знаков в функции СУММЕСЛИМН
2012-09-21 13:34 http://forum.msexcel.ru/profiles/antrate-u152879.html
Спасибо, извините, что так настойчиво, но не подскажете, как же в условии прописать так,чтобы выбирались значения, которые начинаются на 24? Спасибо.

Dmitr68>> Re: Зависимые ячейки со списками
2012-09-21 13:45 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
В ячейку 2 формулу:
Код:
=КОДСИМВ(A4)-191


toreto>> Re: Зависимые ячейки со списками
2012-09-21 13:49 http://forum.msexcel.ru/profiles/toreto-u152882.html
В ячейку 2 формулу:
Код:
=КОДСИМВ(A4)-191

Необходимо выбирая значение из списка в ячейке№1 например "А", чтобы в ячейке№2 ей соответствовало и выставлялось автоматический значение "1" и т.д А=1, Б=2, В=3, Г=4, Д=5

Dmitr68>> Re: Зависимые ячейки со списками
2012-09-21 14:29 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
Вы формулу во вторую ячейку ставили?

Jim>> Re: Зависимые ячейки со списками
2012-09-21 14:31 http://forum.msexcel.ru/profiles/jim-u4457.html
или вариант с ВПРом


а если в списке не буквы будут, а какие то слова (фамилии может и т.д. и т.п.), то КОДСИМВ не подойдет.

Poltava>> Re: Использование подстановочных знаков в функции СУММЕСЛИМН
2012-09-21 15:01 http://forum.msexcel.ru/profiles/poltava-u39021.html
А вы уверенны что этот файл никогда не будут пытаться открыть 2003 экселем?

grade86>> есть ли в ексель аналог списоков рассылки из ворда
2012-09-21 15:32 http://forum.msexcel.ru/profiles/grade86-u152891.html
есть следующая задача

шаблон счет фактуры на листе1, назовем его мордой. На листе2 двухмерный массив с выгрузкой из бд где собственно все данные по счетам-фактурам, назовем его БД.

собственно в ворде есть фича для спам рассылок, когда морда в виде .doc файла, а массив в виде excel. И в вроде есть mailing lists где стрелочками вперед-назад по указанному столбцу в БД можно перебирать данные в морде из одиночной строки. Можно массово все на печать пустить и т.д.

есть ли аналог в екселе или надо на вба писать?

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

toreto>> Re: Зависимые ячейки со списками
2012-09-21 16:07 http://forum.msexcel.ru/profiles/toreto-u152882.html
Вы формулу во вторую ячейку ставили?

и в 1 и во 2ую

toreto>> Re: Зависимые ячейки со списками
2012-09-21 16:11 http://forum.msexcel.ru/profiles/toreto-u152882.html
или вариант с ВПРом


а если в списке не буквы будут, а какие то слова (фамилии может и т.д. и т.п.), то КОДСИМВ не подойдет.

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

Pelena>> Re: Зависимые ячейки со списками
2012-09-21 16:38 http://forum.msexcel.ru/profiles/pelena-u149065.html
Непонятно, зачем во второй ячейке список, если есть прямая зависимость с первой.
Если не нравится формула с КОДСИМВ, попробуйте во вторую ячейку формулу
Код:
=ПОИСКПОЗ(A4;{"А";"Б";"В";"Г";"Д"})


toreto>> Re: Зависимые ячейки со списками
2012-09-21 16:43 http://forum.msexcel.ru/profiles/toreto-u152882.html
Непонятно, зачем во второй ячейке список, если есть прямая зависимость с первой.
Если не нравится формула с КОДСИМВ, попробуйте во вторую ячейку формулу
Код:
=ПОИСКПОЗ(A4;{"А";"Б";"В";"Г";"Д"})

кстати во 2 ячейке списка может и не быть;) главное чтобы значению А в 1 ячейке было равно значение 1 во 2ой ячейке, кроме этих 2 ячеек в документе больше ничего не должно присутствовать.
То есть я открываю таблицу, из списка в 1ой ячейке выбираю (например "Б") а во 2ой ячейке должно автоматический быть значение равное "2"

margoshat>> Re: Как собрать данные с нескольких листов без использования сводной таблицы
2012-09-21 16:46 http://forum.msexcel.ru/profiles/margoshat-u148288.html
По всей видимости не дружу с диспетчером имен
список создала
дала название
а формула выдает значение = 0
что я не так делаю, подскажите пожалста

cheshiki1>> Re: Зависимые ячейки со списками
2012-09-21 16:47 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html
Цитировать
То есть я открываю таблицу, из списка в 1ой ячейке выбираю (например "Б") а во 2ой ячейке должно автоматический быть значение равное "2"
так предложенные формулы для этого отлично подходят.


Pelena>> Re: Зависимые ячейки со списками
2012-09-21 16:47 http://forum.msexcel.ru/profiles/pelena-u149065.html
Да, уже все поняли, что Вам нужно, и предложили решения. Что ни одно не подошло?

toreto>> Re: Зависимые ячейки со списками
2012-09-21 16:49 http://forum.msexcel.ru/profiles/toreto-u152882.html
Цитировать
То есть я открываю таблицу, из списка в 1ой ячейке выбираю (например "Б") а во 2ой ячейке должно автоматический быть значение равное "2"
так предложенные формулы для этого отлично подходят.



а   1
б   2
в   3
г   4
д   5

в документе негде поместить выборку,в нем ьтолько 2 ячейке, 1 и 2ая


cheshiki1>> Re: Зависимые ячейки со списками
2012-09-21 16:52 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html
это я так для информации оставил (не думаю что в книге нельзя найти немного места - даже на другом листе).
Ваши ячейки в файле то работают как вам нужно?

margoshat>> Re: Как собрать данные с нескольких листов без использования сводной таблицы
2012-09-21 16:55 http://forum.msexcel.ru/profiles/margoshat-u148288.html
Включены, всегда
очень многое приходится делать на макросах

Serge 007>> Re: Зависимые ячейки со списками
2012-09-21 16:55 http://forum.msexcel.ru/profiles/serge_007-u25260.html
...во 2 ячейке списка может и не быть...
Его там и не должно быть, потому что он нафиг не нужен. toreto, Вам уже несколько правильных вариантов решений предложили, Вам настолько лень потратить пару минут что бы их попробовать?


toreto>> Re: Зависимые ячейки со списками
2012-09-21 17:09 http://forum.msexcel.ru/profiles/toreto-u152882.html
я все перепробовал
Собственно вот ( вложение)что нужно сделать

cheshiki1>> Re: Зависимые ячейки со списками
2012-09-21 17:19 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html
тогда без таблицы соответствий ну не как. Формула получится очень громоздкая если в неё все данные вписывать.
если на этом листе нет места то таблицу можно разместить на другом и тянуть данные из неё. если нужно чтоб таблицы не было видно - скрыть второй лист с глаз долой.

Serge 007>> Re: Зависимые ячейки со списками
2012-09-21 17:22 http://forum.msexcel.ru/profiles/serge_007-u25260.html
я все перепробовал
Ни чего Вы не пробовали, не надо обманывать.
Подходят все решения, кроме самого первого
Да и то, потому что Вы пример не выложили сразу

Код:
=ВПР(A4;G4:H8;2;)

Можно и без списка на листе, но удобно это точно не будет
Код:
=ПРОСМОТР(A4;{"МИ ФНС России № 10 по Волгоградской области";"МИ ФНС России № 9 по Волгоградской области";"МИ ФНС России № 11 по Волгоградской области";"ИФНС России по Центральному району г. Волгограда";"ИФНС России по Дзержинскому району г. Волгограда"};{34060;34059;34061;34046;34045})


toreto>> Re: Зависимые ячейки со списками
2012-09-21 17:32 http://forum.msexcel.ru/profiles/toreto-u152882.html
я все перепробовал
Ни чего Вы не пробовали, не надо обманывать.
Подходят все решения, кроме самого первого
Да и то, потому что Вы пример не выложили сразу

Код:
=ВПР(A4;G4:H8;2;)

Можно и без списка на листе, но удобно это точно не будет
Код:
=ПРОСМОТР(A4;{"МИ ФНС России № 10 по Волгоградской области";"МИ ФНС России № 9 по Волгоградской области";"МИ ФНС России № 11 по Волгоградской области";"ИФНС России по Центральному району г. Волгограда";"ИФНС России по Дзержинскому району г. Волгограда"};{34060;34059;34061;34046;34045})

=ПРОСМОТР (=LOOKUP)? ошибка 502
=ВПР (VLOOKUP) или (как на латинском формула называется?)

cheshiki1>> Re: Зависимые ячейки со списками
2012-09-21 17:42 http://forum.msexcel.ru/profiles/cheshiki1-u14363.html
Цитировать
=ПРОСМОТР (=LOOKUP)
=ВПР (VLOOKUP)
Да.

Serge 007>> Re: Зависимые ячейки со списками
2012-09-21 17:49 http://forum.msexcel.ru/profiles/serge_007-u25260.html
=ПРОСМОТР (=LOOKUP)? ошибка 502
=ВПР (VLOOKUP) или (как на латинском формула называется?)
Кроме перевода названий нужно изменять разделители. По умолчанию в английской локали это запятая, а в русской - точка с запятой

См. вложение, в нём всё будет работать

Dmitr68>> Re: Зависимые ячейки со списками
2012-09-21 18:08 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
Сергей, ты забыл отсортировать по возрастанию.
Можно еще так:
=ПРОСМОТР(99;ПОИСК({"Дз":"Це":10:11:9};A4);{45:46:60:61:59}+34000)

ZORRO2005>> Re: Как собрать данные с нескольких листов без использования сводной таблицы
2012-09-21 22:27 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
По всей видимости не дружу с диспетчером имен
список создала
дала название
а формула выдает значение = 0
что я не так делаю, подскажите пожалста
В личке есть мой email. Пришлите свой файл.


ROS>> Решение двух задач в одном листе, наверное с помощью макроса
2012-09-22 11:48 http://forum.msexcel.ru/profiles/ros-u32107.html
Добрый день!
На одном листе необходимо решить две задачи, выделять значения если в динамике идёт их изменение по сравнению с предыдущими значениями  в строке и вторая - заливать ячейку если она отвечает условию.  Более подробно я описал в примере.
Сам пример это маленький отрезок файла, количество строк в полноценном файле может доходить до 10000, а столбцы/даты - в основном = месяцу, хотя возможно, потребуется данное решение и для всех дат равное году.
Надеюсь на вашу помощь.

Retiree>> Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 10:35 http://forum.msexcel.ru/profiles/retiree-u152986.html
На прилагаемой схеме прямые, они накладываются друг на друга. Нужна формула для подсчета длины участка без учета наложений.
Из схемы видно, что длина участка равна 40. Файл xls прилагается.

Dmitr68>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 10:50 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
Если разрывов не бывает, то просто:
Код:
=МАКС(C2:C9)-МИН(B2:B9)


KuklP>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 10:51 http://forum.msexcel.ru/profiles/kuklp-u39713.html
 Улыбка
=МАКС(B2:C9)-МИН(B2:C9)

Retiree>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 10:54 http://forum.msexcel.ru/profiles/retiree-u152986.html
Улыбка
=МАКС(B2:C9)-МИН(B2:C9)

Спасибо за быстрый ответ.
Разрывы есть, мой косяк, думал, что они особо не будут влиять.
Это сильно повлияет на формулу?

Dmitr68>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 11:01 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
Нет, если нужны только максимум и минимум.
Если есть разрыв(ы), то вопрос - разрывы считать?
Или считать каждый участок и выбрать максимальный?

KuklP>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 11:37 http://forum.msexcel.ru/profiles/kuklp-u39713.html
ЮДФ для общей длины:
Код:
Public Function MyCount&(r As Range)
    Dim a, i&, j&
    a = r
    ReDim b(Application.Max(a))
    For i = 1 To UBound(a)
        For j = a(i, 1) To a(i, 2)
            b(j) = 1
        Next j, i
    MyCount = Application.CountA(b) - 1
End Function


Retiree>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 11:56 http://forum.msexcel.ru/profiles/retiree-u152986.html
Нет, если нужны только максимум и минимум.
Если есть разрыв(ы), то вопрос - разрывы считать?
Или считать каждый участок и выбрать максимальный?


Вот в этом то и дело, разрывы не должны учитываться. И не должны учитываться захлесты.

KuklP>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 12:02 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Вы мой пример видели?

Retiree>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 12:45 http://forum.msexcel.ru/profiles/retiree-u152986.html
Вы мой пример видели?

Видел, спасибо.
Мне он не совсем понятен, а мне бы хотелось самому все понять.
Попробую обкатать на реальных данных.
Результат сообщу позже.

olexey>> Как раскинуть невязку в углы...
2012-09-23 16:34 http://forum.msexcel.ru/profiles/olexey-u153000.html
Доброе время суток!
есть угловая невязка 1,70", есть три угла записанные в разных ячейках в столбик.
Вопрос: как сделать что бы автоматически  невязка 1,70" раскидалась в соседних ячейках напротив данных углов. Причем понятно, что напротив наименьшего угла должна быть поправка 0,56", а напротив оставшихся двух по 0,57".
С помощью какого алгоритма формул это все автоматизировать?
Заранее спасибо!

ROS>> Re: Решение двух задач в одном листе, наверное с помощью макроса
2012-09-23 17:43 http://forum.msexcel.ru/profiles/ros-u32107.html
Добрый день.
Что то нет решений, неужели ничего нельзя придумать? Слишком сложный пример?

Poltava>> Re: Как раскинуть невязку в углы...
2012-09-23 18:33 http://forum.msexcel.ru/profiles/poltava-u39021.html
Пример с файлом приложите и подробней распишите что за невязка по какому принципу распределить и между какими углами.

ZORRO2005>> Re: Решение двух задач в одном листе, наверное с помощью макроса
2012-09-23 18:40 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
Слишком сложный пример?
Бывают и посложнее.
Использовал [url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url].


Михаил С.>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 18:48 http://forum.msexcel.ru/profiles/mihail_s-u26973.html
Вы мой пример видели?
Серег, чет у тебя не сходится... Плачущий
Если я правильно понял задачу.

зы. Вообще-то для длин ноль не считается. Тогда вообще должно быть 37 а не 40

ROS>> Re: Решение двух задач в одном листе, наверное с помощью макроса
2012-09-23 18:59 http://forum.msexcel.ru/profiles/ros-u32107.html
Спасибо, ZORRO2005 ! Пока в полной мере не могу оценить что получилось, так как под рукой андройд. Если действительно всё так просто то прошу прощения за беспокойство, наверное  мог бы справиться и сам, видно мне захотелосб что-нибудь крутого с макросом, прибамбасами всякими Смеющийся

KuklP>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 19:03 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Миш, ты будешь смеяться, но я открыл твой файл, выделил D11, нажал F2, потом Enter и смотри скрин. А в моем файле так уже посчитано. Не знаю, что ты там делал, что у тебя посчитало 40 Улыбка
Цитировать
зы. Вообще-то для длин ноль не считается.
Как так? Ты рулеткой меряешь начиная с первого сантиметра? Шокирован

Михаил С.>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 19:19 http://forum.msexcel.ru/profiles/mihail_s-u26973.html
А у меня в твоем файле не срабатывает ни F9, ни F2-Enter. Все равно сорок показывает. Да и в моем тоже.

Михаил С.>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 19:25 http://forum.msexcel.ru/profiles/mihail_s-u26973.html
Цитировать
зы. Вообще-то для длин ноль не считается.
Как так? Ты рулеткой меряешь начиная с первого сантиметра? Шокирован
Я имею ввиду, что если считать количество чисел от 0 до 40, то будет 41, а если длину - то 40. В моем примере нулевой столбец лишний.

KuklP>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 19:32 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Миш, а попробуй прогнать формулу по шагам. Похоже, у тебя события не срабатывают. На названии формулы в коде нажми F9. Строка окрасится в коричневый. Потом поменяй любую цифру в проверяемом массиве.

KuklP>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 19:41 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Чтоб на каждый чих дергалась, после названия функции в коде можно вставить:
Application.Volatile

Михаил С.>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 20:01 http://forum.msexcel.ru/profiles/mihail_s-u26973.html
По шагам прогнал - все отрабатывает, но все равно 40 считает.

KuklP>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 20:21 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Понял, Миш. Запустил в 2010 - та же ерунда. Неправильно считает counta. Замени на:
MyCount = Application.Sum(b) - 1
Это мелкие виноваты! В 2003 и 2007 считает правильно.

Михаил С.>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-23 20:28 http://forum.msexcel.ru/profiles/mihail_s-u26973.html
Ну я тоже до этого
Цитировать
MyCount = Application.Sum(b) - 1
допер, правда чуть позже, чем ты на форум выложил.

olexey>> Re: Как раскинуть невязку в углы...
2012-09-23 20:31 http://forum.msexcel.ru/profiles/olexey-u153000.html
вложил кусочек из лабы (где-то 1% всей лабы по высшей геодезии - "редукування трикутника з еліпсоїда на площину") 

в файле есть -1,70 , эти -1,70  надо раскинуть в три угла А, В, С, если бы было значение -1,71, то без проблем кидали бы по 0,57 в каждый угол и на этом все. Но 1,70 на три "не делиться", поэтому надо кинуть 0,57, 0,57, 0,56 в угли В, С, А соответственно. В угол А идет наименьшее значение (0,56), потому что этот угол меньше других, значит стороны треугольника которые сделали этот угол самые длинные, если это две длиннейшие стороны в треугольнике, значит угол между ними измерян наиболее точно, поэтому поправку туда кидаем наименьшую.
Я не могу это все автоматизировать. Я хочу что бы значение ячейки D16  автоматом распределялось в ячейки Е11, Е12, Е13, если  D16 делится на 3, то в Е11, Е12, Е13 одинаковые значения, сумма которых составляет D16, все гладко. Когда нет - то получается как писал выше.
Как это...

ROS>> Re: Решение двух задач в одном листе, наверное с помощью макроса
2012-09-23 22:34 http://forum.msexcel.ru/profiles/ros-u32107.html
Спасибо большое, ZORRO2005!
Всё прекрасно работает, всё таки сам бы не справился, очень интересные формулы.  Оба на!

olexey>> Re: Как раскинуть невязку в углы...
2012-09-23 22:47 http://forum.msexcel.ru/profiles/olexey-u153000.html
это вообще возможно осуществить?

ShAM>> Re: Как раскинуть невязку в углы...
2012-09-23 23:59 http://forum.msexcel.ru/profiles/sham-u106530.html
Цитировать
это вообще возможно осуществить?
Думаю,да. См. приложенный файл.
Если следующий после А меньший должен быть С, то догадаетесь, как поменять.

ЗЫ: Только странное место ("Общение") Вы выбрали для темы.


MCH>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-24 03:51 http://forum.msexcel.ru/profiles/mch-u48782.html
Без макросов:
Формула массива:
Код:
=СУММ(ЗНАК(МУМНОЖ((СТРОКА(ИНДЕКС(A:A;1):ИНДЕКС(A:A;МАКС(C2:C9)-МИН(B2:B9)+1))-1+МИН(B2:B9)>=ТРАНСП(B2:B9))*(СТРОКА(ИНДЕКС(A:A;1):ИНДЕКС(A:A;МАКС(C2:C9)-МИН(B2:B9)+1))-1+МИН(B2:B9)<=ТРАНСП(C2:C9));1^B2:B9)))-1


MCH>> Re: Прошу знатоков помочь, задача трудная. Под силу только сильным логикам.
2012-09-24 04:05 http://forum.msexcel.ru/profiles/mch-u48782.html
еще вариант UDF:
Код:
Function MyCount2&(r As Range)
    Dim a, i&, b As Range, m&
    a = r
    m = Application.Min(a)
    For i = 1 To UBound(a)
        If b Is Nothing Then
            Set b = Range(Cells(a(i, 1) - m + 1, 1), Cells(a(i, 2) - m + 1, 1))
        Else
            Set b = Union(b, Range(Cells(a(i, 1) - m + 1, 1), Cells(a(i, 2) - m + 1, 1)))
        End If
    Next i
    MyCount2 = b.Count - 1
End Function


olexey>> Re: Как раскинуть невязку в углы...
2012-09-24 13:49 http://forum.msexcel.ru/profiles/olexey-u153000.html
да, оно, спасибо большое!
вроде так просто теперь...)
первый раз пишу здесь, поэтому место неудачное выбрал, как я понял

boa>> Re: начало работы в режиме конструктора, с чего начать?
2012-09-24 15:42 http://forum.msexcel.ru/profiles/boa-u4698.html
сохраните книгу в формате .xlsm, в [abbr=правой кнопкой мыши по ярлычку листа -> Исходный текст]модуль листа[/abbr] "ФОРМА" скопируйте следующий код:
Код:
Private Sub CommandButton1_Click()
        'находим последнюю заполненную строку в списке
        iRow = Sheets("Лист1").Cells(Rows.Count, 1).End(xlUp).Row
        iRow = iRow + 1 'Строка для новой записи
'        Дальше данные из формы переносим в нужные ячейки
'        у каждого поля созданной вами формы есть имя, обращаясь к нему получим значения
    With Sheets("ФОРМА")
        Sheets("Лист1").Cells(iRow, 1) = .TextBox1.Value 'Название
'        .
'        .
'        .
        Sheets("Лист1").Cells(iRow, 3) = .TextBox4.Value & ", " & .TextBox5.Value & ", " & .TextBox6.Value & " и т.д." 'Юр. адрес, почтов., склад
'        .
'        .
'        .
        Sheets("Лист1").Cells(iRow, 7) = .TextBox40.Value 'подкатегория
    End With
End Sub



iKriss>> из формы на лист диапазоном + статус
2012-09-24 16:57 http://forum.msexcel.ru/profiles/ikriss-u147911.html
Добрый день, господа. Вновь к вам за помощью.
Прошу помощи в  создании макроса, коий следующим образом должен работать:
1. Во вкладке "выдача актов" вводим в ячейки B5, С5 и B8, С8 начальные и конечные номера выдаваемых документов (т.е. выдаем акты с 101 по 201 номера - того 100 штук).
2. Выбираем из списка мастера.
3. Нажимаем кнопочку "выдать акты и БСО" на той же вкладке -макрос переносит данные из формы во вкладку "лог выданных", где прописывает все 100 номеров выданных актов по порядку, проставляя дату выдачи и, в столбце "статус" - "выдан"
4. После передачи форма очищается.
5. Также оставить возможность вбивать номера выдаваемых актов по одному, и по нажатию той же кнопочки отправлять их в лог.

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

HODIC>> Подстановка знаений по условию
2012-09-25 11:03 http://forum.msexcel.ru/profiles/hodic-u134744.html
Нужна помощь или совет какую применить формулы для решения задачи.

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

Если коды идут подрят, решение есть, но а если в перемешку и их может большое кол-во, как решить?

Serge 007>> Re: Подстановка знаений по условию
2012-09-25 11:06 http://forum.msexcel.ru/profiles/serge_007-u25260.html
HODIC, я Вам вчера здесь ответил
Вы написали:
Цитировать
спасибо, то что нужно.

Зачем кроссить?


HODIC>> Re: Подстановка знаений по условию
2012-09-25 11:09 http://forum.msexcel.ru/profiles/hodic-u134744.html
задачу усложнили, а на форум сегодня не получается зайти, выдает ошибку

Serge 007>> Re: Подстановка знаений по условию
2012-09-25 11:13 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Код:
=ИНДЕКС(C$3:U$16;ПОИСКПОЗ(I$20;B$3:B$16);ПОИСКПОЗ(J20;C$2:U$2))


HODIC>> Re: Подстановка знаений по условию
2012-09-25 11:21 http://forum.msexcel.ru/profiles/hodic-u134744.html
Спасибо, работает
=ИНДЕКС(C$3:U$16;ПОИСКПОЗ(I20;B$3:B$16);ПОИСКПОЗ(J20;C$2:U$2)) (

Poltava>> Re: Как раскинуть невязку в углы...
2012-09-25 14:02 http://forum.msexcel.ru/profiles/poltava-u39021.html
Немного задержался с ответом но позволю себе дополнить ув. ShAM
olexey писал что
Цитировать
идет наименьшее значение (0,56), потому что этот угол меньше других,
Судя по беспорядочности следования самый маленький угол не всегда в D12 следовательно для корректной работы после изменения углов(вдруг самым меньшим станет угол в D11) нужно менять формулы. Как по мне это не удобно потому во вложении сделал монстрика чтоб сам определял самый меньший угол.

iKriss>> перенос данных диапазоном, помогите с синтаксисом
2012-09-25 17:56 http://forum.msexcel.ru/profiles/ikriss-u147911.html
Добрый день.
Подскажите, пожалуйста, как можно задать в макросе копирование строк формы на другой лист, причем без необходимости указания ячейки для копирования для каждого значения. Т.е. есть диапазон A1-A10 в форме, туда могут заносится некие числа, причем диапазон может быть заполнен как полностью, так и частично. По нажатию кнопки все внесенные значения переносятся в диапазон B2-B12 на другом листе. Пока умею только вот так переносить:
Код:
PS = Sheets("Лог").Range("A" & Rows.Count).End(xlUp).Row + 1
    Sheets("Лог").Cells(PS, 1) = Now
    Sheets("Лог").Cells(PS, 2) = Range("B4")
    Sheets("Лог").Cells(PS, 3) = Range("C7")
    Sheets("Лог").Cells(PS, 4) = Range("C8")
    Sheets("Лог").Cells(PS, 5) = Range("C9")

Как можно по-другому переносить значения?
Хотелось бы понять, как именно нужно задать диапазон, в который вносятся значения и как наладить перенос?
Логика работы предполагается следующая:
1. Прога определяет количество внесенных в первый диапазон значений.
2...

Wasilic>> Re: перенос данных диапазоном, помогите с синтаксисом
2012-09-26 00:38 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Один из множества вариантов копирования диапазона.
Код:
PS1 = Sheets("Лист1").Range("A" & Rows.Count).End(xlUp).Row
PS2 = Sheets("Лист2").Range("A" & Rows.Count).End(xlUp).Row+1
Dim otkuda As Range
Dim kuda As Range
Set otkuda = Sheets("Лист1").Range("A1:B" & PS1)
Set kuda = Sheets("Лист2").Range("A" & PS2)
otkuda.Copy kuda
А здесь много готовых решений на VBA:
http://msoffice.nm.ru/faq/macros.htm



Wasilic>> Re: из формы на лист диапазоном + статус
2012-09-26 01:19 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Так наверное?

daria89>> Настройка предварительного просмотра и печати
2012-09-26 09:33 http://forum.msexcel.ru/profiles/daria89-u111015.html
На старом ПК у меня автоматом стояла настройка печати вместе с предварительным просмотрим, т е при нажатии "Печать" появляется окошечко печати, на котором можно выбрать все параметры печати  (столбцы на листе, строки на листе, предварительный просмотр, кол-во и тд). Сейчас же при нажатии печать выходит стандартное окошечко. Как изменить именно вид печати? К сожалению не знаю как еще объяснить. Приложить могу только текущий образец окошка "Печать" (т е то, что я не могу исправить). Заранее спасибо

Poltava>> Re: Настройка предварительного просмотра и печати
2012-09-26 10:29 http://forum.msexcel.ru/profiles/poltava-u39021.html
если я вас правильно понял то используйте кнопку предварительного просмотра

daria89>> Re: Настройка предварительного просмотра и печати
2012-09-26 10:43 http://forum.msexcel.ru/profiles/daria89-u111015.html
если я вас правильно понял то используйте кнопку предварительного просмотра
Спасибо за ответ, но нет, я не про это. Было одно окно, которое появлялось сразу при нажатии "Печать" - выходило окошко, в котором одновременно и предварительный просмотр и разметки страницы и ориентация, выбор принтера, бумаги.

daria89>> Re: Настройка предварительного просмотра и печати
2012-09-26 10:50 http://forum.msexcel.ru/profiles/daria89-u111015.html
если я вас правильно понял то используйте кнопку предварительного просмотра
Спасибо за ответ, но нет, я не про это. Было одно окно, которое появлялось сразу при нажатии "Печать" - выходило окошко, в котором одновременно и предварительный просмотр и разметки страницы и ориентация, выбор принтера, бумаги.
Нашла в интернете часть картинки того, что  я имела ввиду.

Poltava>> Re: Настройка предварительного просмотра и печати
2012-09-26 10:55 http://forum.msexcel.ru/profiles/poltava-u39021.html
Так это стандартный пункт печати в 2010 офисе. А у вас какой?

daria89>> Re: Настройка предварительного просмотра и печати
2012-09-26 11:06 http://forum.msexcel.ru/profiles/daria89-u111015.html
Так это стандартный пункт печати в 2010 офисе. А у вас какой?
ОМГ! Уверена была, что 2010, оказывается 2007... Спасибо  огромное, помогли блондинке.

iKriss>> Re: из формы на лист диапазоном + статус
2012-09-26 12:31 http://forum.msexcel.ru/profiles/ikriss-u147911.html
Да, именно так, спасибо!

iKriss>> Re: перенос данных диапазоном, помогите с синтаксисом
2012-09-26 12:37 http://forum.msexcel.ru/profiles/ikriss-u147911.html
Супер, спасибо!
А теперь еще вопрос, если можно ))
как сделать так, чтобы макрос проверял диапазон "kuda", и, в случае совпадений значений, введенных в диапазон "otkuda", проставлял справа от таких же значений диапазона "kuda" некий текст?
Спасибо заранее!

Sasa>> Макрос, преобразующий вид документа
2012-09-26 15:42 http://forum.msexcel.ru/profiles/sasa-u153180.html
Люди добрые, очень нужна помощь! Подскажите, пожалуйста, есть два файлика во вложении. Так вот нужно записать макрос, чтобы из вида тест1 в вид тест2 перегонял. Мыслей вообще никаких. Направьте в нужную сторону. Причем у каждого человека могут быть какие-то начисления в тест1(к примеру оклад), а если их нет, то нужно чтобы в новый вид соответственно 0 ставил....

ShAM>> Re: Как раскинуть невязку в углы...
2012-09-26 16:26 http://forum.msexcel.ru/profiles/sham-u106530.html
Poltava, согласен. Хороший монстрик.


Svetlasha>> Может кто-нибудь подскажет?
2012-09-26 20:45 http://forum.msexcel.ru/profiles/svetlasha-u153192.html
Может кто-нибудь подскажет, какие формулы нужно писать к этой задачке? Совсем у меня не получается решение...  Обеспокоенный


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


В избранное