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

Форум по Microsoft Excel

  Все выпуски  

edmar07>> Re: увеличение


Форум по Microsoft Excel

Выпуск 14
от 2013-04-11

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

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



edmar07>> Re: увеличение
2013-04-03 11:37 http://forum.msexcel.ru/index.php?action=profile;u=

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

Даже такой "колхозный" вариант, очень даже СУПЕР дальше допилю ... ну если клепок хватит)))))

Спасибо!!!

p.s.
подскажи будь ласка, а как ты примечания вставил во все ячейки? ну точно ж не вручную ...


Serge 007>> Re: Число прописью
2013-04-03 13:24 http://forum.msexcel.ru/index.php?action=profile;u=
Ответ есть здесь

edmar07>> Вывод результата
2013-04-03 13:53 http://forum.msexcel.ru/index.php?action=profile;u=
Привет!
И опять за советом-помощью !!!

как можно узнать какие результаты использовались при подсчете ?

спасибо!

файлик с примером  прилагаю

NooBasTiK>> Re: увеличение
2013-04-03 14:59 http://forum.msexcel.ru/index.php?action=profile;u=
У меня надстройка есть для excel, там есть функция специальная.

edmar07>> Re: увеличение
2013-04-03 15:45 http://forum.msexcel.ru/index.php?action=profile;u=
У меня надстройка есть для excel, там есть функция специальная.

???? т.е. я повторить не смогу????

iron priest>> Re: Вывод результата
2013-04-03 17:11 http://forum.msexcel.ru/index.php?action=profile;u=
даты только по возрастанию будут?

edmar07>> Re: Вывод результата
2013-04-03 17:25 http://forum.msexcel.ru/index.php?action=profile;u=
даты только по возрастанию будут?

массив данных ( одной датой может быть не одно значение) за сутки, на следующий день добавляются данные

но однозначно, или возрастают или убывают ))

Extra>> Функции ВПР и СЦЕПИТЬ
2013-04-03 17:36 http://forum.msexcel.ru/index.php?action=profile;u=
Вопрос: Есть ячейки с Фамилией и Именем, необходимо найти данный текст в другом массиве с Фамилией Именем и Отчеством, и вернуть значение Фамилия Имя Отчество. Какую формулу с текстовыми функциями можно применить?

cheshiki1>> Re: Текстовые функции ВПР,ПОИСК,НАЙТИ,ПСТР
2013-04-03 17:50 http://forum.msexcel.ru/index.php?action=profile;u=
ВПР по идее должно подойти. Более точно при наличии примера.
п.с. кто вам сказал что ВПР текстовая ф-ция.

Наталя Священко>> Как заменить идентификаторы реальными названиями?
2013-04-03 17:56 http://forum.msexcel.ru/index.php?action=profile;u=
Есть таблица - идентификатор, название. И есть вторая в которой тот же идентификатор и куча колонок с данными, в первой колонке идентификаторы могут повторятся. Как во второй таблице заменить или добавить названия этих идентификаторов выбирая их на основе первой таблицы?

Extra>> Re: Текстовые функции ВПР,ПОИСК,НАЙТИ,ПСТР
2013-04-03 18:55 http://forum.msexcel.ru/index.php?action=profile;u=
Пример вложен.

Хотелось бы увидеть формулу, ВПР подходит, но необходимо использование еще текстовых функций, каких и в каком виде, вот вопрос.

edmar07>> Re: увеличение
2013-04-03 18:59 http://forum.msexcel.ru/index.php?action=profile;u=
У меня надстройка есть для excel, там есть функция специальная.
кстати, а можно поменять цвет фона и шрифта?

cheshiki1>> Re: Текстовые функции ВПР,ПОИСК,НАЙТИ,ПСТР
2013-04-03 19:27 http://forum.msexcel.ru/index.php?action=profile;u=
=ВПР(СЦЕПИТЬ(B2;"*");FullName!$B$2:$B$1110;1;0)применена текстовая ф-ция "СЦЕПИТЬ(B2;"*")" её можно записать по другому B2&"*"

Wasilic>> Re: Как заменить идентификаторы реальными названиями?
2013-04-03 19:41 http://forum.msexcel.ru/index.php?action=profile;u=
Есть таблица - идентификатор, название. И есть вторая
А, у кого они есть? :-\
Имеется ввиду - п.2 [url=http://forum.msexcel.ru/pravila_foruma/pravila_foruma-t129.0.html]правил_форума[/url].

Evgen_Tim>> Подключение к базе данных (Орокл)
2013-04-03 19:59 http://forum.msexcel.ru/index.php?action=profile;u=
Здравствуйте. У меня такая проблемка. Есть программа на VBA  которая позволяет считывать информацию с базы данных . Все работает нормально на обычном компе с 32 разр. процессором. Но не работает на 64 разр. компьютерах с оперционной системой Win-8. Может кто сталкивлся с подобной проблемой, подскажите.
номер ошибки во вложенном файле.

Мелик Нагапетян>> Не могу понять как задать интервал возраста.
2013-04-03 20:32 http://forum.msexcel.ru/index.php?action=profile;u=
Собственно проблема в том, что не могу задать интервал возраста...

_Boroda_>> Re: Подключение к базе данных (Орокл)
2013-04-03 21:10 http://forum.msexcel.ru/index.php?action=profile;u=
Пишу программы на VBA для Excel и Access.
А, мастер VBA и "Орокл", который так и не ответил мне в личке?
подскажите.
Подскажу: вообще-то версия VBA изменилась. Обратите внимание на тип данных Long
и PtrSafe для Declare.
Ну и еще там куча всего.

NooBasTiK>> Re: увеличение
2013-04-03 23:41 http://forum.msexcel.ru/index.php?action=profile;u=
У меня надстройка есть для excel, там есть функция специальная.
кстати, а можно поменять цвет фона и шрифта?
Да пока надстройку такую не поставите или найдете замену какую-то ей

nick79087>> удалить несколько разных данных из ячейки
2013-04-04 00:35 http://forum.msexcel.ru/index.php?action=profile;u=
Доброго времени суток
Есть столбец с данными о размерах в цифрах; разделителями являются пробелы, символ "x", текстовые значения "мм" и "mm". Причем определенного порядка нет (может быть разное количество пробелов, могут быть или не быть подставлены "мм" и "mm"). Пример:
212 x 234 x 26
312x324x365
418x431 x47 мм
515x  542x57mm
615 x643x56мм

Единственное повторяющееся условие - разделитель "x" есть всегда. Можно ли как-то при помощи формулы (не макроса) убрать из ячеек все пробелы и лишние символы, чтобы свести к единому формату, вот такому - ЧИСЛОxЧИСЛОxЧИСЛО .
Пробовал функцию ПОДСТАВИТЬ(A1;" ";""), пробелы убрал. Как-то можно продлить формулу чтобы убрать и другие ненужные куски текста?
Заранее благодарен.

DV68>> Re: удалить несколько разных данных из ячейки
2013-04-04 00:50 http://forum.msexcel.ru/index.php?action=profile;u=
Можно так:
=ПОДСТАВИТЬ(ПСТР(A1;1;ПРОСМОТР(10;-ПСТР(A1;СТРОКА(1:99);1);СТРОКА(1:99)));" ";)А пробелы можно убрать и через Ctrl+H

Pelena>> Re: Не могу понять как задать интервал возраста.
2013-04-04 08:08 http://forum.msexcel.ru/index.php?action=profile;u=
Как-то так
=СУММЕСЛИМН($C$11:$C$146;$A$11:$A$146;"<="&J15;$A$11:$A$146;">="&I15;$B$11:$B$146;K14)

edmar07>> Re: увеличение
2013-04-04 09:33 http://forum.msexcel.ru/index.php?action=profile;u=
Цитировать
Да пока надстройку такую не поставите или найдете замену какую-то ей
а как надстройка называется?, я поискал ... выдало myAddin но там такой функции не нашел(

кстати, не пойму почему Ваш пример в моем проекте не работает!!!
если вставляю страницу без изменений - то нормально, а если запчасти... то тупит(((

точнее, не вываливается примечание если навожу курсор, а сверху этих ячеек есть рисунок. В вашем примере все работает (примечание вываливается) а в моем проекте - НЕТ ((((
???

iron priest>> Re: Вывод результата
2013-04-04 10:21 http://forum.msexcel.ru/index.php?action=profile;u=
если даты по возрастанию

Extra>> Re: Текстовые функции ВПР,ПОИСК,НАЙТИ,ПСТР
2013-04-04 11:28 http://forum.msexcel.ru/index.php?action=profile;u=
Спасибо. Формула работает.

Prist>> Re: увеличение
2013-04-04 12:48 http://forum.msexcel.ru/index.php?action=profile;u=
Цитировать
Да пока надстройку такую не поставите или найдете замену какую-то ей
а как надстройка называется?, я поискал ... выдало myAddin но там такой функции не нашел(
Может плохо искали? :) - Создание примечаний

Примечание у Вас не показывается, потому что Вы курсор наводите на рисунок, а не на ячейку. Т.е. рисунок перехватывает позицию курсора.

edmar07>> Re: Вывод результата
2013-04-04 13:20 http://forum.msexcel.ru/index.php?action=profile;u=
если даты по возрастанию
спасибо!!!
как вариант очень даже!!, тем более что альтернативы нет(((

ИvaN>> Копирование формулы
2013-04-04 13:20 http://forum.msexcel.ru/index.php?action=profile;u=
Доброго времени суток, прошу помочь составить формулу. В листе1 в ячейке А2 забита формула А2=A1+Лист2!A1 со ссылкой на значения из листа2, при копировании этой формулы в следующую ячейку она меняется на А3=A2+Лист2!A2. Как мне сделать, чтобы при копировании этой формулы в ячейку А3 у меня получалась формула следующего типа А3=A2+Лист2!A3 (т.е.  прибавлялась ячейка A3 из второго листа именно с адресом Лист2!A3, а не ячейка с адресом Лист2!A2), в ячейку А4 получалось А4=A2+Лист2!A4?

edmar07>> Re: увеличение
2013-04-04 13:34 http://forum.msexcel.ru/index.php?action=profile;u=

Цитировать
Примечание у Вас не показывается, потому что Вы курсор наводите на рисунок, а не на ячейку. Т.е. рисунок перехватывает позицию курсора.

в том-то и прикол!!! что в примере рисунок не перехватывает и все работает!!!!
а у меня, после вставки, как раз рисунок и перехватывает(((( а почему????

а еще заметил, что при нажатии правой мыши вываливаются разные меню хотя рисунок один и тот же!!!!!! тут я ваааще ничего не пойму!?!?!?

скрины скинул, може кто пояснит в чет дело?

Serge 007>> Re: увеличение
2013-04-04 13:49 http://forum.msexcel.ru/index.php?action=profile;u=
как примечания вставить во все ячейки? ну точно ж не вручную ...
Можно так (примечания добавятся в диапазон А1:А15):
Sub Comm()
 For Com = 1 To 15
  Range("A" & Com).AddComment
  Range("A" & Com).Comment.Text Text:=" Текст примечания № " & Com
 Next
End Sub


Олег*>> Как спрятать код макроса от редактирования пользователем?
2013-04-04 13:54 http://forum.msexcel.ru/index.php?action=profile;u=
Добрый день!

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

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

У меня Excel 2010, а у приятеля Excel 2003.

Serge 007>> Re: Копирование формулы
2013-04-04 14:02 http://forum.msexcel.ru/index.php?action=profile;u=
В листе1 в ячейке А2 формула А2=A1+Лист2!A1. Как мне сделать, чтобы при копировании этой формулы в ячейку А3 у меня получалась формула следующего типа А3=A2+Лист2!A3, в ячейку А4 получалось А4=A2+Лист2!A4?
Только вручную. Никакой логики в, которую можно выразить формулами, в подобных преобразованиях нет

Serge 007>> Re: Как спрятать код макроса от пользователя?
2013-04-04 14:05 http://forum.msexcel.ru/index.php?action=profile;u=
Поставьте пароль на проект. Это самое простое, удобное и надёжное решение.
Или скомпилируйте проект в DLL-ку, если знаете как это сделать.
Все остальные решения - так или иначе, это костыли

_Boroda_>> Re: Как спрятать код макроса от пользователя?
2013-04-04 14:11 http://forum.msexcel.ru/index.php?action=profile;u=
В Ecxel жмем Alt+F11 - вылезаем в VBA
там жмем Ctrl+R - вылезаем в окно проектов (если оно уже открыто, то этот шаг можно пропустить)
там жмем [abbr=клик правой кнопкой мыши]ПКМ[/abbr] в любом месте внутри нужного проекта, выбираем ВБАПроджектПроперти...
Поскольку вражеский Вы знаете, дальше разберетесь (там 2 вкладки)

edmar07>> Re: увеличение
2013-04-04 14:15 http://forum.msexcel.ru/index.php?action=profile;u=

Можно так (примечания добавятся в диапазон А1:А15):

Спасибо, Сергей!! с примечаниями разобрался, не могу поменять цвет фона примечания (их у меня аж 1700)
понимаю что там 3 строчки но не спец в этом(((

Олег*>> Re: Как спрятать код макроса от пользователя?
2013-04-04 14:19 http://forum.msexcel.ru/index.php?action=profile;u=
Serge 007 и _Boroda_
Спасибо за супер-оперативную подсказку, сейчас буду разбираться.
О результатах обязательно отпишусь.

Олег*>> Re: Как спрятать код макроса от пользователя?
2013-04-04 14:46 http://forum.msexcel.ru/index.php?action=profile;u=
Все, спасибо! Разобрался, проверил, работает!!!

В Ecxel жмем Alt+F11 - вылезаем в VBA
там жмем Ctrl+R - вылезаем в окно проектов
там жмем [abbr=клик правой кнопкой мыши]ПКМ[/abbr] в любом месте внутри нужного проекта, выбираем ВБАПроджектПроперти...
Поскольку Вражеский Вы знаете, дальше разберетесь (там 2 вкладки)
А я туда еще перед открытием этой ветки заглядывал и даже галку ставил, и даже пароль вводил, но почему-то не срабатывало. Наверно, это потому что я открытый файл, сохранил под другим именем (чтобы не портить оригинал), а потом оказалось, что запаролил не тот (из этих двух) который хотел. В результате получилось, что мог открывать и просматривать код макросов безо всяких паролей.
Тогда я решил, что такой возможности просто не существует, поскольку если бы была такая простая возможность, то я бы о ней обязательно знал :)  Короче говоря,  такая ущербная ло...

nick79087>> Re: удалить несколько разных данных из ячейки
2013-04-04 14:55 http://forum.msexcel.ru/index.php?action=profile;u=
наверное не совсем правильно сформулировал. нужно чтобы одна формула убирала из ячейки одновременно и пробелы, и какие-то текстовые значения.
я так понял - формула =ПОДСТАВИТЬ(ПСТР(A1;1;ПРОСМОТР(10;-ПСТР(A1;СТРОКА(1:99);1);СТРОКА(1:99)));" ";) убирает все то, что внесено в кавычках. тогда намного проще мой вариант: ПОДСТАВИТЬ(A1;" ";"")

_Boroda_>> Re: Как спрятать код макроса от пользователя?
2013-04-04 15:08 http://forum.msexcel.ru/index.php?action=profile;u=
Только учтите, что все это (пароль на VBA) вскрывается элементарно. Просто вручную, не говоря даже о спецпрограммах-вскрывашках.
Кстати, про это в правилах форума написано: "Запрещается обсуждение способов взлома защиты программ и файлов".
 
А надстройку можно сделать и видимой, и невидимой. По желанию.

cheshiki1>> Re: удалить несколько разных данных из ячейки
2013-04-04 15:10 http://forum.msexcel.ru/index.php?action=profile;u=
не правильно поняли.
Формула отсекает последние буквы и в полученном результате убирает пробелы. Если буквы кроме "Х" будут в середине то данная формула не будет верно работать.

Serge 007>> Re: Как спрятать код макроса от пользователя?
2013-04-04 15:27 http://forum.msexcel.ru/index.php?action=profile;u=
...пароль на VBA вскрывается элементарно...
Саш, ты что-то путаешь
Пароль на проект - это достаточно серьёзная защита, со сложным хэш-шифрованием. В отличие от паролей листов и книги Excel, вскрыть или подобрать пароль на проект VBA обычному юзеру на порядок сложней, а иногда и вообще невозможно, особенно если он не является специалистом в области хакерства :)

Олег*>> Re: Как спрятать код макроса от пользователя?
2013-04-04 15:50 http://forum.msexcel.ru/index.php?action=profile;u=
Только учтите, что все это (пароль на VBA) вскрывается элементарно. Просто вручную, не говоря даже о спецпрограммах-вскрывашках.
Кстати, про это в правилах форума написано: "Запрещается обсуждение способов взлома защиты программ и файлов".
Да какие там спецпрограммы :) Он (мой приятель) не знает даже, как в редактор VBA в Экселе перейти, а, скорее всего, даже не подозревает, что в Экселе вообще можно программировать как-то. Это я просто страхуюсь от того, чтобы он как-нибудь туда случайно все-таки не залез, что-нибудь там не испортил, а потом мне претензии не предъявлял, дескать, не работает твоя разработка.
А так я хоть буду наверняка знать, что он туда не лазил, ничего там не менял, и я могу в случае каких-нибудь проблем исходить из того, что там все осталось в том состоянии, в котором я ему все это дело вручил :)
 
А надстройку...


nick79087>> Re: удалить несколько разных данных из ячейки
2013-04-04 19:08 http://forum.msexcel.ru/index.php?action=profile;u=
Спасибо за разъяснение. как раз-таки буквы в середине тоже встречаются, поэтому предложенная формула только и делает то, что убирает пробелы.
есть ли какая-то возможность сделать в одной формуле обработку с помощью функции ПОДСТАВИТЬ по нескольким значениям?

Evgen_Tim>> Re: Подключение к базе данных (Орокл)
2013-04-04 19:53 http://forum.msexcel.ru/index.php?action=profile;u=
Добрый вечер!  Высылаю листинг программы. Не смогли бы посмотреть?

Allaire>> Заполнение воркшита из xml файла
2013-04-04 21:24 http://forum.msexcel.ru/index.php?action=profile;u=
Добрый день коллеги.
У меня вопрос к вам по поводу заполнения столбцов екселя значениями из xml файла. Трудность в том, что я не знаю где можно обойтись стандартными средствами, а где нужно кодить, да и задачка не из легких. В приложенном ексель файле имеется колонка Е (значения тэгов xml файла), и в столбцы J и K заносятся значения из связанных тегов. Т.е. нужно брать из екселя значение тэга (колонка Е), искать по нему соответствие в xml файле (xml_src.xml), к примеру как в строке 18 в ексель файле (тут заполнено вручную для примера), брать значение тэга Nm (<Name>Nm</Name>), и далее нужно найти два других связанных тэга (они являются складовой частью структуры <Element>): <TableName> и <FieldName> из них вытащить значения и внести в таблицу (ячейки J18 и K18), т.е. это будут FPAYHX и NAMEZ соответственно, как показано в екселе. Плохая штука в том, что значения тегов, по которым нужно искать связь повторяются (я не xml гуру, поэтому сложно сказать является ли это проблемой) и сам ф...

Poltava>> Re: удалить несколько разных данных из ячейки
2013-04-04 21:45 http://forum.msexcel.ru/index.php?action=profile;u=
Извените за глупое предположение но почему нельзя вот так
=ПОДСТАВИТЬ(ПОДСТАВИТЬ(СТРОЧН(ПОДСТАВИТЬ(C4;" ";""));"мм";"");"mm";"")

_Boroda_>> Re: Как спрятать код макроса от редактирования пользователем?
2013-04-04 22:48 http://forum.msexcel.ru/index.php?action=profile;u=
А видимой, это как?
Да хотя бы прописать в ней Private Sub Workbook_Open()
ThisWorkbook.IsAddin = False
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.IsAddin = True
End Sub
Про "пугающие" окна - я своим товарищам объясняю так: если файл, который заведомо с макросом, открывается БЕЗ окна с вопросом типа "Включить макросы?" (или файл, в котором макросов быть не должно, задает такой вопрос), тогда срочно звони мне, ничего больше не нажимай и вообще что-то не то творится у тебя. Т.е., появление такого окна показывает, что все в порядке. И один раз нажать на кнопку, соглашаясь с работой макросов, это не только не должно быть в лом, а наоборот, прививает человеку очень полезную привычку внимательно за этим следить. Кстати, из этой же серии - про низкий уровень безопасности - абсолютно согласен.
Саш...


Лерик Степанова>> MS Excel линейная зависимость, равенство математических ожиданий, уравнение
2013-04-04 23:02 http://forum.msexcel.ru/index.php?action=profile;u=
Здравствуйте. Помогите пожалуйста с решением задач в MS Excel на определение линейной зависимости, гипотезе о равенстве математических ожиданий и на составление уравнения зависимости с проверкой его адекватности. Прошу пожалуйста помогите. Заранее спасибо. :'(

NooBasTiK>> Re: MS Excel линейная зависимость, равенство математических ожиданий, уравнение
2013-04-05 10:54 http://forum.msexcel.ru/index.php?action=profile;u=
Как то вот так наверное...

cheshiki1>> Re: Вывод результата
2013-04-05 11:46 http://forum.msexcel.ru/index.php?action=profile;u=
такой вариант в [abbr=правой кнопкой мыши по ярлычку листа -> Исходный текст]модуль листа[/abbr]
Private Sub WorkSheet_SelectionChange(ByVal Target As Range)
Dim List3() As String
Dim i As Long, M As Long
If Intersect(Range("B3"), Target) Is Nothing Then Exit Sub
For i = 4 To Sheets("Лист2").Cells(Rows.Count, 3).End(xlUp).Row
 If Sheets("Лист2").Range("C" & i) >= Sheets("Лист1").Range("B5").Value Then
    M = M + 1
    ReDim Preserve List3(1 To M)
    List3(M) = Sheets("Лист2").Range("C" & i).Value & ", " & Sheets("Лист2").Range("D" & i)
  End If
Next
MsgBox Join(List3, Chr(10))
End Sub


Prist>> Re: увеличение
2013-04-05 12:14 http://forum.msexcel.ru/index.php?action=profile;u=
Можно "копировать" формат примечания из указанного. Делал на другом форуме - см. вложение.

Prist>> Re: Как спрятать код макроса от пользователя?
2013-04-05 12:48 http://forum.msexcel.ru/index.php?action=profile;u=
Пароль на проект - это достаточно серьёзная защита, со сложным хэш-шифрованием. В отличие от паролей листов и книги Excel, вскрыть или подобрать пароль на проект VBA обычному юзеру на порядок сложней, а иногда и вообще невозможно, особенно если он не является специалистом в области хакерства :)
Позволю себе не согласиться в некоторых моментах. Защита листов, книги на редактирование и проекта VBA сделаны как "защита от дурака". Ничего сложного в этой защите нет. Хэш этих паролей всего 16 бит и поэтому подобрать такой пароль не составит особого труда. Даже макросом перебора, что по времени будет не так уж много - несколько минут(в зависимости от мощности ПК). Проект VBA возможно чуть сложнее(официальных упоминаний про применяемые алгоритмы нет, но полагаю, что мало чем они не отличаются от защиты листа и книги, т.к. VBA не менялся в последнее время(после 2003 Excel) - все силы были брошены на VSTO, кото...

Лерик Степанова>> Re: MS Excel линейная зависимость, равенство математических ожиданий, уравнение
2013-04-05 13:37 http://forum.msexcel.ru/index.php?action=profile;u=
Как то вот так наверное...
Молодой человек спасибо вам больше, я очень признательна вам за помощь!! Спасибо  :)

nick79087>> Re: удалить несколько разных данных из ячейки
2013-04-05 13:53 http://forum.msexcel.ru/index.php?action=profile;u=
Poltava, спасибо - это именно то, что я просил. просто завтык был, неправильно саму формулу строил, но по Вашему примеру все стало ясно. Еще раз - огромное спасибо!

Лерик Степанова>> Re: MS Excel линейная зависимость, равенство математических ожиданий, уравнение
2013-04-05 14:02 http://forum.msexcel.ru/index.php?action=profile;u=
Я добавила таблицы в excel, прошу если кто нибудь знает как решить оставшиеся задачи не проходите мимо  :-[
Сама пыталась их решить недели две, но я действительно не знаю как =(( 

edmar07>> Re: Вывод результата
2013-04-05 14:05 http://forum.msexcel.ru/index.php?action=profile;u=
такой вариант в [abbr=правой кнопкой мыши по ярлычку листа -> Исходный текст]модуль листа[/abbr]

Ваще бомба!!! то что нуно!!!!
спасибо!!

Олег*>> Re: Как спрятать код макроса от редактирования пользователем?
2013-04-05 14:07 http://forum.msexcel.ru/index.php?action=profile;u=
Всем большое спасибо за советы и разъяснения!

Передумал я ему эту программу отдавать :) Я ему постоянно скриншоты диаграмм по скайпу посылаю, а если у него у самого эта программа будет, которая автоматически все диаграммы строит и анализирует, то на хрена, спрашивается, ему мои скриншоты нужны будут, и что я тогда ему буду посылать? :) 

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




edmar07>> Re: увеличение
2013-04-05 14:12 http://forum.msexcel.ru/index.php?action=profile;u=
Можно "копировать" формат примечания из указанного. Делал на другом форуме - см. вложение.
Пишет ошибку 438 (объект не поддерживает эти свойства или метод)
и тормозит на: 
          rCell.Comment.Shape.TextEffect = rCommentCell.Shape.TextEffect


edmar07>> Re: по вводу времени формат в СЕГОДНЯ - формат или формула?
2013-04-05 14:42 http://forum.msexcel.ru/index.php?action=profile;u=
Если Вы хотите вводить текст с произвольным разделителем, то непременным условием для этого является предварительная установка в столбцах А и В формата "Текстовый". Иначе запятая уберет 2 символа, слеш вообще поставит все нули, ну и тп

Помоги еще плиз!!!
тут нуно теперь переделать чтоб меняло не по вводу, а при выполнении по диапазонам (ну например C2:C100, L2:L100)
таблица будет заполнятся не поточно, а путем вставки целой таблицы!


Private Sub Worksheet_Change(ByVal Target As Range)
Dim vVal
Dim StrVal As String
Dim dDate As Date
On Error Resume Next
   
     
Application.EnableEvents = False
If Target.Count > 1 Then Exit Sub
If [A1] = 1111 Then Exit Sub
Application.ScreenUpdating = 0
If Target < 1 And Target > 0 Then
    If Target.Column > 1 Then
        If Target.Offset(, -1) > Target + Date Then s_ = 1
    End If
    Target = Target + Date + s_
    Target.NumberFormat = "h:mm;@"
End If
Applicat...

Максим Хузин>> Извлечение значения из строки
2013-04-05 15:15 http://forum.msexcel.ru/index.php?action=profile;u=
Добрый день! Прошу помощи. Никак не могу решить задачу.
Есть текстовая строка с наименованием услуги и company id пользователя.
Есть список company id.

Нужно извлечь из строки, только лишь company id и записать в отдельную ячейку.

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

Заранее спасибо.

shatoff>> Re: Суммирование по организациям
2013-04-05 16:05 http://forum.msexcel.ru/index.php?action=profile;u=
в самом макросе еще что-то нужно править?
Нет. Макрос при попытке ввода даты со временем сам "отрезает" время и оставляет только дату в формате даты
Снимите видео с экрана, тогда я скажу что Вы делаете неправильно
давно я сюда не заглядывал, работы навалилось
а можно я вам скину сам файл в котором я хочу это заставить работать? в нем может глянете что не так?

cheshiki1>> Re: Извлечение значения из строки
2013-04-05 16:06 http://forum.msexcel.ru/index.php?action=profile;u=
=ПРОСМОТР(2;1/ЕЧИСЛО(ПОИСК("*"&'Список companyId'!$A$1:$A$90&"*";Данные!B2));'Список companyId'!$A$1:$A$90)

edmar07>> Re: Вывод результата
2013-04-05 16:14 http://forum.msexcel.ru/index.php?action=profile;u=
такой вариант в [abbr=правой кнопкой мыши по ярлычку листа -> Исходный текст]модуль листа[/abbr]
Private Sub WorkSheet_SelectionChange(ByVal Target As Range)
Dim List3() As String
Dim i As Long, M As Long
If Intersect(Range("B3"), Target) Is Nothing Then Exit Sub
For i = 4 To Sheets("Лист2").Cells(Rows.Count, 3).End(xlUp).Row
 If Sheets("Лист2").Range("C" & i) >= Sheets("Лист1").Range("B5").Value Then
    M = M + 1
    ReDim Preserve List3(1 To M)
    List3(M) = Sheets("Лист2").Range("C" & i).Value & ", " & Sheets("Лист2").Range("D" & i)
  End If
Next
MsgBox Join(List3, Chr(10))
End Sub

Туго у меня с мат частью,

как тоже самое к нужному диапазону применить?

Максим Хузин>> Re: Извлечение значения из строки
2013-04-05 16:52 http://forum.msexcel.ru/index.php?action=profile;u=
Огромное Вам спасибо!
Даже не представляете как помогли!

Все отлично работает.

cheshiki1>> Re: Вывод результата
2013-04-05 17:13 http://forum.msexcel.ru/index.php?action=profile;u=
[code]Private Sub WorkSheet_SelectionChange(ByVal Target As Range)
Dim List3() As String
Dim i As Long, M As Long
If Intersect(Range("B3"), Target) Is Nothing Then
  If Intersect(Range("B13:E13"), Target) Is Nothing Then Exit Sub
     For i = 4 To Sheets("Лист2").Cells(Rows.Count, 3).End(xlUp).Row
       If Sheets("Лист2").Range("C" & i) >= Sheets("Лист1").Range("B5") _
          And Sheets("Лист2").Range("C" & i) <= Sheets("Лист1").Range("B6") _
          And ActiveCell.Cells(0, 1) = Sheets("Ëèñò2").Range("B" & i) Then
         M = M + 1
         ReDim Preserve List3(1 To M)
         List3(M) = Sheets("Лист2").Range("C" & i).Value & ", " & Sheets("Лист2").Range("D" & i)
       End If
      Next
  Else
For i = 4 To Sheets("Ëèñò2").Cells(Rows.Count, 3).End(xlUp).Row
 If Sheets("Лист2").Range("C" & i) >= Sheets("Лист1").Range("B5").Value Then
    M = M + 1
    ReDim Preserve List3(1 To M)
    List3(M) = Sheets("Лист2").Range("C" & i).Value & ", " & Sheets("Лист2").Range("D" & i)
  End...

edmar07>> Re: Вывод результата
2013-04-05 17:29 http://forum.msexcel.ru/index.php?action=profile;u=
Private Sub WorkSheet_SelectionChange(ByVal Target As Range)

выдает синтаксическую ошибку ((
и красным строк 5 выделяет!

cheshiki1>> Re: Вывод результата
2013-04-05 17:43 http://forum.msexcel.ru/index.php?action=profile;u=
Ëèñò (абрукадабру) на Лист исправьте.

edmar07>> Re: Вывод результата
2013-04-05 17:55 http://forum.msexcel.ru/index.php?action=profile;u=
Ëèñò (абрукадабру) на Лист исправьте.

Спасибо!!! все так ка нужно!!!

и когда я поумнею ... !?!?!?

KuklP>> Re: Большой проект и его глюк
2013-04-05 19:00 http://forum.msexcel.ru/index.php?action=profile;u=
neonar, тут форум не по теплотехнике. Но не сомневайтесь, все форумчане искренне хотят помочь Вам. Просто напишите, что куда надо ввести для вызова глюка :)

tireshia>> Re: сложное экселевское задание!!на засыпку
2013-04-05 20:23 http://forum.msexcel.ru/index.php?action=profile;u=
Делается на новом листа равно переход в другой лист с указанием ячейки. Ч новом листе появляются данные из другого листа.

roma roma>> Как сделать чтобы в ячейке была прописана формула
2013-04-06 11:28 http://forum.msexcel.ru/index.php?action=profile;u=
Добрый день
Как сделать, чтобы в ячейке была видна сама формула (например А2+А3/100), а в другой ячейке по этой формуле будет выполняться расчет.

Poltava>> Re: Суммирование по организациям
2013-04-06 13:18 http://forum.msexcel.ru/index.php?action=profile;u=
Разрешаем :)

Poltava>> Re: Как сделать чтобы в ячейке была прописана формула
2013-04-06 13:32 http://forum.msexcel.ru/index.php?action=profile;u=
в екселе есть функция отобразить формулы но она отобразит ВСЕ формулы. По другому могу предложить только макросом к примеру вот таким простейшим
Function TextFomul(rCell) As String
    TextFomul = rCell.Formula
End Function
PS: Ув. roma roma с чего вы взяли, что ваша тема, имеет хоть какое то отношение к техническим вопросам работы сайта?

Poltava>> Перенесено: Как сделать чтобы в ячейке была прописана формула
2013-04-06 13:35 http://forum.msexcel.ru/index.php?action=profile;u=
Тема перенесена в Microsoft Excel.

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

cheshiki1>> Re: Как сделать чтобы в ячейке была прописана формула
2013-04-06 13:52 http://forum.msexcel.ru/index.php?action=profile;u=
можно с помощью макрофункции
=ПОЛУЧИТЬ.ЯЧЕЙКУ(6;Лист1!$A$2)данная формула работает только как формула Имени.


Serge 007>> Re: Как сделать чтобы в ячейке была прописана формула
2013-04-06 16:37 http://forum.msexcel.ru/index.php?action=profile;u=
В 2013 Excel это реализовано штатно, функцией листа категории "Текстовые" Ф.ТЕКСТ()

neonar>> Re: Большой проект и его глюк
2013-04-06 19:44 http://forum.msexcel.ru/index.php?action=profile;u=
Думаю, что вряд ли кто-то поможет, пскольку код очень путанный  :'( :)
Для вызова глюка нужно:
окрыть файл с тестом --> на листе Параметры расчета кликнуть по галке Режим исходных данных ---> удалить данные только из ячеек (39,7) (40,7) ---> нажать на кнопку Расчет теплоптерь ---> далее будут вылетать сообщения (после большого первого) с тремя цифрами 3,8 7,83 7,7. Первая цифра - толщина изоляции, вторая а21, третья а22. Нужно обратить внимание на 2 из них: первое: 4,1 7,62 7,6. и второе 4,1 0 0. Ошибка в том, что на самом деле они должны быть одинаковыми, потому что при толщине изоляции 4,1 а21 и а21 должны быть равны, потому что алгоритм расчета один и тот же! Такая вот шизофрения!
Верная комбинация: 4,1 7,62 7,6. Задача в том, чтобы первое и второе были идентичны.  :)

Ppaa>> Подсчет по сложному условию
2013-04-07 01:52 http://forum.msexcel.ru/index.php?action=profile;u=
Имеется пример столбцов с датами и временем.

Нужно подсчитать количество заданий, для которых поле «Запрошенное время дня для визита» пусто и время от значения поля «Дата создания задания» до минимального из значений полей «Время закрытия наряда» и «Дата первой авторизации» превышает для «ГТС» 48 часов, для «СТС» 120 часов.

У меня пока получилось сделать это только через добавление дополнительного расчетного столбца. (см. вложение) Можно ли все значения указать непосредственно в формуле?

Заранее благодарен.

DV68>> Re: Подсчет по сложному условию
2013-04-07 04:39 http://forum.msexcel.ru/index.php?action=profile;u=
1. Ваша формула считает неправильно, т.к.
сутки = 1, соответственно 48 часов в Excel = 2, а 120 часов = 5.
т.е. должно быть ">2" и ">5" соответственно
2. Формула такая:
=СУММПРОИЗВ((D2:D5000="")*(ABS(B2:B5000-ЕСЛИ(Ч(C2:C5000)<Ч(E2:E5000);C2:C5000;E2:E5000))>ЕСЛИ(A2:A5000="ГТС";2;5)))

Hugo121>> Re: Извлечение значения из строки
2013-04-07 13:35 http://forum.msexcel.ru/index.php?action=profile;u=
Я бы не сказал, что отлично.
Представим, что в списке есть O224, и этот номер находится после O2248, или он такой вообще один.
Или вообще в конце списка забито O2...
Пробелов не хватает:
=ПРОСМОТР(2;1/ЕЧИСЛО(ПОИСК("*"&" "&'Список companyId'!$A$1:$A$90&" "&"*";Данные!B2));'Список companyId'!$A$1:$A$90)

Serge 007>> Re: Извлечение значения из строки
2013-04-07 13:58 http://forum.msexcel.ru/index.php?action=profile;u=
Игорь, ты ли это?!  ;D
Что б уж совсем правильно, можно так ([abbr=Вводится через Ctrl+Shift+Enter]формула массива[/abbr]):
=ИНДЕКС('Список companyId'!A$1:A$90;МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК('Список companyId'!A$1:A$90;B2));СТРОКА($1:$90))))

Hugo121>> Re: Извлечение значения из строки
2013-04-07 14:25 http://forum.msexcel.ru/index.php?action=profile;u=
Я :)
Сергей, а где пробелы? Тест на O2 твой вариант тоже не проходит - но теперь O2 не нравится в начале списка.
И кроме того, там в критериях есть лишние пробелы, например у M33306. Вроде не мешает, но результаты по этой позиции разные.

DV68>> Re: Извлечение значения из строки
2013-04-07 14:31 http://forum.msexcel.ru/index.php?action=profile;u=
Зачем медленный ПРОСМОТР грузить делением без необходимости?
Причесал:
=ПРОСМОТР(999;ПОИСК(" "&'Список companyId'!A$1:A$90&" ";B10);'Список companyId'!A$1:A$90)
M33306 в критериях 2 шт - один с пробелом, другой без.

sync1>> фильтр из БД с условием
2013-04-07 15:16 http://forum.msexcel.ru/index.php?action=profile;u=
Имеется простая таблица: 1 столбик, в каждой ячейке 1 слово (1 -а, 2 - б, 3 -в), 2 столбик - просто инфа. Что нужно, копируем в 1 ячейку данные в формате а,в,д и показывает выборку из таблицы а, в, д строки



Serge 007>> Re: фильтр из БД с условием
2013-04-07 15:18 http://forum.msexcel.ru/index.php?action=profile;u=
Используйте либо сводную, либо фильтр

Ppaa>> Re: Подсчет по сложному условию
2013-04-08 08:53 http://forum.msexcel.ru/index.php?action=profile;u=
=СЧЁТЕСЛИМН(D:D;"";A:A;"ГТС";G:G;">48")+СЧЁТЕСЛИМН(D:D;"";A:A;"СТС";G:G;">120")
Ну почему же неправильно, результат вычислений тот же - 11. и если в вашей формуле сменить 2 и 5 на 48 и 120, то результат получается тот же.
Но все равно спасибо!



zs>> Re: Какой формулой из ячейки А1 скопировать первых три слова?
2013-04-08 10:27 http://forum.msexcel.ru/index.php?action=profile;u=
=ЕСЛИ(ЕОШ(НАЙТИ(",";ЛЕВСИМВ(C4;НАЙТИ(4;ПОДСТАВИТЬ(C4;" ";4;3)))));ЛЕВСИМВ(C4;НАЙТИ(4;ПОДСТАВИТЬ(C4;" ";4;3)));ЛЕВСИМВ(C3;НАЙТИ(",";C3)-1)) Формула на 4 ;)

shatoff>> Re: Суммирование по организациям
2013-04-08 11:04 http://forum.msexcel.ru/index.php?action=profile;u=
Разрешаем :)
Вот пример файла, в него вставляются данные с сайта в ячейки "A:I", в столбец "B" вставляется дата со временем (как пример 4 последние строчки), по этому столбцу я хотел сделать автозамену " ??:??:??" на пустое значение, чтобы у пользователя при вставке данных с сайта время само отсекалось.

Serge 007>> Re: Суммирование по организациям
2013-04-08 12:13 http://forum.msexcel.ru/index.php?action=profile;u=
В макросе ничего не менял, поправил только диапазон, согласно файлу (b2:b20)
Всё работает как и раньше, правильно

DV68>> Re: Подсчет по сложному условию
2013-04-08 13:12 http://forum.msexcel.ru/index.php?action=profile;u=
Хозяин-барин
Вообще-то моя формула в Н5 выдает 12, т.к. считает ячейку G14. Вам 48 часов или 48 дней надо??

Наталя Священко>> Re: Как заменить идентификаторы реальными названиями?
2013-04-08 16:29 http://forum.msexcel.ru/index.php?action=profile;u=
Извините, первый раз на этом форуме.
Вот файл с примером.
Нужно на листе 1 заменить данные колонки ID именами с листа 2 которые соответствуют этим ID.

cheshiki1>> Re: Как заменить идентификаторы реальными названиями?
2013-04-08 16:38 http://forum.msexcel.ru/index.php?action=profile;u=
если заменить то макросом.
если без замены в отдельном столбце то вариант:  в F2 вставляем и растягиваем.
=ВПР(A2;Лист2!$A$1:$B$5;2;0)

Евгений Терехов>> Re: Каталог сайтов по excel. Добавляйте!
2013-04-08 19:25 http://forum.msexcel.ru/index.php?action=profile;u=
Блог "Excel для экономиста" - http://allexcel.info

Наталя Священко>> Re: Как заменить идентификаторы реальными названиями?
2013-04-08 19:33 http://forum.msexcel.ru/index.php?action=profile;u=
Спасибо, помогли. Воспользовалась вторым способом.


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

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


В избранное