Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 4 5 След.
Поиск данных по частичном совпадению
 
Во вложении файл. В столбце А названия подшипников. В столбце D такие же названия, но с лишними символами (бардак...) и в столбце F цена. Вопрос: как вывести цену в столбец В по частичному совпадению данных столбца А и D? Примечание: если совпадений много, необходимо вывести самую большую цену. Решаема ли эта задача с такими данными...(имеем то, что имеет...). Заранее спасибо за Ваши ответы
Изменено: Евгений И. - 25 авг 2020 15:19:54
Как сделать, чтобы текст "залезал" на нижние ячейки
 
Как сделать, чтобы текст выходил за пределы ячейки без объединения и автоподбора высоты, то есть чтобы текст не выходил за пределы ячейки по ширине, но "залезал" на нижние ячейки (пример во вложении)?
Замена формулы с функцией Если для вывода нужного результата
 
Во вложении файл. Ставим количество в столбец Количество, в столбце Результат выводится текст из столбца Текст, через формулу с функцией Если. Итоговый файл у меня включает около 8000 строк и при большом количестве прописанных формул быстрое заполнение столбца Количество невозможно, файл начинает немного подтормаживать. Вопрос: можно ли заменить данную формулу на любой другой вариант, может быть решение еще проще данного?
Как в формулу СЦЕПИТЬ добавить значение переноса данных на новую строку (аналог нажатия Alt+Enter)
 
Подскажите, пожалуйста, как в формуле СЦЕПИТЬ учесть значение переноса данных на новую строку внутри ячейки
(аналог нажатия Alt+Enter)?
Быстрый перенос данных из нескольких ячеек в одну
 
Подскажите, пожалуйста, необходимо быстро перенести данные из нескольких ячеек (строк) (в рамках одного столбца) в одну верхнюю (см. файл). Как можно это сделать быстро? То есть нужно как-бы "обьединить ячейки, но с сохранением текста. "Заранее спасибо за Ваши ответы
Изменено: Евгений И. - 12 авг 2020 09:32:37
Копирование и вставка имен ячеек из Диспетчера имен
 
Подскажите, пожалуйста, мне нужно скопировать имена ячеек из одного файла и вставить их в другой, идентичный по структуре файл. Как это можно сделать?
Получение столбца уникальных значений из таблицы данных
 
Добрый день! Подскажите, пожалуйста, как получить столбец уникальных значений из данной таблицы данных?
Макрос-счетчик одинаковых ссылок
 
Во вложении файл с двумя вкладками До работы макроса и После. Подскажите, пожалуйста, макрос, который считал бы одинаковые адреса ссылок и нумеровал бы их цифрами от 1 до 4 по порядку. Заранее спасибо за Ваши ответы.
Копирование данных в буфер обмена с конкретной строки и до конца таблицы
 
Во вложении файл (Пример). Допустим в нем фиксированная шапка (строка 4), фиксированные количество столбцов (4), но всегда разное число строк с данными. Подскажите, пожалуйста, макрос, который бы выделял и копировал данные (просто в буфер обмена), начиная со строки 5 и до последней заполненной строки, включая ее. Заранее спасибо за Ваше решение.
Макрос построчного удаления данных по маске
 
Подскажите, пожалуйста, макрос для кнопки Удалить по маске-2, который построчно удалял бы по маске *?*.*?*. данные из столбца "Ссылка короткая", но не трогал бы конструкции www.*?*. (зеленым выделил то, что нужно не трогать, а красным - удалять). А второй момент, то, что макрос будет удалять нужно переместить во вкладку Исключения-2 (ссылки только из столбца Ссылка короткая). Заранее спасибо за Ваше решение
Как быстро скопировать большой диапазон данных в таблице эксель
 
Есть таблицы из 150 000 строк, 6 столбцов. Допустим нужно скопировать большой кусок из этой таблицы в 85 000 строк. И таких таблиц много. Выделять и копировать очень долго. Подскажите, пожалуйста, как это сделать быстро?
Парсер сайта
 
Добрый день! Необходим парсер сайта, а именно копирование данных с сайта в файл эксель по нужным нам запросам поиска. Какой именно сайт необходимо парсить, а также какую информацию получить - подробности напишу в ответ на Ваше письмо на мою почту.
[ Закрыто] Парсер 2Gis
 
Добрый день! Есть потребность в парсере базы 2Gis.

Цитата
   3.9. Публиковать ссылки на нелицензионное коммерческое программное обеспечение (варез), программы для его взлома (краки) и генераторы ключей, а также на материалы, защищённые авторскими правами (книги, музыка, видео и прочее). Все темы, прямо или косвенно касающиеся взлома любых паролей будут удаляться без предупреждения.
Как встроить статус бар в 2 макроса
 
Добрый день! Подскажите, пожалуйста, как встроить статус бар в 2 готовых макроса, первый удаляет дубликаты в определенном столбце, а второй удаляет ненужную информацию по маске. Заранее спасибо за Ваше решение. Вот эти макросы:
Код
Sub DeleteDuble()
    Dim Sh As Worksheet, URL As String, FilterMode As Boolean, rng As Range, rg As Range

    Set C_Dubl = CreateObject("scripting.dictionary")
    C_Dubl.CompareMode = 1
    Set Sh = ThisWorkbook.Worksheets("Яндекс")
    FilterMode = Sh.AutoFilter.FilterMode
    If FilterMode Then
        Sh.ShowAllData
    End If
    LastRow = Sh.Cells(Sh.Rows.Count, "C").End(xlUp).Row
    dx = Sh.Range("B1:C" & LastRow)
    Set rng = Sh.Range("A1:D" & LastRow)
    For n = 5 To UBound(dx)
        URL = dx(n, 2)
        If URL <> "" Then
            If Not C_Dubl.Exists(URL) Then
                C_Dubl.Item(URL) = URL
            Else
                If rg Is Nothing Then
                    Set rg = rng.Rows(n)
                Else
                    Set rg = Union(rg, rng.Rows(n))

                End If

            End If
        End If

    Next
    If Not rg Is Nothing Then
        rg.Delete
        LastRow = Sh.Cells(Sh.Rows.Count, "C").End(xlUp).Row
        Sh.Range("A5") = 1
        Sh.Range("A6") = 2
        Sh.Range("A5:A6").AutoFill Destination:=Sh.Range("A5").Resize(LastRow - 5, 1), Type:=xlFillDefault


    End If


End Sub
Код
Sub DeleteMask()
    Dim Sh As Worksheet, URL As String, FilterMode As Boolean, Sh1 As Worksheet, rng As Range, _
        rg As Range, s As String
    Set Sh = ThisWorkbook.Worksheets("слова исключения")
    LastRow = Sh.Cells(Sh.Rows.Count, "A").End(xlUp).Row
    dd = Sh.Range("A1:B" & LastRow)
    Set Sh1 = ThisWorkbook.Worksheets("исключения")
    LastRow1 = Sh1.Cells(Sh1.Rows.Count, "A").End(xlUp).Row
    Set Sh = ThisWorkbook.Worksheets("Яндекс")
    FilterMode = Sh.AutoFilter.FilterMode
    If FilterMode Then
        Sh.ShowAllData
    End If
    LastRow = Sh.Cells(Sh.Rows.Count, "C").End(xlUp).Row
    dx = Sh.Range("B1:C" & LastRow)
    Set rng = Sh.Range("A1:D" & LastRow)
    For n = 5 To UBound(dx)
        URL = dx(n, 2)
        If URL <> "" Then
            For i = 3 To UBound(dd)
                s = dd(i, 1)
                If s <> "" Then
                    If InStr(1, URL, s, vbTextCompare) > 0 Then
                        LastRow1 = LastRow1 + 1
                         Sh1.Cells(LastRow1, 1) = URL
                        If rg Is Nothing Then
                            Set rg = rng.Rows(n)
                        Else
                            Set rg = Union(rg, rng.Rows(n))
                        End If
                   Exit For
                    End If

                End If

            Next


        End If

    Next
    If Not rg Is Nothing Then
        rg.Delete
        LastRow = Sh.Cells(Sh.Rows.Count, "C").End(xlUp).Row
        Sh.Range("A5") = 1
        Sh.Range("A6") = 2
        Sh.Range("A5:A6").AutoFill Destination:=Sh.Range("A5").Resize(LastRow - 5, 1), Type:=xlFillDefault


    End If
End Sub
Копирование+Вставка карточек с 2Gis (макрос двух данных операций)
 
Подскажите, пожалуйста, макрос для 2 операций, Копирование каждой раскрытой карточки с 2gis и Вставка ее одну под другую в файл эксель? Полноценный парсер данных не требуется...Заранее спасибо за Вашим ответы!
Изменено: Евгений И. - 5 мар 2020 09:30:21
Макрос поиска слов в тексте по двум условиям
 
Подскажите, пожалуйста, макрос, который в тексте оставлял бы только слова, в составе которых есть символ "." (точка), но нет символа "@" (собаки). Причем символ "." не первый и не последний символ слова (в середине). Пример такого текста во вложении. Заранее спасибо за Ваши ответы
Макрос поиска и выделения в отдельный список адресов сайтов в тексте
 
Подскажите, пожалуйста, макрос, который в тексте (поиск по всему Лист 1) искал бы и выделял в отдельный список все адреса сайтов, копировал бы их на Лист 2 один под другой в столбец А. Нашел в интернете готовое решение для электронок, а вот для адресов сайтов пока нет. Во вложении пример текста. Заранее спасибо за Ваши ответы
Выдача результата формулой по двум параметрам
 
Подскажите, пожалуйста, формулу для столбца Т вкладки Результат, которая должна выдавать данные из Вкладки База столбец G через поиск и сравнение двух параметров в совокупности, столбцов A и B вкладки Результат со столбцами J и A вкладки База. Таблицы очень большие, сочетаний много. Спасибо за Ваше решение.
Изменено: Евгений И. - 27 янв 2020 08:42:56
Преобразование диапазона в столбец и подсчет повторений
 
Во вложении файл с двумя вкладками: Артикулы составляющих - это данные для обработки, Лист 1- здесь должна быть таблица с результатом.
Вопрос №1: подскажите, пожалуйста, как преобразовать диапазон от G до ВВ - эти артикулы нужно выстроить в строку в Листе1 с ячейки B1, С1, D1 и правее, чтобы только не было повторений этих артикулов в строке 1 Листа1?
Вопрос №2: подскажите, пожалуйста, после того, как мы проставим артикулы в строке 1 Листа1, как посчитать, сколько раз встречается каждый артикул из строки 1Листа 1 в диапазоне от G до BB листа Артикулы составляющих
Вопрос №3: в синие ячейках Листа1 как вывести артикулы наборов из столбца С листа Артикулы составляющих, в которых встречались это Артикула
Заранее спасибо за Ваши ответы!!!
Вызов макросом excell работу макроса outlook
 
Есть макрос в Outlook, пусть он называется m_Zakaz. Есть другой макрос в Excell. Вопрос, как правильно прописать в макросе Excell вызов работы макроса m_Zakaz программы Outlook?
Макрос копирования данных из многих файлов в один
 
Есть много файлов с одинаковой структурой данных по столбцам, но с разным числом строк, например любые счета и есть пустой файл с кнопкой и макросом. Нужен макрос для этой кнопки, который вставлял бы данные из этих файлов вниз предыдущих (пример во вложении). Например чтобы копировал все заполненные строки или можно задать N число строк для копирования, начиная с первой...если необходимо, можно задать в макросе и число столбцов для копирования, тем самым определив диапазоны, которые будут копироваться.... Заранее спасибо за Ваши ответы. Жизненная ситуация - мне нужно формулами быстро обработать 300 счет-фактур, для это мне нужно в 1 файл скопировать данные из них и применить нужные формулы...
Изменено: Евгений И. - 28 авг 2019 11:36:44
Составление списка данных из таблица и счетчик повторений этих данных
 
Во вложении файл с двумя вкладками: Артикулы (это исходные данные) и Анализ артикулов (в эту вкладку необходимо получить обработанные данные из вкладки Артикулы). Подскажите, пожалуйста, формулы для ячеек А2 и В2 вкладки Анализ артикулов (чтобы можно было их протянуть вниз), чтобы получить Список артикулов из таблицы без их повторений и посчитать, сколько раз каждый артикул встречается в таблице. Или макрос (то есть подойдет любое решение). Заранее спасибо за Ваши ответы
Макрос создания новых файлов из существующего по критерию
 
Во вложении файл - Лист. В нем для примера 24 строки (1 строка шапка + 23 строки данные), а так строк может быть N-количество. Подскажите, пожалуйста, макрос для кнопки в любом другом файле, который дробил бы данный файл на несколько новых файлов исходя из "коэффициента дробления строк", который прописан в макросе. Во вложении итог работы для коэффициента 10 (то есть дробит исходный файл по 10 строк, не трогая шапку). Заранее спасибо!
Критерий "больше, но меньше" в формуле суммесли
 
Подскажите, пожалуйста, как правильно прописать критерий в формуле суммесли, больше 41, но меньше 351...в чем моя ошибка (заранее спасибо за Ваши ответы):
Код
=СУММЕСЛИ($J$2:$J$3000;И(">41";"<351");$F$2:$F$3000)
Применение функции суммирования по цвету (SumByColor) к условному форматированию
 
Во вложении файл. В нем есть пользовательская функция SumByColor(Диапазон;цвет), которая суммирует диапазон по цвету ячейки. Подскажите, пожалуйста, что нужно дописать в тело этой функции (в Vba), чтобы она работала и по цвету и по условному форматированию. Спасибо.
Применение функции SumByColor (суммирование по цвету) в качестве счетчика непустых ячеек
 
Во вложении файл. В нем через макрос записана Функция, которая суммирует ячейки из заданного диапазона по цвету SumByColor (Диапазон суммирования;Цвет). Подскажите, пожалуйста, формулу для красной ячейки Е4, чтобы она по желтому цвету (ячейка D5) сосчитала количество ячеек с любым текстом в столбце HZ с привязкой к желтому цвету в ячейке D.
Уточнение: в функции заложено смещение по столбцам и строкам, прошу его не менять.
Заранее спасибо за Ваши ответы
Изменено: Евгений И. - 15 июл 2019 12:59:19
Макрос суммирования ячеек по критерию - цвет
 
Подскажите, пожалуйста, макрос для зеленой кнопки в файле, который суммировал бы ячейки из столбца F по желтому цвету в D и записывал результат в D4 и по зеленому цвету в D и записывал результат в F4. Диапазоны суммирования - от F5 до F100000. Пример во вложении. Заранее спасибо за Ваши ответы
Как посмотреть все свои вопросы, которые писал на форуме ранее
 
Подскажите, пожалуйста, ответ на вопрос в теме письма. Спасибо.
Привязка формулы к значениям выпадающего списка
 
Во вложении файл с двумя вкладками: во вкладке Ассортимент - исходные данные, во вкладке База - результат вычисления формулы. Подскажите, пожалуйста.
Вместо зеленой ячейки должен быть выпадающий список, в зависимости от значений которого формула должна считать нужные нам значения

Заранее спасибо за Ваши ответы!
Макрос: вставка сегодняшней даты
 
Подскажите, пожалуйста, макрос, который бы ставил в ячейку J1 файла эксель сегодняшнюю дату. Спасибо.
Страницы: 1 2 3 4 5 След.
Наверх