← Ноябрь 2010 → | ||||||
1
|
2
|
3
|
4
|
6
|
7
|
|
---|---|---|---|---|---|---|
8
|
9
|
10
|
11
|
13
|
14
|
|
15
|
16
|
17
|
18
|
20
|
21
|
|
22
|
23
|
24
|
25
|
27
|
28
|
|
29
|
30
|
За последние 60 дней ни разу не выходила
Сайт рассылки:
http://msexcel.ru
Открыта:
17-06-2006
Адрес
автора: job.education.exl-owner@subscribe.ru
Статистика
0 за неделю
DNK>> Сравнение двух файлов и отчет
Профессиональные приемы работы в Microsoft Excel Выпуск 46 Подписчиков: 6083 Рассылка сайта "Профессиональные приемы работы в Microsoft Excel"
Новости сайта в формате RSS Порекомендуйте нашу рассылку друзьям Обратная связь Наши рассылки: Наши сайты Профессиональные приемы работы в Microsoft Excel bonifatiy.narod.ru Собор Смоленских святых. Жития, иконы, календарь памятных дат Смоленской епархии. StudentTools.Narod.Ru Для тех, кто любит учиться Наши друзья VBAtips.ru - wordexpert.ru planetaexcel.ru |
Новые сообщения форума "Профессиональные приемы работы в Microsoft Excel"
DNK>> Сравнение двух файлов и отчет
BloodNick>> Имя открытого файла
Hugo121>> Re: Вставка курса валют из интернета + перевод по курсу
nilem>> Re: Имя открытого файла
kenya>> Сохранение в DBF
BloodNick>> Re: Имя открытого файла Код: Dim iName As String iName = ActiveWorkbook.FullName или iName = ThisWorkbook.Name но когда вставляем в: Код: Workbooks(iName).Sheets("Лист1").Range("A" & l) оно не работает.....
Melatonin>> Re: Выборка по значениям
kenya>> Re: Составление итоговой таблицы Для одного листа будет примерно так: В котороый раз уже спасибо=) Есть еще задачка: в табличке идут цифры по кассам, а надо вывести сумму по магазинам(пример во вложении) Подскажите
nilem>> Re: Имя открытого файла Код: ThisWorkbook.Sheets("Лист1").Range("A" & l) = 123
'или ActiveWorkbook.Sheets("Лист1").Range("A" & l) = 321
ARTSTAR>> Re: Отследить объем файла Книга xlsx - это по сути архив, поэтому и меньше по сравнению с тем же неархивированным в версии xls. Мне по сути xlsx не нужен, поэтому переводя обратно в xls объем оставался как у книги, - на 1,3 меньше прошлого варианта....
doro162>> Re: Вставка курса валют из интернета + перевод по курсу
All-ejik>> Re: Заковыристая задачка: прочерки после суммы. Я что-то не очень понял. Ваша фраза: Всувальщику может ничего и не даст, а вот РКЦ придрется моментально Цитировать Для чего это нужно: во многих платежных документах не допускаются пробелы до и после суммы - во избежание добавления цифр С форматом 0*= и выравниванием по левому краю ДО и ПОСЛЕ суммы пробелов нет. Небольшой пробельчик может быть только в правом окончании ячейки, но:1. этот пробел по ширине меньше ширины числового символа, следовательно, цифра туда не влезет; 2. если даже кто-то умудрится всунуть туда цифру, то получится 111=====2. И что это даст этому всувальщику? Ну а вообще тему давно пора закрывать, спасибо за ответы и внимание:) Есть новая проблема, но для нее - отдельная тема:)
Hugo121>> Re: Отследить объем файла
All-ejik>> Считаем буквы:)
ZORRO2005>> Re: Считаем буквы:)
All-ejik>> Re: Считаем буквы:) =СЧЁТЕСЛИ(A1:A16;"а") Спасибо тебе, добрый человек!!!:) Тема закрыта.
BloodNick>> Re: Имя открытого файла Код: Sub Import() что ставишь ActiveWorkbooks что ThisWorkbooks...толку особо нету...но все равно работает так: открывает книгу цена.xls и ячейки из нее присваевает к ней же...или либо вообще пберет ячейки с Personal.xls...а мне нужно что бы в открытый документ с которго я запустил макрос вставлял ячейки из документ...
Dim ExlApp As Object Dim r, l As Long, iName As String 'Открытие документа Dim es As Object Set es = GetObject("C:\Tempp\цена.xls") es.Application.Workbooks.Open Filename:="C:\Tempp\цена.xls" iName = ActiveWorkbook.FullName Workbook.Active(iName).Sheets ("Лист1") For r = 1 To 10 For l = 1 To 10 If Active.Workbooks.Sheets("Лист1").Range("A" & r).Value = Workbooks("цена.xls").Sheets("Лист1").Range("A" & l).Value Then Active.Workbooks.Sheets("Лист1").Range("C" & r).Value = Workbooks("цена.xls").Sheets("Лист1").Range("B" & l).Value End If Next l Next r End Sub
Inventor_S>> Re: Автоматический подсчет диапазона ячеек по значению (цифре)
nilem>> Re: Имя открытого файла Код: Sub Import()
Dim r As Long, l As Long Dim es As Object Set es = GetObject("C:\Tempp\цена.xls") For r = 1 To 10 For l = 1 To 10 If ThisWorkbook.Sheets("Лист1").Range("A" & r).Value = es.Sheets("Лист1").Range("A" & l).Value Then ThisWorkbook.Sheets("Лист1").Range("C" & r).Value = es.Sheets("Лист1").Range("B" & l).Value End If Next l Next r es.Close False End Sub
Wasilic>> Re: Сравнение двух файлов и отчет Здравствуйте, скажу сразу я новичок и в экселе Поэтому, простая подсказка ничего не даст. Задачу кому то придется решать до готовности.Поэтому, Есть 2 файлика (2 книги Excel). Нужно выложить эти два файлика как есть и третий с примером как надо, и Вам помогут. Задачка не из сложных.
Василий Алибабаевич>> Re: Отследить объем файла
Ravenzzz>> Задача по делению массива данных на части с равномерным распределением
DNK>> Re: Сравнение двух файлов и отчет
apencil>> Формирование прайса
iron priest>> Re: Формирование прайса
apencil>> Re: Формирование прайса
Севиль>> Re: Частичное отображение данных одной ячейки в других
galbert>> сумма первых 5-ти положительных значений
kimtan>> Re: сумма первых 5-ти положительных значений
Hugo121>> Re: Сравнение двух файлов и отчет
MCH>> Re: сумма первых 5-ти положительных значений {=СУММ(A1:ИНДЕКС(A1:A65000;НАИМЕНЬШИЙ(ЕСЛИ(A1:A100>0;СТРОКА(A1:A100));5)))} Лучше так:=СУММЕСЛИ(A1:ИНДЕКС(A1:A65000;НАИМЕНЬШИЙ(ЕСЛИ(A1:A100>0;СТРОКА(A1:A100));5));">0")
Serge 007>> Re: сумма первых 5-ти положительных значений Код: =СУММПРОИЗВ(НАИМЕНЬШИЙ(ЕСЛИ(ЗНАК(A:A)=1;A:A);{1;2;3;4;5})) или ещё короче так:Код: =СУММ(НАИМЕНЬШИЙ(ЕСЛИ(ЗНАК(A:A)=1;A:A);{1;2;3;4;5})) Обе - формулы массива, т.е вводим нажатием Ctrl+Shift+Enter, даже СУММПРОИЗВ
kimtan>> Re: сумма первых 5-ти положительных значений Лучше так:... Чем же?Серж, проверь формулы
tashka-tashka>> Re: Соединение данных из нескольких таблиц В общем-то я уже объединила все файлы-исходники, типа таблиц 1-3 на один лист, т.к. мне надо было с данными некоторые манипуляции произвести, но.... теперь как их сопоставить с алфавитным перечнем и расписать как указано в моей выходной таблице? и встала я в тупик от того, что придется мне постоянно исходники или копировать или еще как-то перетаскивать в страницу для объединения...... что не есть удобно.....Можно ли каким-то образом данные из однотипных таблиц собрать на одном листе "лист объективности"? как я понимаю это макросы, но с ними я не работала. ДВССЫЛ не пподходит т.к. работает только с открытыми книгами. И еще одно условие. данная задача будет решаться множество раз, ...
MCH>> Re: сумма первых 5-ти положительных значений Чем же? Тем, что не суммирует отрицательные значения
kimtan>> Re: сумма первых 5-ти положительных значений
Margo88>> Раскрасить ячейки в одной книге в соответствии с ячейками в другоц книге
_Boroda_>> Re: Раскрасить ячейки в одной книге в соответствии с ячейками в другоц книге
DNK>> Re: Сравнение двух файлов и отчет
pekan>> не работает формула при копировании в
BloodNick>> Re: Имя открытого файла
Serge 007>> Re: сумма первых 5-ти положительных значений Серж, проверь формулы Игорь, я файл в пост вложил, всё правильно
Hugo121>> Re: Сравнение двух файлов и отчет
Jmurik>> Отправка сообщений на электронку.
kimtan>> Re: сумма первых 5-ти положительных значений
galbert>> Re: сумма первых 5-ти положительных значений
Serge 007>> Re: сумма первых 5-ти положительных значений Они суммируют 5 наименьших положительных, а автору нужно было (не уверен нужно ли сейчас, судя по шквалу ответов от него) чтобы суммировались первые по списку. Попробуй хотябы в ячейке A1 поставить число 20. Да, чё-то я задание не понял, ты прав.Я тоже построил числовой ряд и не учел, что положительные могут идти в перемешку с отрицательными. Ошибался, пока МСН не указал на ошибку. galbert, формула MCH правильная, пользуйтесь ей.
kimtan>> Re: сумма первых 5-ти положительных значений
galbert>> Re: сумма первых 5-ти положительных значений
galbert>> Re: сумма первых 5-ти положительных значений galbert, а нужно было сделать пример в формате xls, подкрасить ячейки которые должны суммироваться, заархивировать его и прикрепить к своему сообщению на форуме. И тогда бы Вы получили быстрый и правильный ответ. kimtan, абсолютно правы. Сделаю выводы.Спасибо
i777>> MsgBox
Алексей Шмуйлович>> Перенесено: Сборник готовых решений в Excel
iskatel74>> Подскажите, как можно сверстать брошюру в MS Word
Алексей Шмуйлович>> О борьбе со спамом
DNK>> Re: Сравнение двух файлов и отчет
Hugo121>> Re: Сравнение двух файлов и отчет
i777>> MsgBox
galbert>> Re: сумма первых 5-ти положительных значений
kimtan>> Re: сумма первых 5-ти положительных значений
galbert>> Re: сумма первых 5-ти положительных значений
galbert>> Re: сумма первых 5-ти положительных значений Только Вы почему-то 6 чисел посчитали, или 0 не учитывается тоже? ошибся. "0" учитываетсяСм. вложение сейчас посмотрю вложение
gobler>> Суммирование выбираемых значений до достижения определенной суммы
galbert>> Re: сумма первых 5-ти положительных значений Только Вы почему-то 6 чисел посчитали, или 0 не учитывается тоже? спасибо kimtan. Работает.См. вложение Запись : A1:A27<>"" означает, что берутся данные из ячейки за исключением пустот?
galbert>> Re: сумма первых 5-ти положительных значений
astera>> Сортировка по столбцам
kimtan>> Re: сумма первых 5-ти положительных значений
MCH>> Re: Суммирование выбираемых значений до достижения определенной суммы
MCH>> Re: Задача по делению массива данных на части с равномерным распределением
kimtan>> Re: Суммирование выбираемых значений до достижения определенной суммы
MCH>> Re: Суммирование выбираемых значений до достижения определенной суммы Без доп.столбцов и массивов. В голубых ячейках. первоначально была такаяже мысль через НАИБОЛЬШИЙ, но в случае повторения значений в поле "количество", ПОИСКПОЗ даст первое нахождение, соответственно строки задвоятся
kimtan>> Re: Суммирование выбираемых значений до достижения определенной суммы
MCH>> Re: Суммирование выбираемых значений до достижения определенной суммы Ну тогда прийдется лепить доп.столбец с чем-то вроде =количество+СТРОКА()/100000 Сделал без доп. столбцов на массивах с использованием конструкции НАИМЕНЬШИЙ(диапазон_количество - СТРОКА(диапазон_количество)/100000;...), получилась громозская формула.Лучше все таки, с доп. столбцом и без массивов
POV>> При протягивании формулы верхнего уровня все ячейки скрытых уровней тоже меняют
MCH>> Re: При протягивании формулы верхнего уровня все ячейки скрытых уровней тоже меняют
sergo44441>> подготовка данных для подтягивания значений при помощи впр
Serge 007>> Re: подготовка данных для подтягивания значений при помощи впр
galbert>> Re: сумма первых 5-ти положительных значений
Serge 007>> Re: При протягивании формулы верхнего уровня все ячейки скрытых уровней тоже меняют Как этого избежать? Не пользоваться группировкой. Совершенно бессмысленный инструмент в расчётных файлах.Другое дело - применять его в красивых отчётах для начальства. Но в этих отчётах нет формул Понимаете о чём я ?
Serge 007>> Re: сумма первых 5-ти положительных значений еще одна проблема возникла См. файл Код: =СУММ(H20:ИНДЕКС(H20:H100;НАИМЕНЬШИЙ(ЕСЛИ(ЕЧИСЛО(H20:H100);СТРОКА(A1:A81));3)))
kimtan>> Re: подготовка данных для подтягивания значений при помощи впр Конкатенация не самый лучший способ для обработки больших массивов Серега, здесь конкатенацию планируется использовать уже не в массиве, а в диапазоне, что будет гораздо оптимальнее по скорости чем преобразования в массивах без конкатенации. Так что у автора направление мысли верное.В остальном - вопрос не понял. Если можно - поясните... ИНДЕКС(диапазон;ПОИСКПОЗ(....)) будет быстрее [url=http://msexcel.ru/content/view/20/2/]ВПР(_)[/url] хоть и незначительно.
galbert>> Re: сумма первых 5-ти положительных значений
Serge 007>> Re: подготовка данных для подтягивания значений при помощи впр Серега, здесь конкатенацию планируется использовать уже не в массиве, а в диапазоне... Я ж говорю - вопрос не понял
Serge 007>> Re: сумма первых 5-ти положительных значений А почему такой диапазон: Размерность диапазонов должна совпадать - H20:H100 - 80 строк, A1:A81 - 80 строк.A1:A81? Кроме того СТРОКА возвращает диапазон начиная с указанной строки, а Вам первый НАИМЕНЬШИЙ разве 20 нужен?
galbert>> Re: сумма первых 5-ти положительных значений
lorents>> Определение наименьшего числа в строке
ZORRO2005>> Re: подготовка данных для подтягивания значений при помощи впр
lorents>> Re: Определение наименьшего числа в строке
gobler>> Re: Суммирование выбираемых значений до достижения определенной суммы
sergo44441>> Re: подготовка данных для подтягивания значений при помощи впр
gobler>> Re: Суммирование выбираемых значений до достижения определенной суммы
Ferox>> Фильтрация таблицы по значению в определенной ячейке.
sovere>> Выбор значения из массива данных по нескольким условиям
Hugo121>> Re: Выбор значения из массива данных по нескольким условиям Код: Option Explicit Диапазоны можно сделать динамическими, и можно результат собирать в третий массив, будет быстрее выгрузка, но чуть непонятнее код
Sub tt() Dim a(), b(), i As Long, ii As Long, iii As Long a = Sheets(1).[b2:h8].Value b = Sheets(2).[b3:e20].Value For i = 1 To UBound(a) For ii = 1 To UBound(b) If a(i, 1) = b(ii, 1) Then If a(i, 2) = b(ii, 2) Then For iii = 3 To 7 If b(ii, 3) = a(1, iii) Then b(ii, 4) = a(i, iii): Exit For Next Exit For End If End If Next ii, i Sheets(2).[b3:e20].Value = b End Sub
ZORRO2005>> Re: Выбор значения из массива данных по нескольким условиям Код: =ИНДЕКС(Табель!$D$3:$H$8;ПОИСКПОЗ(B3&C3;Табель!$B$3:$B$8&Табель!$C$3:$C$8;0);ПОИСКПОЗ(D3;Табель!$D$2:$H$2;0)) Формула массива
ZORRO2005>> Re: Фильтрация таблицы по значению в определенной ячейке.
Dmitr68>> Re: Выбор значения из массива данных по нескольким условиям
sovere>> Re: Выбор значения из массива данных по нескольким условиям
ZORRO2005>> Re: Выбор значения из массива данных по нескольким условиям Цитировать ПОИСКПОЗ(2;МУМНОЖ(СЧЁТЕСЛИ(B3:C3;Табель!B$3:C$8);{1:1});0)
Ferox>> Re: Фильтрация таблицы по значению в определенной ячейке.
Гера>> Сводные таблицы
skrudg_007>> Преобразования ряда чисел по горизонтали в вертикальный ряд чисел
Serge 007>> Re: Сводные таблицы
Serge 007>> Re: Преобразования ряда чисел по горизонтали в вертикальный ряд чисел ...существует ли для этого какая либо формула? Существует.Код: =ИНДЕКС($C$2:$S$2;;СТРОКА()) Код: =ТРАНСП(D2:T2)
Serge 007>> Re: Фильтрация таблицы по значению в определенной ячейке. А можно примерчик? С макросами практически не работал. А можно примерчик Вашего файла? Глядишь и без макросов обойдёмся
ZORRO2005>> Re: Фильтрация таблицы по значению в определенной ячейке. А можно примерчик? С макросами практически не работал. Примерно так.(см. вложение). Я - формулист, поэтому код наверно стоит подправить.
Кот>> Re: Сортировка по столбцам
astera>> Re: Сортировка по столбцам
Ravenzzz>> Re: Задача по делению массива данных на части с равномерным распределением
KuklP>> Re: Подскажите, как можно сверстать брошюру в MS Word
aka_smile>> Как расширить критерии фильтрации
nixelent>> Как реализовать заполнение в ячейке датой последнего редактирования строки?
Зотик>> Цифры прописью
TimSha>> Re: Как расширить критерии фильтрации
aka_smile>> Re: Как расширить критерии фильтрации
Ferox>> Re: Фильтрация таблицы по значению в определенной ячейке. А можно примерчик? С макросами практически не работал. А можно примерчик Вашего файла? Глядишь и без макросов обойдёмся
MCH>> Re: Цифры прописью
TimSha>> Re: Как расширить критерии фильтрации
aka_smile>> Re: Как расширить критерии фильтрации
TimSha>> Re: Как расширить критерии фильтрации
kenya>> Re: Составление итоговой таблицы
Wasilic>> Re: Как реализовать заполнение в ячейке датой последнего редактирования строки? и если вас не затруднит оставьте пример на одной ячейке. Далее думаю разберусь. Заранее огромное Вам спасибо и успехов! И Вам успехов в контроле за пользователями.
Wasilic>> Re: Сортировка по столбцам Цитировать Возникла необходимость делать сортировку в отчете по столбцам Так все таки astera, нужна сортирОвка по колонкам или фильтрАция по колонкам?В пояснении: Цитировать им необходимо выбрать одного или нескольких "своих" ТП так, чтобы по соответствующему коду ТП отсортировалась вся база торговых точек закрепленных за ними. Вы уж определитесь, выбрать или отсортировать.Сортировка по колонке С приведет таблицу со списком в этой колонке в алфавитном порядке. Сортировка по колонке D приведет таблицу со значениями в этой колонке в порядке возростания или уменьшения значений. Насколько я понял, то Вам необходимо в таблице оставить колонки например с ТП "кмтп2" а остальные скрыть. То есть - отфильтровать, оставив колонки с этим ТП. Или моя телепатия ошибочная. Пример нужен не только как есть но и как нужно, тогда никому не придется быть телепатом. Вот так то Ленка (если Ленка).
fadykstas>> Re: СМЕЩ на закрытый файл, или как получить массив из другого файла Цитировать Цитировать Сначала откройте файл 2, потом файл 1 , потом пересохраните файл 2 к себе на комп и закройте. Файл 1 все равно будет работать пересохранил на диск С. при закрытии файла 2 данные остаются. при закрытии и дальнейшем открытии файла 1 - данные исчезают (см.вложение) Блин. Вы какой файл открываете? Совсем даже не тот, который нужно. А нужно из ответа под номером 6. Называется __Ф1_Форма_аптеки_1_.xls Еще раз кладу потрясающе. спасибо огромное!!!
astera>> Re: Сортировка по столбцам Насколько я понял, то Вам необходимо в таблице оставить колонки например с ТП "кмтп2" а остальные скрыть. То есть - отфильтровать, оставив колонки с этим ТП. Или моя телепатия ошибочная. Вы совершенно верно меня поняли. Нужно отфильтровать по ТП.
skrudg_007>> Re: Преобразования ряда чисел по горизонтали в вертикальный ряд чисел
aka_smile>> Re: Как расширить критерии фильтрации Цитировать Это не вы спрашивали: "если мне нужно задать больше условий,как быть" не яЦитировать задайте для одного поля, скажем, 5 условий... приведите пример
dmitriy333>> СУММЕСЛИМН-SUMMIFS КРИТЕРИИ ОТБОРА
Serge 007>> Re: СУММЕСЛИМН-SUMMIFS КРИТЕРИИ ОТБОРА
dmitriy333>> Re: СУММЕСЛИМН-SUMMIFS КРИТЕРИИ ОТБОРА
MCH>> Re: СУММЕСЛИМН-SUMMIFS КРИТЕРИИ ОТБОРА
Serge 007>> Re: СУММЕСЛИМН-SUMMIFS КРИТЕРИИ ОТБОРА а зачем тут пример? Что бы решить Вашу проблему, зачем же ещё?!
dmitriy333>> Re: СУММЕСЛИМН-SUMMIFS КРИТЕРИИ ОТБОРА
Serge 007>> Re: СУММЕСЛИМН-SUMMIFS КРИТЕРИИ ОТБОРА примера формулы в моем посте разве не достаточно? Если было-бы достаточно, то я его просил-бы? Где логика?ЗЫ Отключаюсь, на работу ехать надо
kenya>> Re: Сохранение в DBF Добрый день. Cfv cghjcbk - cfv jndtnbk Как понял - для сохранения в dbf, необходимо с одного листа все необходимое скопировать на новый лист выделить и вставить в dbf, но что то не получается. В dbf должна сохраниться вся таблица кроме столбца "№ касс. аппар" Range("A2:AG27").Select ChDir "D:\work" ActiveWorkbook.SaveAs Filename:="D:\work\1.dbf", FileFormat:=xlDBF4 _ , CreateBackup:=False
afilin>> Re: Выбор последней даты нескольким критериям.
afilin>> Re: Преобразования ряда чисел по горизонтали в вертикальный ряд чисел
Aaliyah>> объясните как можно сделать связь файлов
Wasilic>> Re: Сортировка по столбцам
Incanta>> Список полей в сводной таблице
Serge 007>> Re: Преобразования ряда чисел по горизонтали в вертикальный ряд чисел Это можно и без формулы прекрасно сделать. Можно. А если исходник меняется?Так и будете [abbr=Сокращённо от Скопировать -> Вставить]копипаст[/abbr]ить? Да и skrudg_007 спрашивал: Цитировать существует ли для этого какая либо формула?
ХАха>> Порекомендуйте внятную книгу по VBA
ХАха>> Re: Список полей в сводной таблице
ХАха>> Re: объясните как можно сделать связь файлов
ХАха>> Re: не работает формула при копировании в
Antonynsk>> Собрать обновляемый отчет из файлов
Serge 007>> Re: Выбор последней даты нескольким критериям.
Ronnie>> Re: Объединение 4 таблиц в одну
KuklP>> Re: Сортировка по столбцам
ROS>> Введение значения в ячейки связанное с текущей датой
KuklP>> Re: Введение значения в ячейки связанное с текущей датой
ROS>> Re: Введение значения в ячейки связанное с текущей датой ROS, так не пойдет. Давайте Ваш пример: Так есть и так хочу(в 2003 формате). А то Ваши объяснения не совсем понятны:" в определённый день месяца (например конец недели или месяца), необходимо фиксировать динамические показатели из одних ячеек, в другой ячейки в которой это значение станет статическим показателем." Вот это:"из одних ячеек, в другой ячейки" - ни в какие ворота... Я извиняюсь, пример сразу предложить не могуПостараюсь описать: в одной ячейки есть формула =СУММ((ОБРАЩЕНИЯ!U:U<>"")*(ОБРАЩЕНИЯ!AF:AF="")), которая подсчитывает количество незакрытых (в процессе работы) обращений поступивших на телефон, необходимо, что бы значение этой ячейки фиксировалось в конце каждого месяца в ячейках соответствующего месяца Ну например в ячейки - январь, зафиксировалась число 26, так как 31 января (на конец месяца) было столько не закрытых обращений, так же через месяц, но только уже в ячейки февраль и та...
BloodNick>> Re: Имя открытого файла
iskatel74>> Re: Подскажите, как можно сверстать брошюру в MS Word
afilin>> Re: Выбор последней даты нескольким критериям.
afilin>> Re: СУММЕСЛИМН-SUMMIFS КРИТЕРИИ ОТБОРА
Wasilic>> Re: Введение значения в ячейки связанное с текущей датой Уважаемые, подскажите, пожалуйста, такой момент, надо что бы при Ну еще как то понятно.Далее, задача поставлена туманно. и что бы каждый раз при обновлении информации в ячейк Пересчет делать относительно даты пЕрвого ввода, или же даты послЕд...
andreyx108>> помогите разобратся в функцией vlookup
2902>> помогите доделать форму по рассчету стоимости
raketa>> Удалить определенные строки
nilem>> Re: Удалить определенные строки Код: Option Explicit А вот как сделать в один цикл?
Option Compare Text Sub scvazhina() Dim x, y(), i As Long, j As Long, k As Long, n As Byte x = Range("A1:T" & Cells(Rows.Count, 1).End(xlUp).Row).Value ReDim y(1 To UBound(x, 1), 1 To UBound(x, 2)) For i = 1 To UBound(x, 1) For j = 1 To UBound(x, 2) If x(i, j) Like "*Скважина*" Then x(i, 1) = 0: Exit For Next j Next i For i = 1 To UBound(x, 1) If x(i, 1) <> 0 Then k = k + 1 For n = 1 To UBound(x, 2): y(k, n) = x(i, n): Next n End If Next i ActiveSheet.UsedRange.ClearContents [a1].Resize(k, UBound(x, 2)).Value = y End Sub
afilin>> Фильтровать кликом по значению (макросом)
nilem>> Re: Удалить определенные строки Код: Option Explicit
Option Compare Text Sub scvazhina2() Dim x, y(), i As Long, j As Long, k As Long, n As Byte x = Range("A1:T" & Cells(Rows.Count, 1).End(xlUp).Row).Value ReDim y(1 To UBound(x, 1), 1 To UBound(x, 2)) For i = 1 To UBound(x, 1) For j = 1 To UBound(x, 2) If x(i, j) Like "*Скважина*" Then GoTo metka Next j k = k + 1 For n = 1 To UBound(x, 2): y(k, n) = x(i, n): Next n metka: Next i ActiveSheet.UsedRange.ClearContents [a1].Resize(k, UBound(x, 2)).Value = y End Sub
Serge 007>> Re: помогите разобратся в функцией vlookup Код: =ЕСЛИ(ЕНД(ВПР(ПОДСТАВИТЬ(A2;СИМВОЛ(32);СИМВОЛ(160));'2'!A:D;2;0));"";ВПР(ПОДСТАВИТЬ(A2;СИМВОЛ(32);СИМВОЛ(160));'2'!A:D;2;0))
AxcelBoyd>> Re: Порекомендуйте внятную книгу по VBA
Igor007>> Как посчитать цепочки в последовательности чисел?
Serge 007>> Re: Как посчитать цепочки в последовательности чисел?
ghttoblstr>> Несколько графиков на одной оси
Igor007>> Re: Как посчитать цепочки в последовательности чисел?
ZORRO2005>> Re: Как посчитать цепочки в последовательности чисел?
Igor007>> Re: Как посчитать цепочки в последовательности чисел? Igor007, 83 -58 -41 -31 78 Сколько в этой последовательности цепочек из двух подряд отрицательных чисел? Две? такую комбинацию нужно считать как одна цепочка из трёх отрицательных подряд, т.е. двойки игнорируются здесь и вовсех более длинных цепочках, соответственно и для всех троек, четвёрок и т.д. это правило сохраняется
ZORRO2005>> Re: Как посчитать цепочки в последовательности чисел? Цитировать такую комбинацию нужно считать как одна цепочка из трёх отрицательных подряд, т.е. двойки игнорируются здесь и вовсех более длинных цепочках, соответственно и для всех троек, четвёрок и т.д. это правило сохраняется С таким условием будет сложнее.Пока держите пример без игнорирования более коротких последовательностей.
afilin>> Как отследить кто последний пользовался файлом Excel?
ZORRO2005>> Re: Как посчитать цепочки в последовательности чисел?
andreyx108>> Re: помогите разобратся в функцией vlookup
ZORRO2005>> Re: Фильтровать кликом по значению (макросом)
KuklP>> Re: Подскажите, как можно сверстать брошюру в MS Word
Prist>> Re: Как отследить кто последний пользовался файлом Excel?
Dmitr68>> Re: Как посчитать цепочки в последовательности чисел?
Igor007>> Re: Как посчитать цепочки в последовательности чисел? Igor007, В примере с вашими условиями... Можно сделать универсальную формулу с помощью СМЕЩ(), но для этого лучше увидеть ваш файл. огромное спасибо, но у меня последовательность несколько тысяч значений и в цепочке может быть до 15 отрицательных или положительных значений подряд, как мне сделать рассчёт для них? последовательность вы смоделировали правильно, т.е. нет смысла в моём файле
Виктория Зуева>> Re: Несколько графиков на одной оси
_Boroda_>> Re: Фильтровать кликом по значению (макросом)
ROS>> Re: Введение значения в ячейки связанное с текущей датой
ROS>> Re: Введение значения в ячейки связанное с текущей датой
Евгений>> Найти наилучшее соотношение
Aaliyah>> Re: объясните как можно сделать связь файлов
ZORRO2005>> Re: Как посчитать цепочки в последовательности чисел? только для положительных не считает цепочку, если она идет первая. Согласен, надо удалить слово "Данные"..., но у меня последовательность несколько тысяч значений и в цепочке может быть до 15 отрицательных или положительных значений подряд, как мне сделать рассчёт для них? Посмотрите пример на листе1. Логику постарался объяснить на листе "Логика"P.S. Если держать нажатой кнопку F9, получится интересный эффект.
KuklP>> Re: Введение значения в ячейки связанное с текущей датой
KuklP>> Re: Введение значения в ячейки связанное с текущей датой
afilin>> Re: Как отследить кто последний пользовался файлом Excel?
afilin>> Re: Фильтровать кликом по значению (макросом)
Igor007>> Re: Как посчитать цепочки в последовательности чисел?
Igor007>> Re: Как посчитать цепочки в последовательности чисел?
Staniiislav>> Поиск по месяцу и вывод данных
Wasilic>> Re: Удалить определенные строки а можно ли удалять строки, если хотя бы в одном из столбцов стоит определенное значение. для данной таблицы - это слово "скважина"
Staniiislav>> Re: Поиск по месяцу и вывод данных
nilem>> Re: Как посчитать цепочки в последовательности чисел?
ХАха>> Re: Найти наилучшее соотношение
Dmitr68>> Re: Как посчитать цепочки в последовательности чисел?
ХАха>> Re: Порекомендуйте внятную книгу по VBA
BloodNick>> Как различить ячейки Код: If Range("A15").Select.Font.Bold = True Then Range("A16").Value = "qadasd" можно ваще такое осуществить?
KuklP>> Re: Введение значения в ячейки связанное с текущей датой На сегодня все. До встречи на следующей неделе. |
В избранное | ||