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

iron priest>> Re: Выборка по двум крайним правым символам и дальнейшее умножение


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

Выпуск 9
от 2014-03-07

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

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



iron priest>> Re: Выборка по двум крайним правым символам и дальнейшее умножение
2014-02-25 23:45 http://forum.msexcel.ru/index.php?action=profile;u=
а по лучше пример нельзя было скинуть? на картинках одно, в файле другое


Wasilic>> Re: Выборка по двум крайним правым символам и дальнейшее умножение
2014-02-26 00:06 http://forum.msexcel.ru/index.php?action=profile;u=
Вариант согласно описания.

Czeslaw>> Re: Выборка по двум крайним правым символам и дальнейшее умножение
2014-02-26 00:30 http://forum.msexcel.ru/index.php?action=profile;u=
=C4*INDEX({0,04\0,04\0,4\0,4\0,5\0,5\0,8\0,8\0,0225\0,0225};;MATCH(RIGHT(C4;2);{"30"\"35"\"00"\"05"\"90"\"95"\"20"\"25"\"40"\"45"};0))

SvytoIIIa>> Имя Листа
2014-02-26 07:55 http://forum.msexcel.ru/index.php?action=profile;u=
Добрый день подскажите как решить вот такую проблему: в маркосе нужно прописать что бы все нужные данные переносились на только что созданный Лист
[code]Sub Макрос1()
'
' Макрос1 Макрос
'

'
    Sheets.Add After:=Sheets(Sheets.Count)
    Sheets("ОБРАЗЕЦ").Select
    Cells.Select
    Selection.Copy
    Sheets("Лист2").Select
    Cells.Select
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
    Sheets("ОБРАЗЕЦ").Select
    Range("A1:Y38").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Лист2").Select
    ActiveSheet.Paste
    ActiveWindow.SmallScroll Down:=6
    Range("P18:R19").Select
    ActiveWindow.SmallScroll Down:=-12
    Cells.Select
    Application.CutCopyMode = False
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("Z11").Select
    ActiveWindow.SmallScroll Down:=12
    Sheets("ОБРАЗЕЦ").Selec...

Ktulu>> Ближайшее значение, удовлетворяющее критериям(массив)
2014-02-26 10:44 http://forum.msexcel.ru/index.php?action=profile;u=
Уважаемые коллеги, прошу помочь с победой задачи.
Существует массив беспорядочных чисел(1 строка, много столбцов). Необходимо найти ближайшее число(его порядковый номер в массиве) справа от МАКС в массиве, которое удовлетворяло бы условию: 0<X<(МАКС/2).

Алексей Шмуйлович>> Re: Имя Листа
2014-02-26 11:32 http://forum.msexcel.ru/index.php?action=profile;u=
Здравствуйте.

Напишите

    Dim sh As New Worksheet
   
вместо

    Sheets.Add After:=Sheets(Sheets.Count)

И дальше вместо "Sheets("Лист2")" везде используйте просто "sh"


Baton>> Подсчет отработанных часов за определенный месяц
2014-02-26 12:09 http://forum.msexcel.ru/index.php?action=profile;u=
ЗДРАВСТВУЙТЕ!!! Всем доброго времени суток. Прошу Вас помочь. Есть задача, подсчитать количество отработанных часов бригадой за определенный месяц, в идеале, например за Январь получиться 31 день х 24 часа = 744 часа. Если посмотреть на мой пример, то можно заметить, что по некоторым эпизодам после окончания одного ремонта и до начала другого проходила заминка (кроме 3-й бригады), соответственно время получиться меньше. Прошу написать формулу в ячейках отмеченных желтым и при составлении формул ссылаться на ячейки отмеченные красным. Так же необходимо учитывать, что месяц, например Январь 2014г начинается с 01.01.2014 0:00:00 и заканчивается 31.01.2014 23:59:59. И где окончание ремонта не заполнено (т.е. ремонт не закончен), автоматически считалось как конец месяца.
Голову сломал, так ничего не придумал, весь инет облазил, ничего не нашел. Прошу Вашей помощи.


SvytoIIIa>> Re: Имя Листа
2014-02-26 12:13 http://forum.msexcel.ru/index.php?action=profile;u=
Прописал, вот это теперь выдает: "Class does not support Automation or does not support expected interface"

cheshiki1>> Re: Ближайшее значение, удовлетворяющее критериям(массив)
2014-02-26 12:23 http://forum.msexcel.ru/index.php?action=profile;u=
приложите файл-пример с результатом написанным вручную.

cheshiki1>> Re: Имя Листа
2014-02-26 12:24 http://forum.msexcel.ru/index.php?action=profile;u=
приложите файл.

SvytoIIIa>> Re: Имя Листа
2014-02-26 12:28 http://forum.msexcel.ru/index.php?action=profile;u=
Вот

Nadezhda>> Не обновляются данные в таблице
2014-02-26 13:20 http://forum.msexcel.ru/index.php?action=profile;u=
Существует Итоговая таблица(Простой_прим.xlsx), которая ссылается на данные из вспомогательных таблиц.
(Простой ЦДНГ-2.xlsx)
На разных компьютерах, при открытии Итоговой таблицы открывается окошко:
"Книга содержит связи с другими источниками данных..."
При нажатии кнопки "Обновить", связи обновляются. Либо при нажатии F9.
Но на одном компьютере (именно на одном) , данные связи не обновляются, хотя в Параметрах\Дополнительно\ При пересчете этой книги  - Обновить ссылки на другие документы; Сохранять значения внешних связей - стоят галочки.
А так же в Параметрах\Дополнительно\ При пересчете этой книги\ Общие - Запрашивать об обновлении автоматических связей - тоже стоит галочка.
При нажатии F9 или Alt+F9 связи не обновляются.
Если открыть этот самый файл на  другом "рабочем" компьютере и обновить связи, то на "нерабочем" компьютере в таблице данные обновляются. Получается так, что очень часто приходится звонить и просить, чтоб обновили файл.
Вопрос: подскажите, пожалуйста, каким ...

Сергей Калинин>> Макрос для очистки
2014-02-26 23:18 http://forum.msexcel.ru/index.php?action=profile;u=
Добрый день.
Пытаюсь создать тесты в екселе(2007) но наткнулся на одну беду.
Нужен макрос очищающий значение флажков, переключателей и списков(Проверка данных, списки) во всех листах в книге.

Ktulu>> Re: Ближайшее значение, удовлетворяющее критериям(массив)
2014-02-27 02:08 http://forum.msexcel.ru/index.php?action=profile;u=
Файл с моими "изысками"

iron priest>> Re: Ближайшее значение, удовлетворяющее критериям(массив)
2014-02-27 11:53 http://forum.msexcel.ru/index.php?action=profile;u=
выделите результаты цветом

aska84>> Как выгружать все валюты с CBR.RU на сегодня автоматически?
2014-02-27 20:33 http://forum.msexcel.ru/index.php?action=profile;u=
Друзья, здравствуйте!
Я умею делать импорт из CBR.RU курса валют на сегодняшний день. Однако там только доллар и евро. А мне нужны все основные валюты.
Подскажите пожалуйста как это сделать. Пыталась ответ найти на форуме. Но безуспешно (
Заранее большое спасибо!

gling>> Re: Не обновляются данные в таблице
2014-02-27 21:40 http://forum.msexcel.ru/index.php?action=profile;u=
Может на этом одном компьютере выключен автоматический пересчет формул? Хотя после F9 должно пересчитаться. Может в свойствах документа какой нибудь запрет для этого компа, всем разрешено, а одному нет. Это [abbr=клик правой кнопкой мыши]ПКМ[/abbr]--Свойства--Безопасность.

Wasilic>> Re: Имя Листа
2014-02-27 23:44 http://forum.msexcel.ru/index.php?action=profile;u=
Попробуйте так, после создания листа,
Sheets.Add After:=Sheets(Sheets.Count)создайте переменную с его именем:
list = ActiveSheet.Nameи дальше, пользуйтесь переменной
Sheets(list).Select

Ktulu>> Re: Ближайшее значение, удовлетворяющее критериям(массив)
2014-02-28 02:55 http://forum.msexcel.ru/index.php?action=profile;u=
Пардон, какие результаты? Ячейку с Н/Д желтым выделил сразу

cheshiki1>> Re: Как выгружать все валюты с CBR.RU на сегодня автоматически?
2014-02-28 10:54 http://forum.msexcel.ru/index.php?action=profile;u=
тяните с этой страницы http://cbr.ru/currency_base/D_print.aspx?date_req=28.02.2014 вот только скорей всего макросом придется менять дату на текущую.

brudiq>> Доля по признаку
2014-02-28 15:36 http://forum.msexcel.ru/index.php?action=profile;u=
Господа знатоки, подскажите пожалуйста, как мне решить задачу.
Нужно в таблице с данными протянуть долю по признаку.
То есть, имеется 2 столбца Название и сумма. Мне нужно справа поставить долю данного названия в сумме всех таких же названий. Файл прилагаю. Заранее благодарен.

Staniiislav>> Re: Каталог сайтов по excel. Добавляйте!
2014-02-28 15:37 http://forum.msexcel.ru/index.php?action=profile;u=
Ребят, а кто знает что сталось с сайтом:
msoffice.nm.ru
? :(

iron priest>> Re: Доля по признаку
2014-02-28 15:42 http://forum.msexcel.ru/index.php?action=profile;u=
=B2/СУММЕСЛИ($A$2:$A$11;A2;$B$2:$B$11)

brudiq>> Re: Доля по признаку
2014-02-28 15:45 http://forum.msexcel.ru/index.php?action=profile;u=
iron priest, спасибо!!, я перемудрил, оказывается всё просто)  ;)

Staniiislav>> Re: Макрос для очистки
2014-02-28 16:24 http://forum.msexcel.ru/index.php?action=profile;u=
Sub clear()
Dim i%, RowMax&, rng As Range
If MsgBox("Очистить ячейки?", vbYesNo, "Подтверждение") = vbNo Then Exit Sub
On Error Resume Next
    For i = 1 To ThisWorkbook.Sheets.Count
        With ThisWorkbook.Sheets(i)
            RowMax = .Range("B:V").Find("укажите символ для поиска и очистки", , , xlWhole, xlByRows, xlPrevious).Row
            Set rng = .Range("укажите диапазон" & CStr(RowMax))
            rng.SpecialCells(xlCellTypeConstants).ClearContents
            Set rng = Nothing
        End With
    Next
End Sub


Yan.Zay>> Re: Как суммировать данные с разных листов если их 200 шт.?
2014-02-28 16:44 http://forum.msexcel.ru/index.php?action=profile;u=
А вот еще вопрос на тему: можно ли проделать точно такую же операцию, но с учетом того, что данные для суммирования находятся на строках с разными номерами, но имеют обобщающий критерий, например, нужно сложить значения на листах 1-20 по строкам "Итого", при этом на каждом листе значение "Итого" располагается на строках № 1, 3, 5 и т.п.
Понимаете о чем я?

Wasilic>> Re: Как суммировать данные с разных листов если их 200 шт.?
2014-03-01 15:08 http://forum.msexcel.ru/index.php?action=profile;u=
Понимаете о чем я?
Не-а! 
Читайте правила. Прикладывайте пример.
Понимаете о чем я?

Алексей Сергеев>> Суммирование данных на листе
2014-03-02 14:53 http://forum.msexcel.ru/index.php?action=profile;u=
Здравствуйте!

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

Сашаа>> макрос для проверяки значений в столбце и при нахождении одинаковых
2014-03-02 15:21 http://forum.msexcel.ru/index.php?action=profile;u=
Доброго всем времени суток!
Помогите написать макрос или подскажите
Нужен макрос, который проверяет значение в столбце L и при нахождении одинаковых ячеек выводит на печать соответствующие строки. ппример прикладываю

gling>> Re: Суммирование данных на листе
2014-03-02 18:57 http://forum.msexcel.ru/index.php?action=profile;u=
Можно так. Лучше конечно собрать данные в один столбец.

Алексей Сергеев>> Re: Суммирование данных на листе
2014-03-02 19:09 http://forum.msexcel.ru/index.php?action=profile;u=
Спасибо, но столбцы с данными идут один за другим в таблице, это решение тоже как вариант можно применить, добавляя столбцы, но может еще как-нибудь возможно?

Ktulu>> Re: Суммирование данных на листе
2014-03-03 05:44 http://forum.msexcel.ru/index.php?action=profile;u=
Организация данных не очень удобна.
Вот решение именно для такой структуры. Ориентируется на название фирмы, начинающееся с ООО. Можете добавлять новые строки со значениями(пустые нельзя) внутрь диапазона

SvytoIIIa>> Re: Имя Листа
2014-03-03 07:24 http://forum.msexcel.ru/index.php?action=profile;u=
Попробуйте так, после создания листа,
Sheets.Add After:=Sheets(Sheets.Count)создайте переменную с его именем:
list = ActiveSheet.Nameи дальше, пользуйтесь переменной
Sheets(list).Select

Спасибо большое! все заработало)

Shadowmaker>> Re: Как суммировать данные с разных листов если их 200 шт.?
2014-03-03 11:02 http://forum.msexcel.ru/index.php?action=profile;u=
Легко и непринуждённо - ВПР в помощь

Вместо обычной ссылки у тебя будет что-то типа =СУММ(ВПР("Итого:";МАТЕРИАЛЫ!A:I;2;0);ВПР(...
"Итого:" - это что искать
"МАТЕРИАЛЫ!A:I" - в каком диапазоне искать
2 - в каком столбике диапазона
0 - искать жёстко или "как повезёт"

Учти что "Итого:" всегда должно быть в первом столбике диапазона в котором происходит поиск. Сам столбик может быть любым от A и до предела-1

eXtremer>> Общая книга Excel показывать разную информацию.
2014-03-03 11:59 http://forum.msexcel.ru/index.php?action=profile;u=
Добрый день,

На сервере пользователя работают в Общию Книгу Excel, они все могу работать одновременно. Возникает иногдао такой вопрос, я открываю базу данных у меня показывает одно, другой пользователь открывает тот же файл и у него показывает другое. Почему так происходит? Я хоху чтобы у него было видны те же саммые строкли как у меня. В чём проблема скажите пожалуйста и как решить её ?

Спасибо.

Евгений Гиннер>> Re: Точечная диаграмма (карта рисков)
2014-03-03 12:01 http://forum.msexcel.ru/index.php?action=profile;u=
Спасибо большое!

Основная проблема не в самом построении тренда и прогноза. А в привязке его к этой самой треклятой "карте".
А также непонятно совершенно, как выбирать данные для "карты" вообще в принципе, а также чтобы при добавлении новых строк, они появлялись на "карте".

Тетка>> Что бы округлялось до сотни или до пятидесяти.
2014-03-03 22:00 http://forum.msexcel.ru/index.php?action=profile;u=
Здравствуйте.
Помогите пожалуйста сделать так что бы округлялось до сотни или до пятидесяти.
447*5=2235 (2250)
333*33=10989 (11000)


Czeslaw>> Re: Что бы округлялось до сотни или до пятидесяти.
2014-03-03 22:30 http://forum.msexcel.ru/index.php?action=profile;u=
=MROUND(G1;50)

Michael Holbrook>> Не работает макрос. Subscript out of range
2014-03-04 00:02 http://forum.msexcel.ru/index.php?action=profile;u=
Всем привет! Уже не первый раз обращаюсь к вам и надеюсь, что в этот раз снова поможете)

У меня изначально открыты 2 файла - Расчет кабельной продукции.xlsb и Расчет клеммных коробок и кнопочных постов.xlsb

Необходимо, чтобы при нажатии кнопки "+" на листе "Нория" в файле Расчет кабельной продукции.xlsb - одновременно выполнялся запуск макроса кнопки "+" на листе "Расчет клеммных коробок" в файле Расчет клеммных коробок и кнопочных постов.xlsb

Данную операцию я уже выполнял не единожды с другими файлами, но сейчас видимо какая-то синтаксическая ошибка где-то и мне при нажатии кнопки "+" на листе "Нория" в файле Расчет кабельной продукции.xlsb выдает ошибку "Subscript out of range".

Хочу заметить, что по отдельности в обоих файлах макросы запускаются и работают без проблем.. Поэтому вероятно, что ошибка в коде на листе "Нория" в файле Расчет кабельной продукции.xlsb

Оба файла в архиве. Заранее спасибо за помощь!

cheshiki1>> Re: Что бы округлялось до сотни или до пятидесяти.
2014-03-04 10:09 http://forum.msexcel.ru/index.php?action=profile;u=
на русском:
ОКРУГЛТ
вариант ОКРВВЕРХ

yumakar>> Wanted макрос ежесекундного автообновления
2014-03-04 13:19 http://forum.msexcel.ru/index.php?action=profile;u=
Вопрос от чайника. Книга в формате .xlsm (под макросы). Есть две ячейки: I16, в которую вписывается любое число, и I17 со следующей формулой:

=((ЕСЛИ(ЧАС(ТДАТА())=0;ЕСЛИ(МИНУТЫ(ТДАТА())=0;(I16/24)/60;((I16/24)/60)*МИНУТЫ(ТДАТА()));(I16/24)*ЧАС(ТДАТА())))+(ЕСЛИ(МИНУТЫ(ТДАТА())=0;(I16/24)/60;((I16/24)/60)*МИНУТЫ(ТДАТА()))))+(((I16/24)/3600)*СЕКУНДЫ(ТДАТА()))

Если коротко, то формула работает с системной датой компьютера и делит I16 на 23 часа, 59 мин, 59 сек, и ежесекундно суммирует результат от 0 в полночь до целого I16 через сутки. Если нажимать F9 (обновить), то результат виден. Но мне нужно автоматически ежесекундно видеть результат. Формат I17 числовой с двумя знаками после запятой. Какой макрос для этого нужен? Ещё нужно, чтобы при открытии книги макрос запускался автоматически. Перепробовал много примеров из интернета, - пока ни один не подходит.


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


В избранное