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

Форум по Microsoft Excel

  Все выпуски  

_Boroda_>> Re: Как перебрать диапазон с конца


Форум по Microsoft Excel

Выпуск 20
от 2012-05-24

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

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



_Boroda_>> Re: Как перебрать диапазон с конца
2012-05-16 00:55 http://forum.msexcel.ru/profiles/boroda-u12234.html
Если нужно найти значение в столбце, и оно там единственное (что следует из попытки искать сверху вниз и снизу вверх), то, по-моему, будет намного быстрее использовать функцию листа

Код:
Sub tt()
On Error Resume Next
n_ = WorksheetFunction.Match("Итого", Range("C:C"), 0)
On Error GoTo 0
End Sub
или обычным поиском
Код:
  r_ = Columns("C:C").Find(What:="Итого", After:=ActiveCell, LookIn:=xlValues, _
        LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Row


vitorian>> перенос макросов в новую книгу
2012-05-16 01:52 http://forum.msexcel.ru/profiles/vitorian-u142173.html
Добрый день.
Проблема такая. Из книги, каждый лист которой содержит несколько кнопок и макросы их обслуживающие, необходимо программным образом копировать некоторые из листов в новую книгу. Однако после копировния, макросы ссылаются не на новую книку, а на ту, из которой их скопировали (хотя внутри содержится свой такой же.
Вопрос: Как этого избежать? как (программно) разорвать связи.
Такая же проблема есть если  копировать листы содержащие формулы, ссылающиеся на диапазоны соседних листов. например формула из книги A.xls =ВПР(Лист1!А1;В1:В15;1;1=2) в новой книге, после копирования листа превратится в ВПР([c:\a.xls]Лист1!А1;В1:В15;1;1=2). Я ее обхожу так: пишу формулу =ВПР( ДВССЫЛ("Лист1!А1");В1:В15;1;1=2) которая переносится без изменений. Но с макросами привязанными к кнопкам так не получается. Грустный

NataliXXX>> Re: Анализ изменения цен
2012-05-16 08:49 http://forum.msexcel.ru/profiles/natalixxx-u130987.html
У Вас как мне кажется в постановке задачи хромает логика - отсюда затруднение.
Изменение цен по клиентам - такая постановка может существовать только в голове у человека. Компьютер может понимать только изменение цен по товарам, ибо цена - это товарный атрибут.
Насколько я поняла, выгрузка - это вертикальная таблица-список, где в заголовках столбцов - товар, сумма цена, покупатель, товарная группа, так?
Тогда формула  должна быть составной. Одна часть определяет группировку по клиентам, вторая - группировку по товарным группам, третья - по товарам (номенклатуре) и уж потом - происходит деление суммы за отгруженный товар определенной товарной группы определенному клиенту на отпущенное количество.
Я предлагаю Вам поступить нестандартно. Так, как это сделали мы и избавили себя от множества хлопот, связанных с тем, что нужно сотрудников нанимать, которые эксель знают. При нашем способе можно знать лишь несколько функций.
Идея состоит в следующем. Выгрузка обычно осуществляется на основа...

Kiselev_Y>> Re: перенос макросов в новую книгу
2012-05-16 10:26 http://forum.msexcel.ru/profiles/kiselevy-u142226.html
http://forum.msexcel.ru/microsoft_excel/skopirovat_list_s_formulami_iz_odnoy_knigi_v_druguyu-t560.0.html

shamilganiev>> Re: Объединить данные по 14 ячеек вниз с уничтожением дублирующихся записей и ...
2012-05-16 12:49 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html
А как ты сделал автозагрузку?
Вроде всё работает. Попробую "пустить в производство", только надо подготовить аналогично для другого документа.
Это конечно не так как я хотел, но мне кажется, как я хотел невозможно.

Poltava>> Re: Как перебрать диапазон с конца
2012-05-16 13:49 http://forum.msexcel.ru/profiles/poltava-u39021.html
Спасибо за подсказку будем пробовать

shamilganiev>> Re: Объединить данные по 14 ячеек вниз с уничтожением дублирующихся записей и ...
2012-05-16 13:51 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html
Ну в принципе я подготовил для другого документа тоже такую же автоподгрузку данных, просто создал копию файла и заменил на нём листы, ну и подправил макрос. отпишусь через несколько дней что получилось.
Но всё равно интересно знать как ты сделал автоподгрузку

Igor_Tr>> Re: Два взаимосвязанных массива.
2012-05-16 14:33 http://forum.msexcel.ru/profiles/igortr-u25564.html
Может, кому интересно.
В стандартную процедуру сортировки массива ввел еще одну переменную:

First = LBound(arrNUM) '
    Last = UBound(arrNUM) '
    For i = First To Last - 1
        For j = i + 1 To Last
            If arrNUM(i) > arrNUM(j) Then
                Tmp = arrNUM(j)
                Tmp_1 = ARRname(j)
                arrNUM(j) = arrNUM(i)
                ARRname(j) = ARRname(i)
                arrNUM(i) = Tmp
                ARRname(i) = Tmp_1
            End If
        Next j
    Next i
   
    For i = LBound(arrNUM) To UBound(arrNUM)
   
     Debug.Print arrNUM(i)
     Debug.Print ARRname(i)

    Next i

Все работает, но удовольствия нет. Я слабый в массивах. Чуствую, это можно сделать все одним двухмерным.

IKor>> Re: Защита листа и книги Excel
2012-05-16 15:58 http://forum.msexcel.ru/profiles/ikor-u6827.html
реально ли, чтобы ячейка содержала формулу и в нее так-же можно было вводить информацию (не убив при этом формулу), или ячейки для ввода отдельно, а ячейки с формулами отдельно?
Чисто теоретически аргументами функции могут быть константы, вводимые непосредственно в саму функцию, например:
=2+2
Здесь ничто не может помешать пользователю заменить значение одной из констант (вводить данные непосредственно в тело функции), при этом сама функция останется неизменной...

С практической стороны это, мягко говоря, неудобно. Поэтому кажется предпочтительным вариант, описанный Poltava:
данные вводить в ячейку_для_ввода,
а в дальнейшем в формулах использовать конструкцию ЕСЛИ(ЕПУСТО(ячейка_для_ввода);значение_по_умолчанию;ячейка_для_ввода) или для некоторых случаев бывает удобнее ЕСЛИОШИБКА(МОЯФУНКЦИЯ(ячейка_для_ввода);МОЯФУНКЦИЯ(значение_по_умолчанию))

Shniperson>> Как сделать ссылку на ячейку...
2012-05-16 16:49 http://forum.msexcel.ru/profiles/shniperson-u131877.html
Доброе всем время суток.
Если кто сталкивался или знает - как сделать ссылку на ячейку, так чтобы при добавлении строки или
столбца, в листе на ссылаемую ячейку - она оставалась там же?
Заранее благодарен...

Dmitriy77>> Пересчитать прайс в зависимости от курса валют?
2012-05-16 16:55 http://forum.msexcel.ru/profiles/dmitriy77-u142263.html
Ситуация такая: Есть прайс, 3 колонки - наименование, цена евро, цена рубли. Цены в евро постоянные, необходимо сделать так, что бы цена в рублях автоматически пересчитывалась в зависимости от курса ЦБ РФ. Как импортировать курс я нашёл. Вот как это прописать в формулу?  И сделать так, что бы это работало? Подскажите пожалуйста.
Во вложении макет прайса, где импортированный курс. Может это совсем по другому надо сделать?

Poltava>> Re: Как сделать ссылку на ячейку...
2012-05-16 17:01 http://forum.msexcel.ru/profiles/poltava-u39021.html
А как вы себе это представляете Непонимающий она ведь должна сместиться ведь ее адрес изменился!
Ну а так нужно знать зачем вам это нужно и файл с примером видеть. Может вам и ненужно чтоб адрес не менялся может вам по другому сослаться можно. Ну и уж если совсем никак то можно попробовать макросом это отслеживать и программно перемещать данные в старое местоположение

Serge 007>> Re: Как сделать ссылку на ячейку...
2012-05-16 17:32 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Используйте ДВССЫЛ()

Serge 007>> Re: Пересчитать прайс в зависимости от курса валют?
2012-05-16 17:36 http://forum.msexcel.ru/profiles/serge_007-u25260.html
См. вложение

IKor>> Re: Как сделать ссылку на ячейку...
2012-05-16 17:36 http://forum.msexcel.ru/profiles/ikor-u6827.html
Если существуют ячейки, про которые точно известно, что они НЕ БУДУТ перемещены (например, заголовок таблицы) или их перемещение НЕ ПРИВЕДЕТ к нарушениям логики функции, то можно использовать функцию СМЕЩ() или относительные ссылки в формате R1C1. В зависимости от задачи.

Allaire>> Re: Защита листа и книги Excel
2012-05-16 19:39 http://forum.msexcel.ru/profiles/allaire-u26105.html
реально ли, чтобы ячейка содержала формулу и в нее так-же можно было вводить информацию (не убив при этом формулу), или ячейки для ввода отдельно, а ячейки с формулами отдельно?
Чисто теоретически аргументами функции могут быть константы, вводимые непосредственно в саму функцию, например:
=2+2
Здесь ничто не может помешать пользователю заменить значение одной из констант (вводить данные непосредственно в тело функции), при этом сама функция останется неизменной...

С практической стороны это, мягко говоря, неудобно. Поэтому кажется предпочтительным вариант, описанный Poltava:
данные вводить в ячейку_для_ввода,
а в дальнейшем в формулах использовать конструкцию ЕСЛИ(ЕПУСТО(ячейка_для_ввода);значение_по_умолчанию;ячейка_для_ввода) или для некоторых случаев бывает удобнее ЕСЛИОШИБКА(МОЯФУНКЦИЯ(ячейка_для_ввода);МОЯФУНКЦИЯ(значение_по_у...


vitorian>> Re: перенос макросов в новую книгу
2012-05-16 19:48 http://forum.msexcel.ru/profiles/vitorian-u142173.html

Все правильно, здесь приводится описание моего решения с ДВССЫЛ приведенное выше.
Вопрос же был о другом.
Но все равно спасибо тем кто откликнулся. Решение нашлось и оно такое:
Вместо стандартный кнопок с панели элементов управления, использовать кнопки activX. Код свех элементов управления инкапсулируется в лист. и не требует дополнительной настройки на имя макроса.

Тема закрыта. Всем спасибо

raks123>> Помогите построить сложную диаграмму
2012-05-16 20:18 http://forum.msexcel.ru/profiles/raks123-u142279.html
Суть такая: не могу сделать диаграмму как на прикрепленном изображении из данных xls (тоже прикреплен). Уже столько промаялся с ней, не могу и все тут.

asada>> Re: Комбинирование данных и гистограммы. Нужна помощь
2012-05-16 21:25 http://forum.msexcel.ru/profiles/asada-u141915.html
Цитировать
Цитировать
А есть ли идеи, каким образом свести на графике продукты по каждому бренду в группы, разделенные расстоянием?
Мне тоже удалось сделать сводную со средней по всем рынкам, а вот с каждым рынкам выходит проблема. Таблицу с этой задачей - приложил. к предыдущему посту
Не совсем понял, что именно хотите сделать.

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

Wasilic>> Re: Объединить данные по 14 ячеек вниз с уничтожением дублирующихся записей и ...
2012-05-16 21:29 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Но всё равно интересно знать как ты сделал автоподгрузку
Процедура  Sub с именем Auto_open() запускается автоматически при открытии книги.

shamilganiev>> Re: как из массива 200*70 тыс ячеек получить опред кол-во изделий по каждому складу?
2012-05-17 08:43 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html
А тебе точно нужна формула? Формула, она ведь выдаёт только один результат, только для одной ячейки, а количество необходимых тебе результирующих ячеек неизвестное количество, причём думаю отличное от единицы.

1. Решение без использования макросов. Предлагаю воспользоваться фильтрацией по третьему столбцу, а далее скопировать результат в другой лист, где нет фильтров.

2. Решение с частичным использованием макросов. Сохранить файл из вложения. (Был использован код опубликованный здесь).

3. Решение с макросами. Можно немного переделать код из второго решения под Вас.

shamilganiev>> Re: как из массива 200*70 тыс ячеек получить опред кол-во изделий по каждому складу?
2012-05-17 08:49 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html
А тебе как можно просто списком в одной строке через запятую или обязательно чтобы все результаты были отдельными ячейками?

aprupa>> Решение задачи линейного программирования
2012-05-17 09:07 http://forum.msexcel.ru/profiles/aprupa-u142359.html
Здравствуйте!

Обращаюсь ко всем знающим людям за помощью.
Задача состоит в том, чтобы после ввода целевой функции и ограничений появился соответствующий график, образующий область решений.
Решением в данном случае должен являтся вектор и целевая функция на графике должна встать на эту точку. Я смог только составить задачу (во вложении). Как свести её к графику - не знаю. Пожалуйста, подскажите, что можно сделать.

_Boroda_>> Re: как из массива 200*70 тыс ячеек получить опред кол-во изделий по каждому складу?
2012-05-17 09:35 http://forum.msexcel.ru/profiles/boroda-u12234.html
Смотрите, так?

Wasilic>> Re: Объединить данные по 14 ячеек вниз с уничтожением дублирующихся записей и ...
2012-05-17 10:21 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Значит если в личной книге макросов будет процедура с таким именем, тогда она будет запускаться при открытии любой книги?
Не все так просто. Это отдельная тема.
Я не практиковал но, на всякий случай откуда-то слямзил текст на эту тему:
=====================
Макрос на событие (напр., откр.) ЛЮБОЙ книги Excel
В PERSONAL.XLS создаю модуль класса Class1 и в нём пишу:   'объявление
  Public WithEvents AppEv As Application    'обработчик события
  Private Sub AppEv_WorkbookOpen(ByVal Wb As Workbook)
          MsgBox "Привет!"    'мой макрос
  End Sub

В PERSONAL.XLS создаю модуль Module1 и в нём:     'объявление экземпляра класса Class1
  Public App As New Class1
В PERSONAL.XLS в модуле Workbook (по умолчанию называемый ThisWorkbook) пишем:
  Private Sub Workbook_Open()
  Set App.AppEv = Application
  End Sub
Сохраняем PERSONAL.XLS. Закрываем Excel.
Запускаем его снова.
Теперь при откр...


star282>> Как выбрать из таблицы нужное значение и воткнуть его в формулу? :D
2012-05-17 11:38 http://forum.msexcel.ru/profiles/star282-u83394.html
Товарищи приветствую!
Суть есть таблица соответствия условно она звучит так:
N 10 квартир -> k=0.1
N 12 квартир -> k=0.12
N 14 квартир -> k=0.2
N 18 квартир -> k=0.25
N 20 квартир -> k=0.36
.
.
.
N 325 квартир -> k=12.46
N 500 квартир -> k=19.58
итд

Так вот в формулу Q = k*1.25 например для колличества 325 квартир я должен подставить соответствующий k из таблицы т.е. k=12.46:
Q(325) = 12.46*1,25
Для 500 квартир
Q(500) = 19.58*1.25
Для 14 квартир
Q(14) = 0.2*1.25


Таблица от 1 квартиры до 500 соответственно 500 коэффициентов, каждый раз заглядывать в таблицу соответствия совершенно трудоемко! =(

Как заставить Excel автоматически "подхватывать" из таблицы и подставлять в формулу нужное значение k для конкертного числа N (кол-ва квартир)
Т.е. формула и условие выбора должно выглядеть типа: если N = 325 то взять соответствующий k из такой то ячейки =)

Serge 007>> Re: Как выбрать из таблицы нужное значение и воткнуть его в формулу? :D
2012-05-17 11:56 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Читайте справку по функции [url=http://msexcel.ru/content/view/20/2/]ВПР(_)[/url]

Serge 007>> Re: Объединить данные по 14 ячеек вниз с уничтожением дублирующихся записей и ...
2012-05-17 11:58 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Не все так просто. Это отдельная тема.

Вот здесь обсуждалось, как отслеживать события других книг из надстройки или PERSONAL.XLS.

Poltava>> Re: Как перебрать диапазон с конца
2012-05-17 12:04 http://forum.msexcel.ru/profiles/poltava-u39021.html
Да перепробовал несколько способов вот результаты при условии что значение итого находилось в последней или предпоследней строке всего перебирались 4 файла. Но как по мне результаты какие то странные и либо я неверно организовал таймер либо одно из двух Улыбка
Time  0  Index  1824
Time  0,03125  Index2  1824
Time  0  Index3  1824
Time  0  Index4  1824
Time  0,03125  Index  3308
Time  0,03125  Index2  3308
Time  0  Index3  3308
Time  0  Index4  3308
Time  0,015625  Index  2929
Time  0,03125  Index2  2929
Time  0  Index3  2929
Time  0  Index4  2929
Time  0,015625  Index  2465
Time  0,03125  Index2  2465
Time  0  Index3  2465
Time  0  Index4  2465
Ну и сам код
[code]    t = Timer
    Dim tCell As Variant
    For Each tCell In Range("C:C").SpecialCells(xlConstants, 23)
        If tCell.Value = "Итого" Then
            Exit For
        End If
    Next tCell
    Index = tCell.Row
    Debug.Print "Time "; Timer - t;...

IKor>> Re: Сравнение времени
2012-05-17 12:07 http://forum.msexcel.ru/profiles/ikor-u6827.html
А можно расшифровку смысла? Ну т.е. какие условия выполняются какими функциями?
Функция суммирует произведения продолжительности временных отрезков, укладывающихся в выбранном интервале, на заданные ставки. Почитайте описание функции ПРОСМОТР() в справке и поэкспериментируйте на простых примерах.

Посмотрите еще один вариант решения вашей задачи. Он проще для понимания и адаптации, хотя он далеко не универсален (ограничения явно прописаны в тексте).

Относительно учета праздников и выходных.
Существуют встроенные функции РАБДЕНЬ() и ЧИСТРАБДНИ(), с помощью которых можно попытаться решить задачу, но переносы рабочих дней на выходные ими не учитываются.
Можно написать собственную функцию и для каждого года указать переносы и исключения, но я предлагаю попросту добавить лишний столбец в таблицу и при необходимости указывать исключения - смотрите прилагаемый файл.

p.jane>> сортировка дат и прибавление к ним числа
2012-05-17 12:14 http://forum.msexcel.ru/profiles/pjane-u142370.html
Добрый день!
Есть столбец с датами, нужно в другой столбец выбрать из первого только определенный год и прибавить к нему 3 года, например выбрать 2010 год + 3 года и что б был 2013
спасибо.

p.jane>> Re: сортировка дат и прибавление к ним числа
2012-05-17 12:37 http://forum.msexcel.ru/profiles/pjane-u142370.html
я первый раз на форуме, не оч поняла, что пример нужен
я вот только набираю свою табличку
мне всего то навсего нужно из столбца с датами выбрать только 2010 год и прибавить 3, что б я видела всех, кого в 2013 году отправить на повышение квалификации

Poltava>> Re: сортировка дат и прибавление к ним числа
2012-05-17 12:52 http://forum.msexcel.ru/profiles/poltava-u39021.html
А можно чисто ради спортивного интереса вопрос. А зачем вам прибавлять 3 года!!!
Насколько я понял вас
Цитировать
я видела всех, кого в 2013 году отправить на повышение квалификации
Понятно же что вам всех кто в 2010 прошел отправлять надо Улыбка
Воспользуйтесь авто фильтром по дате 2010 год и вот вам готовый список на принтер и на подпись его Улыбка. Если вам нужно Видеть эти записи среди уймы других в базе воспользуйтесь Условным форматированием и эти строки автоматически выделяться в базе скажем красным цветом.

p.jane>> Re: сортировка дат и прибавление к ним числа
2012-05-17 13:29 http://forum.msexcel.ru/profiles/pjane-u142370.html
точно! спасибо! [url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url] с цветовыми шкалами очень подходит!

Poltava>> Re: сортировка дат и прибавление к ним числа
2012-05-17 13:52 http://forum.msexcel.ru/profiles/poltava-u39021.html
Ну если будут сложности пишите Улыбка

nick31>> как создать макрос для поиска строки по условиям
2012-05-17 14:03 http://forum.msexcel.ru/profiles/nick31-u142101.html
есть файл под названием "1-1" он будет содержать макрос, нужно создать макрос, чтобы он из файла "ЮЛ"  копировал строки по 2 условиям в лист 2 содержащие часть слова "недвиж" столбца D и сумма столбца Q больше или равна   3 000 000 руб. выделенны желтым цветом столбцы

Станиславский>> Выбрать месяц начала продаж
2012-05-17 15:14 http://forum.msexcel.ru/profiles/stanislavskiy-u122280.html
Доброго времени суток, уважаемые форумчане!
Появилась интересная проблемка которую самому не получилось решить  Грустный
Есть статистика продаж по месяцам. Необходимо в отдельной колонке указать месяц когда тот или иной продукт начал продаваться.
в примере, думаю, более понятнее...

Serge 007>> Re: Выбрать месяц начала продаж
2012-05-17 15:32 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Код:
=ИНДЕКС(C$2:S$2;;МИН(ЕСЛИ(ЕТЕКСТ(C3:S3);СТОЛБЕЦ(A1:Q1))))
Формулы массива вводятся нажатием Ctrl+Shift+Enter

Станиславский>> Re: Выбрать месяц начала продаж
2012-05-17 15:42 http://forum.msexcel.ru/profiles/stanislavskiy-u122280.html
То, что нужно! Спасибо!

Dmitr68>> Re: Сравнение времени
2012-05-17 15:54 http://forum.msexcel.ru/profiles/dmitr68-u18737.html
...как в эту функцию вставить выходные дни, т.е. в выходные работа расценивается как сверхурочная, т.е. по 1500
Мой вариант в файле:

Dimchiko>> Неправильная работа функции ВПР
2012-05-17 16:02 http://forum.msexcel.ru/profiles/dimchiko-u4609.html
Господа, приветствую!
в принципе, с данной проблемой сталкивался и ранее, просто это было некритично. Но сейчас реально нужно сделать шаблон путевого листа (прилагаю).
проблема в том, что при выборе нужного маршрута ВПР возвращает не то число, что надо....

Serge 007>> Re: Неправильная работа функции ВПР
2012-05-17 16:06 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Код:
=ВПР(B18;маршруты!$D$2:$E$28;2;)


shamilganiev>> Re: как создать макрос для поиска строки по условиям
2012-05-17 16:06 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html
Так?
Только есть ограничения:
1. Лист2 должен быть пустой (иначе данные перепишутся),
2. книга ЮЛ должна быть закрыта (хотя можно и открытую держать, только надо в коде закомментировать строку с workbook open),
3. поменяй свои точки в колонке Q на запятые, иначе эксель не сможет делать с данными математические операции

Barbarian12>> Re: Неправильная работа функции ВПР
2012-05-17 16:07 http://forum.msexcel.ru/profiles/barbarian12-u139204.html
Код:
=ВПР(B18;маршруты!$D$2:$E$28;2;ЛОЖЬ)


nick31>> Re: как создать макрос для поиска строки по условиям
2012-05-17 16:09 http://forum.msexcel.ru/profiles/nick31-u142101.html
А У НАС ПРОХОДИТ ТАКАЯ ВЫГРУЗКА! НИКАК ИЗМЕНИТЬ НЕЛЬЗЯ?

shamilganiev>> Re: как создать макрос для поиска строки по условиям
2012-05-17 16:24 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html
попробуй это

nick31>> Re: как создать макрос для поиска строки по условиям
2012-05-17 16:29 http://forum.msexcel.ru/profiles/nick31-u142101.html
ПОЛУЧАЕТСЯ, ЧТО ОН НЕ КОПИРУЕТ СТРОКУ! ТАМ ПРОИСХОДИТ ПРЕОБРАЗОВАНИЕ В ОБЩИЙ ФОРМАТ, А МОЖНО ОСТАВИТЬ ПРИ КОПИРОВАНИИ КАК ЕСТЬ?

ShAM>> Re: как создать макрос для поиска строки по условиям
2012-05-17 16:35 http://forum.msexcel.ru/profiles/sham-u106530.html
nick31, у Вас что Caps Lock запал.


Мигель>> Удаление части текста из ячейки до четвертого пробела
2012-05-18 07:47 http://forum.msexcel.ru/profiles/migel-u84558.html
Помогите пожалуйста, какую формулу нужно применить, для того чтобы удалить часть текста из ячейки до 4-го пробела.

Файл прилагаю

Serge 007>> Re: Удаление части текста из ячейки до четвертого пробела
2012-05-18 09:11 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Например так:
Код:
=ПРАВСИМВ(A2;ДЛСТР(A2)-НАЙТИ(" ";A2;НАЙТИ(" ";A2;НАЙТИ(" ";A2;НАЙТИ(" ";A2)+1)+1)+1))


Мигель>> Re: Удаление части текста из ячейки до четвертого пробела
2012-05-18 09:21 http://forum.msexcel.ru/profiles/migel-u84558.html
СПАСИБО БОЛЬШОООООЕ!!!   Веселый Веселый Веселый

Serge 007>> Re: Удаление части текста из ячейки до четвертого пробела
2012-05-18 09:29 http://forum.msexcel.ru/profiles/serge_007-u25260.html
Ещё пара вариантов во вложении

_Boroda_>> Re: Удаление части текста из ячейки до четвертого пробела
2012-05-18 10:16 http://forum.msexcel.ru/profiles/boroda-u12234.html
А вот еще вариантик:
Код:
=ПРАВСИМВ(A2;ДЛСТР(A2)-ПОИСК(A2;ПОДСТАВИТЬ(A2;" ";A2;4)))


Poltava>> Как избежать ошибку "Число сохранено как текст"
2012-05-18 11:35 http://forum.msexcel.ru/profiles/poltava-u39021.html
Есть база в ней есть поле код наименования состоящее из цифр. Соответственно эксель понимает это поле как числовое и разрешает применять к нему только числовые фильтры. Но вот при поиске это очень неудобно поскольку обычно знаешь только какую либо часть кода соответственно тут идеальным является поиск как по тексту по критерию содержит. Для этого в формате ячейки выставляю значение Текстовый и применяю соответствующий [url=http://msexcel.ru/content/view/27/2/]_автофильтр_[/url]. Все работает но есть один момент, а именно когда выберешь формат текстовый эксель в углу каждой ячейки выводит предупреждение о том что число сохранено как текст можно конечно в ручную выбрать весь диапазон и ручками нажать пропустить ошибку но база довольно большая и периодически обновляется а при обновлении в углу ячейки опять высвечивается это предательское предупреждение. Отсюдова вопрос как можно программно заставить эксель пропустить эту ошибку.
То есть обновилась база и потом сработал код который выбрал пропустить эту ошибку для диапазона. Пытался за...

Barbarian12>> Макрос, отображающий значения из таблицы
2012-05-18 12:10 http://forum.msexcel.ru/profiles/barbarian12-u139204.html
Добрый день!

Помогите, пожалуйста, составить макрос, делающий следующее:
Есть две большие таблицы, дебиторская и кредиторская задолженность. Данные у таблиц примерно одинаковые: сумма, контрагент, дата и т.д. Необходимо составить макрос, который в одной таблице отображал всю задолженность контрагента из другой таблицы. Я это вижу примерно так: выделяю ячейку J2 из "таблицы 1" вложенного файла, нажимаю комбинацию клавиш, запускающий макрос, который осуществляет поиск значения ячейки Н1 в столбце D "таблицы 2". Поиск должен происходить по частичному совпадению. Если совпадении находится, то макрос выводит диалоговое окно (желательно, чтобы из него можно было копировать значения, но за неимением сойдет и msgbox), где отображается все строки с найденными значениями.

Например, при поиске ячейки Н7 ("ИКСТРИМ"), выводилось следующее:
0531687757   01.06.2010   31.05.2011   ООО "ИКСТРИМ"   1584.000   RUR   0.000   1584.000
0531687966   22.07.2010   21.07.2011   ООО "ИКСТРИМ"   3956.750   RUR   0.000   3956.750
Т.е. вс...

bzzzu>> Re: Как избежать ошибку "Число сохранено как текст"
2012-05-18 12:10 http://forum.msexcel.ru/profiles/bzzzu-u85011.html
Если я правильно поняла проблему, то хочется чтобы просто не отображалась ошибка?
Тогда может просто отключить ее, убрав соответствующую галочку в Файл->Параметры->Формулы->Правила контроля ошибок->Числа отформатированные как текст.

Hugo121>> Re: как создать макрос для поиска строки по условиям
2012-05-18 12:13 http://forum.msexcel.ru/profiles/hugo121-u30647.html
Ответил http://www.excelworld.ru/forum/2-1705-1#18953

Poltava>> Re: Как избежать ошибку "Число сохранено как текст"
2012-05-18 13:02 http://forum.msexcel.ru/profiles/poltava-u39021.html
Да но сделать это на каждом компьютере где будет открываться файл невозможно. Да и к тому же это относиться ко всем файлам и частенько оказывается полезной вещью. Именно потому и возник вопрос как это сделать программно для известного заранее диапазона

shamilganiev>> Re: Макрос, отображающий значения из таблицы
2012-05-18 13:03 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html
вот попробуй без макросов пока что

ZORRO2005>> Re: Удаление части текста из ячейки до четвертого пробела
2012-05-18 13:13 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
Еще один:
Код:
=ЗАМЕНИТЬ(A2;1;ПОИСК("`";ПОДСТАВИТЬ(A2;" ";"`";4));"")


Hugo121>> Re: Макрос, отображающий значения из таблицы
2012-05-18 13:14 http://forum.msexcel.ru/profiles/hugo121-u30647.html
Можно так попробовать:


Код:
Sub Macro1()
    Columns("K:R").ClearContents

    With Sheets(2)
        Dim Rng As Range
        .[D:D].AutoFilter Field:=1, Criteria1:="=*" & Selection.Value & "*"
        Set Rng = .UsedRange.SpecialCells(xlCellTypeVisible)
        Intersect(Rng, .Columns("A:H")).Copy [k2]
        .[D:D].AutoFilter
    End With
End Sub

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

Да, рассчитано на то, что в момент запуска активна ячейка с критерием (например "ИКСТРИМ")

_Boroda_>> Re: Удаление части текста из ячейки до четвертого пробела
2012-05-18 14:11 http://forum.msexcel.ru/profiles/boroda-u12234.html
Еще один:
Код:
=ЗАМЕНИТЬ(A2;1;ПОИСК("`";ПОДСТАВИТЬ(A2;" ";"`";4));"")
Точно! Так интереснее!
Но тогда уж
1) на 2 символа короче
и
2) не зависит от наличия в А2 символа '
Код:
=ЗАМЕНИТЬ(A2;1;ПОИСК(A2;ПОДСТАВИТЬ(A2;" ";A2;4));"")


Poltava>> Ошибка при объявлении переменной
2012-05-18 14:30 http://forum.msexcel.ru/profiles/poltava-u39021.html
Добрый день в приложении файл в нем три макроса
1)Рабочий
2)Нерабочий
3)Очистка форматов
Макрос рабочий от макроса нерабочий отличается только объявлением переменных. Но после этого он напрочь отказывается работать. В чем причина для меня пока загадка. Третий макрос служит для отмены действия макросов (то есть убирает поставленную ранее рабочим макросом заливку)
Помогите разобраться где я напартачил

Wasilic>> Re: как создать макрос для поиска строки по условиям
2012-05-18 14:31 http://forum.msexcel.ru/profiles/wasilic-u24852.html
И тоже не работает!  Улыбка
Вот, надеюсь, рабочий и последний мой вариант.

ЗЫ Файл, по просьбе nick31 переделал, перевложил.

Hugo121>> Re: как создать макрос для поиска строки по условиям
2012-05-18 14:46 http://forum.msexcel.ru/profiles/hugo121-u30647.html
Проверил последний файл от ТС с excelworld - у меня всё отрабатывает как нужно.
Возможно, косяк в десятичных разделителях - у меня в системе/Экселе используются точки.

Wasilic>> Re: как создать макрос для поиска строки по условиям
2012-05-18 14:52 http://forum.msexcel.ru/profiles/wasilic-u24852.html
У меня работает если так!

Poltava>> Re: Как избежать ошибку "Число сохранено как текст"
2012-05-18 14:53 http://forum.msexcel.ru/profiles/poltava-u39021.html
В принципе можно и не менять на текст но тогда вопрос сменяется обратным как в столбце с числами с помощью расширенного фильтра выбрать те что содержат 5 или 025. Мои попытки копать в этом направлении пока бесполезны. Приложу файл может кто знает как должно выглядеть условие

Allaire>> Помогите разобраться с датой (преобразование)
2012-05-18 15:14 http://forum.msexcel.ru/profiles/allaire-u26105.html
Добрый день коллеги! Дело вот в чем - у меня есть файл экселя, где на одном листе я ввожу данные, на втором они мапятся на печатную форму (см. вложенный файл). Т.е. на листе "форма вводе" есть поле АР2 (с типом данных "дата"). Она должна мапится в поле (клеточки) на печатной форме CZ2 по DN2. Но вместо этого я получаю значение 40940 - проблема выходит с преобразованием данных... помогите "распарсить" корректно, так чтобы нужная цифра попадала в нужную клетку. Спасибо!

iron priest>> Re: Помогите разобраться с датой (преобразование)
2012-05-18 15:20 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
Код:
=ПСТР(ТЕКСТ('Форма ввода'!$AP$2;"ДДММГГГГ");1;1)

и так далее

MCH>> Re: Удаление части текста из ячейки до четвертого пробела
2012-05-18 15:41 http://forum.msexcel.ru/profiles/mch-u48782.html
Код:
=ЗАМЕНИТЬ(A2;1;ПОИСК(A2;ПОДСТАВИТЬ(A2;" ";A2;4));"")
ну тогда еще на 2 символа короче:
Код:
=ЗАМЕНИТЬ(A2;1;ПОИСК(A2;ПОДСТАВИТЬ(A2;" ";A2;4));)
и еще на два:
Код:
=ПСТР(A2;ПОИСК(A2;ПОДСТАВИТЬ(A2;" ";A2;4))+1;99)


RAN>> Re: Ошибка при объявлении переменной
2012-05-18 15:51 http://forum.msexcel.ru/profiles/ran-u99256.html
Здесь
Код:
Function LastCol(RowNumber As Integer) As Integer
и здесь
Код:
Dim LCol As String
    Dim LRow As Long
    LCol = LastCol(9) 'Получаем последнюю колонку


Allaire>> Re: Помогите разобраться с датой (преобразование)
2012-05-18 16:01 http://forum.msexcel.ru/profiles/allaire-u26105.html
Код:
=ПСТР(ТЕКСТ('Форма ввода'!$AP$2;"ДДММГГГГ");1;1)

и так далее
Спастбо за пример, но почему-то в поле вместо цифры появляется буква Д (т.е. ПСТР выгребает 1 знак из этой маски), что за?

Allaire>> Re: Помогите разобраться с датой (преобразование)
2012-05-18 16:13 http://forum.msexcel.ru/profiles/allaire-u26105.html
Спастбо за пример, но почему-то в поле вместо цифры появляется буква Д (т.е. ПСТР выгребает 1 знак из этой маски), что за?
Спасибо, разобрался... надо было:

=ПСТР(ТЕКСТ('Форма ввода'!$AP$2;"dd-mm-yyyy");1;1) - хз почему


Hugo121>> Re: как создать макрос для поиска строки по условиям
2012-05-18 16:15 http://forum.msexcel.ru/profiles/hugo121-u30647.html
Да, VAL() это даже проще - всё равно копеек нет и не интересуют Улыбка


ShAM>> Re: Как избежать ошибку "Число сохранено как текст"
2012-05-18 16:25 http://forum.msexcel.ru/profiles/sham-u106530.html
Цитировать
Да но сделать это на каждом компьютере где будет открываться файл невозможно. Да и к тому же это относиться ко всем файлам и частенько оказывается полезной вещью. Именно потому и возник вопрос как это сделать программно для известного заранее диапазона
Можете сделать так.
Код:
Private Sub Workbook_Open()
Application.ErrorCheckingOptions.NumberAsText = False
End Sub
Код:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.ErrorCheckingOptions.NumberAsText = True
End Sub
Т.е. при открытии книги убираете галочку, перед закрытием ставите обратно.

Или лучше на Activate, Deactivate книги или листа.


Wasilic>> Re: как создать макрос для поиска строки по условиям
2012-05-18 17:31 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Да, VAL() это даже проще - всё равно копеек нет и не интересуют Улыбка
И копейки будут, если будут.

Poltava>> Re: Как избежать ошибку "Число сохранено как текст"
2012-05-18 17:44 http://forum.msexcel.ru/profiles/poltava-u39021.html
Да это вариант на активацию листа событие засунуть.
В принципе пока наверно лучшее. Но все же мне уже стал интерес и обратный вопрос  как отфильтровать числа как текст.

Poltava>> Re: Ошибка при объявлении переменной
2012-05-18 17:50 http://forum.msexcel.ru/profiles/poltava-u39021.html
Да а ларчик просто открывался. Спасибо а то как то уже глаза за мылились и не подумал туда глянуть. Точнее смотрел но в упор невидел

Hugo121>> Re: как создать макрос для поиска строки по условиям
2012-05-18 18:17 http://forum.msexcel.ru/profiles/hugo121-u30647.html
Ну копейки то конечно копирует. Но не анализирует.
Там после разделителя хоть что может быть написано...


nick31>> Re: как создать макрос для поиска строки по условиям
2012-05-18 18:19 http://forum.msexcel.ru/profiles/nick31-u142101.html
и при добавлении строк, когда сам добавляешь пишет, что файл открыт. повторное открытие приведет к потере данных

nick31>> Re: как создать макрос для поиска строки по условиям
2012-05-18 18:28 http://forum.msexcel.ru/profiles/nick31-u142101.html
при удалении строк самому из файла ЮЛ и сразу же после нажатия макроса, он строки копирует не стирая, получается, что дубль происходит! можно сделать так, чтобы он очищал старые строки и записывал новые измененные туда?

vvvsu>> Помогите составить формулу умножения
2012-05-18 18:50 http://forum.msexcel.ru/profiles/vvvsu-u142581.html
Помогите составит формулу умножения на разные коэффиц, если значение ячейки больше или меньше заданного условия

Wasilic>> Re: как создать макрос для поиска строки по условиям
2012-05-18 19:10 http://forum.msexcel.ru/profiles/wasilic-u24852.html
и при добавлении строк, когда сам добавляешь пишет, что файл открыт. повторное открытие приведет к потере данных
С проверкой на наличие открытого файла!

nick31>> Re: как создать макрос для поиска строки по условиям
2012-05-18 19:32 http://forum.msexcel.ru/profiles/nick31-u142101.html
после макроса с 1 строки, а не с 5...посмотрите

Wasilic>> Re: как создать макрос для поиска строки по условиям
2012-05-18 20:11 http://forum.msexcel.ru/profiles/wasilic-u24852.html
после макроса с 1 строки, а не с 5...посмотрите
Ну откуда ж мне знать, что шапки в новом списке не будет.
Я еще много чего не знаю, поскольку не телепат.
Посему, эта тема, видимо не скоро закроется.
Последняя корректировка.

PS: Вот, к примеру, не знаю, почему макрос должен быть в отдельном файле 1-1, а не может быть непосредственно в файле ЮЛ.  Непонимающий  В замешательстве

Poltava>> Re: Помогите составить формулу умножения
2012-05-18 20:12 http://forum.msexcel.ru/profiles/poltava-u39021.html
Как то странно стоит задачя! Что с чем сравнивать, где брать коэффициенты?
Вот вам такой вариант к примеру если в a1 больше ста то умножиться на 1,2 иначе на 1,5
Код:
=ЕСЛИ(A1>100;A1*1,2;A1*1,5)


shamilganiev>> Re: Помогите пожалуйста, не знаю как ввести математическую формулу в ячейку.
2012-05-19 05:57 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html
Чё-то не могу открыть pdf файл. у всех так или только у меня? задание вроде бы не сложное (на первый взгляд)

shamilganiev>> Re: Ошибка файла: данные могут быть утеряны
2012-05-19 06:03 http://forum.msexcel.ru/profiles/shamilganiev-u140702.html
Если тебе это поможет, то у меня такое тоже бывало на некоторых файлах, но я так и не смог найти закономерности такого поведения до того, как поведение исчезало.
Может попробуешь скопировать все листы в другую, вновь созданную книгу например? Или несколько раз сделать "Сохранить как..." в различные форматы (xls, xlsx, xlsm, ...) и потом обратно в старый формат или остаться на том формате, на котором не глючит?

Igor_Tr>> Зацепил, на свою голову, цвета заливки ячеек
2012-05-19 10:09 http://forum.msexcel.ru/profiles/igortr-u25564.html
Нужно получить текстовое значение цвета заливки
Например
     ActiveCell.Interior.ColorIndex = 6
     mSring = <текстовое название цвета ("Желтый")>
     ActiveCell.Offset(0,1).Value = mString
Спасибо.

iron priest>> Re: Excel таблицы в Word
2012-05-21 19:05 http://forum.msexcel.ru/profiles/iron_priest-u20725.html
где файлы?

Гоанец>> Re: Цикл VBA, Excel
2012-05-21 19:13 http://forum.msexcel.ru/profiles/goanets-u143013.html
Wasilic, огромное человеческое спасибо! Хорошего вечера -))

GoodLuck To All>> Re: Excel таблицы в Word
2012-05-21 19:14 http://forum.msexcel.ru/profiles/goodluck_to_all-u143032.html
Дело в том, что при открытии этого файла на другом компьютере, все открывается совершенно без проблем. Видимо пострадал EXCEL или WORD именно на моем компьютере!!! Пробовал сносить с чисткой реестра и настроек (RevoUnistiler и CCleaner) - толку ноль. История повторялась. А на другом компьютере все читается без проблем. Могу прикрепить скрин

_Boroda_>> Re: Excel таблицы в Word
2012-05-21 19:40 http://forum.msexcel.ru/profiles/boroda-u12234.html
http://www.excelworld.ru/forum/2-1722-19028-16-1337614904

Гоанец>> Re: Цикл VBA, Excel
2012-05-21 19:48 http://forum.msexcel.ru/profiles/goanets-u143013.html
нет, немножко не то- как быть, если я хочу суммировать не по отобранным значениям (=0), а по произвольному текстовому значению?
вот есть у нас две колонки, в первой текст (покупатель1, 2, 3) а во второй суммы. нам нужно, скажем, получить сумму по покупатель1 и вывести ее куда-нибудь?

вот что-то такое у меня получается, но нэ работает(

Sub fdf()
   PS = Range("A" & Rows.Count).End(xlUp).Row
   X = 0
   For I = 1 To PS
     If Cells(I, 1) Like Range("c5") Then
        X = X + Cells(I, 2)
     End If
   Next I
   Cells(1, 3) = X
End Sub

Гоанец>> Re: Цикл VBA, Excel
2012-05-21 20:09 http://forum.msexcel.ru/profiles/goanets-u143013.html
Спасибо, сам дошел Улыбка

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

asada>> Комбинирование данных и гистограммы. Нужна помощь
2012-05-21 21:14 http://forum.msexcel.ru/profiles/asada-u141915.html
Уважаемые эксперты Excel,
У меня неразрешимая задача. Для наглядности в прикрепленном файле исходные данные и изображение гистограммы, которую нужно получить на выходе.
Помогите, пожалуйста!!

Роман_ВП>> Округление
2012-05-21 22:22 http://forum.msexcel.ru/profiles/romanvp-u104524.html
Здравствуйте!
Возможно ли сделать такое округление?
Необходимо округлить число кратно 5 или 0, по таким параметрам:
если число входит в первую единицу после 5 или 0(325,3; 325,9; 320,9; 320,5), то округлить на уменьшение до 5 или 0 соответственно(325; 325; 320; 320),
всё остальное должно округлятся вверх до 5 или 0 (на увеличение), например как в ОКРВВЕРХ

Файл во вложении.

ZORRO2005>> Re: Округление
2012-05-21 23:28 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
Код:
=ЕСЛИ(ОСТАТ(A2;5)<1;ОКРВНИЗ(A2;5);ОКРВВЕРХ(A2;5))


Wasilic>> Re: Округление
2012-05-21 23:33 http://forum.msexcel.ru/profiles/wasilic-u24852.html
А если так:
=ОКРВВЕРХ(ЦЕЛОЕ(A2);5)

ZORRO2005>> Re: Округление
2012-05-21 23:36 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
У Wasilic симпатичнее!

Роман_ВП>> Re: Округление
2012-05-21 23:49 http://forum.msexcel.ru/profiles/romanvp-u104524.html
У Wasilic симпатичнее!
То что надо!
Спасибо  ZORRO2005, спасибо Wasilic!

kurkova>> Анализ строк, алгоритм Хиршберга
2012-05-22 00:07 http://forum.msexcel.ru/profiles/kurkova-u143060.html
Помогите, пожалуйста, написать функцию для рассчета алгоритма Хиршберга.
http://program.rin.ru/cgi-bin/print.pl?id=863
en.wikipedia.org/wiki/Hirschberg's_algorithm

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

Есть пример, как реализовано расстояние Левенштейна:
Здесь ArrN - функция, которая обрезает пробелы и переводит строку в нижний регистр.

Public Function Levenshtein(prmT1 As String, prmT2 As String) As Long
'вычисляем расстояние Левенштейна между 2умя преобразованными строками
prmT11 = ArrN(prmT1)
prmT21 = ArrN(prmT2)
Dim D() As Long
M = Len(prmT11)
N = Len(prmT21)
ReDim D(M, N)
D(0, 0) = 0
For j = 1 To N
   D(0, j) = D(0, j - 1) + 1 ' Вставка
Next j
For i = 1 To M
   D(i, 0) = D(i - 1, 0) + 1 ' Удаление
   For j = 1 To N
   'D(i, j) = Min(D(i - 1, j) + Ci, D(i, j - 1) + Cd, D(i - 1, j - 1) + Cr)
   ...

Magyar>> Перенос динамически изменяющихся данных в таблицу через равные интервалы времени
2012-05-22 00:24 http://forum.msexcel.ru/profiles/magyar-u143061.html
Добрый вечер!
Есть данные, выводимые через DDE-сервер в Excel, постоянно изменяющиеся (в приложенном рисунке - в красном круге). Есть необходимость заносить их в таблицу, чтоб каждую минуту (2 минуты, десять и т.п.) новые данные записывались в новой строке.
Выполнимо ли и как?
Спасибо!

STEROID>> КАК присвоить ячейке с ЛИСТА2 формульный результат с ЛИСТА1
2012-05-22 00:30 http://forum.msexcel.ru/profiles/steroid-u114348.html
РЕБЯТА выручайте!

Есть список из наименований на ЛИСТЕ1 стобец А, столбец Б количество планируемого расхода, столбец С - свободный остаток = остаток с ЛИСТА2 (ищется по формуле ВПР, критерии поиска на ЛИСТЕ2 разбросаны по столбцу и группировать - ЛОГИЧЕСКИ НЕЛЬЗЯ)-количество к покупке

ЗАДАЧА:
Как видно из примера свободный остаток на ЛИСТЕ1 посчитал, но необходимо прописать такой же результат на ЛИСТЕ2 в соответствующей ячейке, это необходимо осуществить формульно с ЛИСТА1, а именно из  формул со столбца С!

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

Помогите пожалуйста!

Poltava>> Re: КАК присвоить ячейке с ЛИСТА2 формульный результат с ЛИСТА1
2012-05-22 01:05 http://forum.msexcel.ru/profiles/poltava-u39021.html
Не совсем понятно что вы хотели! То как понял во вложении

Poltava>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени
2012-05-22 01:46 http://forum.msexcel.ru/profiles/poltava-u39021.html
Ну это смотря как вы эти данные туда записываете! Самый примитив пришедший в голову накидал в файле ниже. Отлавливаем событие изменение на листе -- проверяем входит ли диапазон в контролируемую область -- считываем данные в таблицу. И еще не совсем понятно что писать в первый столбец посему сделал как представил себе. Нужно же с чего то начинать

STEROID>> Re: КАК присвоить ячейке с ЛИСТА2 формульный результат с ЛИСТА1
2012-05-22 02:55 http://forum.msexcel.ru/profiles/steroid-u114348.html
Спасибо за ответ, видимо действительно неправильно объяснил, хочу сделать что-то вроде:

на листе 1 записать формулу в чистом остатке: И(ВПР(A2;ОСТАТОК!$A$2:B$6;2;ЛОЖЬ)-B2;***присвоить это же значение в соответствующую ячейку (критерий А2) столбца "свободный остаток" на листе 2***)
 - именно такая форма - значение должно считаться в ячейке ЛИСТА1 и одновременно присваиваться с ЛИСТА1 в соответствующую ячейку по заданному критерию на ЛИСТ2, вопрос - каким способом найти эту нужную ячейку, а именно СТОЛБЕЦ "СВОБОДНЫЙ ОСТАТОК" согласно критерия отбора и как же присвоить вычисленное значение свободного остатка  (ВПР(A2;ОСТАТОК!$A$2:B$6;2;ЛОЖЬ)-B2) с ЛИСТА1 в найденную ячейку в ЛИСТ2

ЗНАЧЕНИЯ НЕ МОГУТ ВЫТЯГИВАТЬСЯ с ЛИСТА1, путем записи формул в столбце "свободный остаток" ЛИСТА2, в ЛИСТЕ2 должен быть список динамических значений, динамику которых будут задавать множество условий с других ЛИСТОВ!

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

Andrii>> Re: Поиск одинаковых значений
2012-05-22 09:16 http://forum.msexcel.ru/profiles/andrii-u143152.html
Стоит задача найти и выделить в двух листах одинаковые значения ячеек.

Если бы не "в двух листах", то самое простое решение этой части задачи - выделение дубликатов цветом ([url=http://msexcel.ru/content/view/116/2/]условное_форматирование[/url]).
Например,
Выделение дубликатов цветом - excel


Wasilic>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени
2012-05-22 09:35 http://forum.msexcel.ru/profiles/wasilic-u24852.html
Есть необходимость заносить их в таблицу, чтоб каждую минуту (2 минуты, десять и т.п.) новые данные записывались в новой строке.
Выполнимо ли и как?
Так можно.

Poltava>> Re: КАК присвоить ячейке с ЛИСТА2 формульный результат с ЛИСТА1
2012-05-22 10:49 http://forum.msexcel.ru/profiles/poltava-u39021.html
Цитировать
ЗНАЧЕНИЯ НЕ МОГУТ ВЫТЯГИВАТЬСЯ с ЛИСТА1, путем записи формул в столбце "свободный остаток" ЛИСТА2, в ЛИСТЕ2 должен быть список динамических значений, динамику которых будут задавать множество условий с других ЛИСТОВ!
От этих слов мой мозг опух! я перечитал раз 10 но так и не понял ПОЧЕМУ нельзя формулой! Что в вашем понимании значит динамические значения. Это же противоречит вопросу! Я не понимаю какая разница между записью в ячейку откуда то и считыванием данных формулой в туже ячейку!
Ну а если по существу вопроса то я о таких способах не знаю, по крайне мере стандартными средствами. Если можно использовать VBA то тогда решение есть причем довольно не сложное. Но оно вам надо Непонимающий


Barbarian12>> Re: Комбинирование данных и гистограммы. Нужна помощь
2012-05-22 11:26 http://forum.msexcel.ru/profiles/barbarian12-u139204.html
Нужно что-то подобное? Наложил две диаграммы друг на друга и в самой таблице добавил по пустой строке между брендами.

Poltava>> Как узнать текущие параметры сортировки
2012-05-22 11:40 http://forum.msexcel.ru/profiles/poltava-u39021.html
Добрый день. Захотел реализовать функцию чтоб при двойном клике по шапке таблицы она сортировалась по этому столбцу. Уперся в то что не могу получить текущие параметры сортировки
То есть клацнул два раза отсортировало от A до Я клацнул опять два раза отсортировало от Я до А
Вопрос в том как определить что уже произведена сортировка от A до Я и отсортировать теперь уже нужно от Я до А
Цитировать
    ActiveWorkbook.Worksheets(1).Sort.SortFields.Clear
    ActiveWorkbook.Worksheets(1).Sort.SortFields.Add Key:=Range("E10:E4032") _
        , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets(1).Sort
        .SetRange Range("A10:H4032")
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
Сортировку делаю таким макросом



Barbarian12>> Re: Макрос, отображающий значения из таблицы
2012-05-22 11:57 http://forum.msexcel.ru/profiles/barbarian12-u139204.html
Можно так попробовать:

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

Да, рассчитано на то, что в момент запуска активна ячейка с критерием (например "ИКСТРИМ")
Спасибо. Парочка замечаний:
- Нужно, чтобы данные начинали отображаться не со строки 2, а с той же строки, из которой осуществляется поиск. Т.е. если искомое значение находится в строке 152, то и значений из таблицы должны отображаться с ячейки К152;
- При каждом поиске сейчас отображается вторая строка, что неверно (см. пример);
- При следующем запуске макроса, предыдущие результаты поиска должны удаляться.

Magyar>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени
2012-05-22 12:20 http://forum.msexcel.ru/profiles/magyar-u143061.html
Ну это смотря как вы эти данные туда записываете! Самый примитив пришедший в голову накидал в файле ниже. Отлавливаем событие изменение на листе -- проверяем входит ли диапазон в контролируемую область -- считываем данные в таблицу. И еще не совсем понятно что писать в первый столбец посему сделал как представил себе. Нужно же с чего то начинать

Дело в том, что данные поступают через DDE постоянно, каждую секунду. А заносить в таблицу нужно раз в минуту, остальные 59 секунд данные пропускаются

Adar>> Ускорения работы Excel файла
2012-05-22 12:24 http://forum.msexcel.ru/profiles/adar-u8942.html
Здравствуйте,

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

Буду признателен различным решения для ускорения.

И непосредственно меня интересует такое решение (если оно даёт эффект): макрос, где:
перед выходом из книги, отключается пересчёт в ячейках, что я так понимаю может ускорить сохрание/выход и загрузку файла снова.
макрос при запусе которого наоборот будет обратно включится автоматический пересчёт <- прийдётся ли мне тогда ждать N-ное время равное времени загрузки файла при уже включённом автоматическом расчёте или оно будет всё же заметно меньше?

Magyar>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени
2012-05-22 12:29 http://forum.msexcel.ru/profiles/magyar-u143061.html
Есть необходимость заносить их в таблицу, чтоб каждую минуту (2 минуты, десять и т.п.) новые данные записывались в новой строке.
Выполнимо ли и как?
Так можно.

Моя недоработка - не сказал, что постоянно изменяющиеся данные в ячейках - формулы, берущие данные из других ячеек. А как я понял .ClearContents чистит ячейки. С формулами вместе.

А еще... Спасибо, ребята, за активное участие! На другом форуме программеров просто показали, что я лузер, и на том конец

Poltava>> Re: Ускорения работы Excel файла
2012-05-22 13:34 http://forum.msexcel.ru/profiles/poltava-u39021.html
Почитайте здесь Несколько советов по работе с VBA в Excel У меня был такой файл в нем было около 100000 строк и порядка 10 колонок. Данные в этот лист через разные формулы вытягивались из остальных листов книги где их было около 10 и в каждом еще тысяч по 10000-30000 строк и порядка 4 колонок. Он жутко долго открывался и сохранялся. каждый пересчет занимал минут 5!!! Работать было почти невозможно любое нажатие на ентер порождало пересчет и так далее. Для работы отключал автопересчет реакцию на события прогрес бар. потом поменяв все включал обратно и минут через 5 наблюдал нужный мне результат.
В итоге и от этого метода ушел как от пагубного. Написал макрос который по кнопке обновляет данные на первом листе. то есть нажал кнопку подождал 30 секунд все на 1 лист записаны значения с остальных листов нет формул нет проблем с пересчетом и кстати размер файла стал поменьше когда ушел от формул ссылок и динамических диапазонов.

nick31>> сравнение 2 х файлов по определенным столбцам
2012-05-22 15:57 http://forum.msexcel.ru/profiles/nick31-u142101.html
у нас есть 2 файла "списание" и "реквизиты"! Нужно создать макрос, чтобы при сравнении столбцов по реквизитам из файла "реквизиты" данные копировались в файл "списание" по определенным столбцам! Например если бик банка столбца U файла "реквизиты" совпадает с бик банком столбца Y "списание" и № счета столбца W файла "реквизиты" совпадает с № счета столбца U "списания", то данные файла "реквизиты" B,C,D,E,F,G,H копируются в файл "списание" по столбцу C,D,E,F,G,H,I. Данные V копируются в AV, данные I,J,K,L,M,N,O,P,Q,R,S,T копируются в AJ,AK,AL,AM,AN,AO,AP,AQ,AR,AS,AT,AU соответственно. Затем если U совпадает с N и W совпадает с R, то данные копируются с B,C,D,E,F,G,H в AC,AD,AE,AF,AG,AH,AI после V копируется в BI и I,J,K,L,M,N,O,P,Q,R,S,T, КОПИРУЕТСЯ В AW,AX,AY,AZ,BA,BB,BC,BD,BE,BF,BG,BH , А ЕСЛИ ДАННЫХ НЕТ ПО ЭТОМУ КЛИЕНТУ, ТО НИЧЕГО НЕ ПРОИСХОДИТ, ПОЛЯ НИЧЕМ НЕ ЗАПОЛНЯЮТСЯ

Wasilic>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени
2012-05-22 16:08 http://forum.msexcel.ru/profiles/wasilic-u24852.html
постоянно изменяющиеся данные в ячейках - формулы, берущие данные из других ячеек
Какие формулы? В каких ячейках?
В ячейках обведенных кругом?
Так оттуда берется только результат и заносится в таблицу.
А таблица очищается при каждом следующем открытии книги.
Не надо очищать, сообщите. Откуда мне или другим знать, как надо.
В данном случае, это был пример для решения поминутного выполнения какой либо задачи. А в остальном - думайте.
Правильно будет, если будет пример, а не картинка, как положено согласно п.2 [url=http://forum.msexcel.ru/pravila_foruma/pravila_foruma-t129.0.html]правил_форума[/url] и четко поставлена задача!


Poltava>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени
2012-05-22 16:29 http://forum.msexcel.ru/profiles/poltava-u39021.html
На сколько я понял человека ему нужен макрос который будет срабатывать раз в t секун и писать время и данные из этих ячеек в таблицу. Но у меня вопрос у вас эти данные пишутся в то время как файл открыт или закрыт или в любом случае Непонимающий и данные обязательно в этот файл или можно в другой???

KuklP>> Re: Как узнать текущие параметры сортировки
2012-05-22 16:56 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Очень просто:
Код:
f = IIf([a1] > [a2], xlAscending, xlDescending)
Или короче:
Код:
f = ([a1] > [a2]) + 2
А в сорт:
Код:
Order:=f


Poltava>> Re: Как узнать текущие параметры сортировки
2012-05-22 17:32 http://forum.msexcel.ru/profiles/poltava-u39021.html
Да но это скорее обход проблемы а не ее решение. Подойдет если нас интересует именно параметр Order: а если нужно узнать SortOn: то тогда как Непонимающий или если данные вообще не сортированы??? тогда чистый рандом получается.

Quixotic>> Автоматический выбор коэффициента по дате.
2012-05-22 17:43 http://forum.msexcel.ru/profiles/quixotic-u143043.html
Уважаемые участники форума, подскажите пожалуйста как организовать автоматическую подстановку коэффициента для заданной даты для последующих расчетов с учетом подставленного коэффициента.
Во вложении примерный вариант таблицы... В первую таблицу вводятся данные и происходит деление числа на коэффициент. Во второй предоставлен список коэффициентов для дат расчета. Задача в том, чтобы человек мог указать дату вычисления, а программа сама выбрала нужный коэффициент и произвела деление, с отражением каждого значения в своем поле (наглядность обязательна). Коэффициенты изменяются не каждый день и поэтому нужно как то сделать, чтобы программа выбирала коэффициент ближайшей прошедшей даты для каждой операции (если конечно такое возможно).
К сожалению мои знания эксель не позволяют мне на данный момент сообразить как это все осуществить, поэтому очень прошу местных гуру помочь разобраться в данном вопросе.
Заранее благодарен.

KuklP>> Re: Как узнать текущие параметры сортировки
2012-05-22 17:43 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Дерзайте. Может Вам удастся найти то, чего нет.

Poltava>> Re: Как узнать текущие параметры сортировки
2012-05-22 17:55 http://forum.msexcel.ru/profiles/poltava-u39021.html
Это намек на то что невозможно узнать отсортированы данные или нет или на то что вообще нельзя ничего узнать???

ZORRO2005>> Re: Комбинирование данных и гистограммы. Нужна помощь
2012-05-22 17:56 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
Barbarian12,
как вы сделали бренды разными цветами?

ZORRO2005>> Re: Автоматический выбор коэффициента по дате.
2012-05-22 18:01 http://forum.msexcel.ru/profiles/zorro2005-u4225.html
В ячейку С2:
Код:
=ВПР(A2;Коэффициенты!$A$2:$B$14;2)
Только есть ограничение:
даты на листе "Коэффициенты" должны быть расположены в возрастающем порядке.

KuklP>> Re: Как узнать текущие параметры сортировки
2012-05-22 18:10 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Это не намек:) Такие вопросы уже задавались на форумах.
"невозможно узнать отсортированы данные" - почему, возможно. Принцип такой же, как я предложил. А узнавать по каким полям группированы данные... можно, но хлопотно. Да и в жизни не нужно. На самом деле всегда нужно сортировать по каким-то условиям. А как оно было отсортировано ранее - какая разница?

Poltava>> Re: Как узнать текущие параметры сортировки
2012-05-22 18:25 http://forum.msexcel.ru/profiles/poltava-u39021.html
Ну по сути задача такая. Всего возможны 4 варианта сортировки для одного и того же поля! от А до Я; от Я до А; от большего к меньшему и от меньшего к большему
если с параметром от до можно сравнить то вот как понять как отсортировано сейчас как числа или как текст. То есть по алфавиту или по порядку номеров даже не представляю.
Хотя если все так сложно то может просо вывести пользователю окно сортировки а там сам пусть думает! но опять таки как вывести пользователю окно сортировки Непонимающий




KuklP>> Re: Как узнать текущие параметры сортировки
2012-05-22 18:37 http://forum.msexcel.ru/profiles/kuklp-u39713.html
Попробуйте:
Код:
Application.Dialogs(39).Show
Или
Код:
Application.Dialogs(192).Show


Magyar>> Re: Перенос динамически изменяющихся данных в таблицу через равные интервалы времени
2012-05-22 18:53 http://forum.msexcel.ru/profiles/magyar-u143061.html
На сколько я понял человека ему нужен макрос который будет срабатывать раз в t секун и писать время и данные из этих ячеек в таблицу. Но у меня вопрос у вас эти данные пишутся в то время как файл открыт или закрыт или в любом случае Непонимающий и данные обязательно в этот файл или можно в другой???

Все именно так! Данные пишутся только при открытом файле. Можно и в другой файл


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

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


В избранное