Страницы: 1 2 След.
Поиск
Перенос таблицы из word с помощью VBA, оптимизация кода
Автор: KrabNaGalerah. Всем привет, есть у меня пару ворд файлов, длинных, с большой таблицей в примерно 3к строк (выгрузка). Эти таблицы нужно закинуть в эксель. Написал код. Закидываю значения в массив, потом уже буду с этим массивом дальше работать. Однако обработка оставляет желать лучшего, около 5ти минут считывает данную таблицу. Код не большой, может быть кто то уже делал похожие вещи и знает хитрости, к примеру может быть скопировать таблицу как нибудь целиком, или что нибудь похожее. ...
Теги: word, vba, array
Изменен: 09.02.2023
Читать сообщение на форуме или сайте.
Обновление внешних данных на защищённом листе Excel по запросу
Автор: alex_rem. Всем доброго времени суток. Описание проблемы: есть протокол, в который подтягиваются данные по приборам из таблицы на втором листе. А в таблицу на втором листе, в свою очередь, подтягиваются данные из внешнего источника (см. пример). Внешним источником служит таблица в отдельном файле excel (Все таблицы НЕ сводные!!!). Листы в данном протоколе, а также сама книга будут защищены паролем, который исполнители, заполняющие протокол, знать не будут.  Обновлять данные  нужно не ...
Изменен: 24.01.2023
Читать сообщение на форуме или сайте.
VBA - как импортировать XML программно с подключенной внешне схемой, проблемы с программным импортом XML
Автор: kohet. Всем доброе время суток!  Проблема следующая. Есть энное количество XML файлов, которые надо импортировать в Excel и далее их там обрабатывать.  Но есть проблема - встроенная схема предполагает, что одно поле имеет тип "integer", в результате чего 18-значное число округляет последние 3 цифры.  Но мы ж не идиоты, мы ж читаем, что в документации Мелкософтов. Так как все файлы XML однотипные, выгружаем из одного из них макросом схему: Sub save_XML_scheme() Dim fPath As ...
Теги: xml, vba
Изменен: 13.10.2022
Читать сообщение на форуме или сайте.
Выгрузка CSV макросом на лист
Автор: Сергей Разумчиков. Добрый день! Помогите с задачей: Есть CVS открытый в EXEl с разделителями запятыми, далее его делим по столбцам по разделителю. Затем на другом листе па данной таблице строимсводную. Хотел автоматизировать процес подгрузки нового CSV (за другой период) с затиранием данных по старому. Но опробовав множество различных вариантов запутался и сломал голову. Ключевые моменты которые хотелось бы использовать: 1. Выбор файла CSV через диалоговое окно - что бы среди прочего ...
Изменен: 12.09.2022
Читать сообщение на форуме или сайте.
Макрос заполнения ячеек по поиску по первым символам из другой таблицы
Автор: Евгений Г. Доброго времени суток, Уважаемые форумчане! Не силен в написаниях макросов. Прошу вашей помощи. Есть таблица, в которой есть однотипные значения, начинающиеся на одни и те же символы. Есть отчет в который нужно эти однотипные значения снести под одну строку. Делается это каждый раз вручную. Прошу вас помочь написать макрос, с помощью которого можно будет делать это автоматически. Количество строк всегда разное, количество столбцов одинаковое ( 79 ) Если можно, то прописать, ...
Изменен: 28.03.2022
Читать сообщение на форуме или сайте.
VBA проверка на число (по заданному региональному стандарту)
Автор: Максим Зеленский. Привет всем. Немного туплю, порыл форум, но никак не найду подходящего решения, или не могу протестировать... а VBA основательно приподзабыл уже :) Есть три ячейки, в которых может быть написано число с десятичным знаком или без десятичного знака, причем может быть сохранено как текст или как число: 0.5true 0,5false  1trueнужен кусочек кода VBA для проверки содержимого ячейки Если в ячейке записано целое число, без десятичного знака, то это не ошибка. Неважно, как оно ...
Изменен: 13.10.2021
Читать сообщение на форуме или сайте.
Вставить новую строку
Автор: Иван Иванчиков. Доброго времени суток форумчане. Вопрос: Найти в таблице ячейку "Товары", и создать ниже нее новую строку , Макросом. спс. за внимание и понимание.
Теги: макрос
Изменен: 18.10.2020
Читать сообщение на форуме или сайте.
Как создать в VBA формулу с функциями Exel
Автор: Дмитрий Величко. Здравствуйте! Помогите, пожалуйста: Сделал для работы формулу, которая будет выводить "снизу-вверх" выделенные строки и заменять в них определенные слова (направления света), записал ее себе в текстовом виде, чтобы не забыть и вставлять в файлы, если пригодится:  =ЕСЛИ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ИНДЕКС(Область которую надо копировать и переворачивать;СТРОКА(последняя строка в области ФИКСИРОВАННАЯ ПО СТРОКЕ)-СТРОКА(строка в ...
Теги: exel, vba
Изменен: 30.09.2020
Читать сообщение на форуме или сайте.
Перенос данных с одного листа на другой и обратно
Автор: Кирилл. Здравствуйте. Нужно решить такую задачу. Есть информация на листе Google Sheets (нескольких листах). Нужно чтобы строка со всей информацией переносилась на отдельные лист (с нескольких листов на один) после того как будет изменено значение в ячейки этой строки. И нужно обратное действие. После того как в том отдельном листе будет изменено значение ячейки (уже другой ячейки) нужно чтобы информация которая была внесена в других ячейках, перенеслась (переписывалась с новыми ...
Изменен: 24.09.2020
Читать сообщение на форуме или сайте.
Передача аргументов пользовательской форме.
Автор: slepoi_kamin. Добрый день. Пытаюсь сделать универсальную форму для ввода данных. Идея такая: есть ПЕРВАЯ ФОРМА с текстбоксом, если в нем не хватает места, то можно нажать на кнопку откроется ВТОРАЯ ФОРМА с текстбоксом большого размера. В этот текстбокс мы вводим текст, нажимаем ок, и текст переносится в текстбокс первой формы. ПЕРВЫХ ФОРМ много и они разные. А ВТОРАЯ ФОРМА должна быть одна универсальная. То есть, по идее надо по нажатию на кнопку на ПЕРВОЙ ФОРМЕ передать во ВТОРУЮ ...
Изменен: 27.05.2020
Читать сообщение на форуме или сайте.
Макрос на раскраску переменных, в зависимости от их значения
Автор: karenolk. Добрый вечер!  Подскажите, пожалуйста, как решить следующую задачу: Необходимо, создать следующее условие:  Если значения внутри ячейки меньше столбца "E" - красный (22) Если в диапазоне от "Е" до "F" - желтый (44) Если больше "F" - зеленый (50) Не могу понять как написать, чтобы красились значения столбца "D" (выделил на скрине) Использую макрос - он позволяет красить столбцы ...
Изменен: 16.05.2020
Читать сообщение на форуме или сайте.
Изменить URL в запросе автоматически
Автор: xseed. День добрый. Есть запрос вида let Source = Json.Document(Web.Contents("https://api.binance.com/api/v1/klines?symbol=BTCUSDT&interval=1w&limit=50")), #"Converted to Table" = Table.FromList(Source, Splitter.SplitByNothing(), null, null, ExtraValues.Error), #"Extracted Values" = Table.TransformColumns(#"Converted to Table", {"Column1", each Text.Combine(List.Transform(_, Text.From), "#(tab)"), type text}), ...
Изменен: 08.11.2018
Читать сообщение на форуме или сайте.
С помощью рекурсии генерировать все возможные словосочетания из столбцов
Автор: maximusu. Привет всем. Ребята, помогите пожалуйста разобраться с проблемой. Есть следующая задача. Мне нужно объединить значения из всех столбцов и строк. Вначале мы берем первое значение первого столбца и присоединяем к нему первое значение из второго столбца. Затем к получившемуся результату присоединяем по очереди все значения третьего столбца, Затем вновь берем первое значение первого столбца, но присоединяем к нему уже второе значение второго столбца. И вновь к получившийся  ...
Изменен: 11.10.2018
Читать сообщение на форуме или сайте.
Копирование информации с одного листа книги на другой лист этой же книги по заданному времени
Автор: Al_ta_iR. Доброго времени суток Может кто знает как реализовать копирование информации из одного листа книги в другой по времени (дате). Например: - у меня есть книга с расписанием занятий - в нём на первом листе указывается текущее расписание - на следующих 2 листах - расписание верхней и нижней недель (таблицы одинаковы, информация разная) для удобства, чтобы из них в нужное время при необходимости брать информацию для занесения (КОПИПАСТА) в лист с текущим расписанием - сам ...
Изменен: 01.08.2018
Читать сообщение на форуме или сайте.
сбор данных по нескольким критериям, как собрать данные на лист по нескольким критериям
Автор: Tatyana2309. Добрый день, есть табличка, в нее надо отобрать данные которые соответствуют названию фирмы, названию товара его количеству как то надо сделать чтобы отобрать и количество и сумму отгрузки по покупателю... в идеале это все должно быть по месяцам и потом в свод... вот как сделать отбор- не знаю...
Изменен: 21.02.2018
Читать сообщение на форуме или сайте.
Выбор значений в ListBox по значению ComboBox
Автор: aimv. Привет Уважаемые! Ребят, такой вопрос - есть книга excel в которой созданы Лист1, Лист2, Лист3, Лист4, Лист5 Так же есть UserForm с элементами ListBox1, ComboBox1, CommandButton1 При запуске UserForm в ListBox1 загружаются название всех листов книги :Private Sub UserForm_Initialize() ListBox1.Clear For i = 1 To Sheets.Count ListBox1.AddItem Sheets(i).Name Next End Sub В ListBox1 включена опция MultiSelect = 1 - fmMultiSelectMulti В ComboBox1, так же ...
Теги: vba, EXCEL, ListBox, combobox
Изменен: 22.12.2017
Читать сообщение на форуме или сайте.
Запустить макрос при отсутствии изменений в ячейке или по значению в ячейке
Автор: 1530105. Что нужно вписать и как в тело макроса, что бы он автоматически запускался на страничке, если  в ячейке А1 формула  пишет слово «нет». И что бы, не запускался макрос, если появляется  «Ок».  Макрос должен автоматически запускаться постоянно, до появления в ячейке  «Ок». Причина изменений на страничке – одна переменная в формуле создается, как случайное число. В приложении страничка Эксель с задачей. Если решится этот маленький вопрос, то построю свою программу. Спасибо!
Изменен: 08.12.2017
Читать сообщение на форуме или сайте.
Экспорта данных с одного листа на другой в одной книге, упростить код
Автор: macovea. Доброго времени суток, дорогие профи и гуру! Обращаюсь к вам за помощью в упрощении макроса, писанного долго и нудно, зато своими руками, с использованием подсказок здесь и чуть-чуть просто в интернете. Вижу, что макрос вышел "тяжёлый", вижу, что можно его сделать красивым, вижу, что это цикл. НО! Заплутала в синтаксисе... Нид хелп... Собственно, сам текст макроса, нуждающийся в наведении лоска. Там имена ячеек последовательны, а столбцы - через один. Вот в этой ...
Изменен: 27.11.2017
Читать сообщение на форуме или сайте.
Макрос для копирования из одной книги в другую с условием, Макрос для копирования из одной книги в другую с условием
Автор: Grustik1. Всем привет.  Сам в VBA вообще дерево, в основном всё нахожу в интернете, но тут столкнулся с такой проблемой. Нужно написать макрос. В общем есть две таблицы. Одна из них изначально пустая, другая же аналогичная первой уже заполнена. Нужно написать макрос, который бы позволял копировать оттуда(из таблицы, где есть данные) данные и переносить их в таблицу, которая пустая. Но также учитывая бы условие того, что ,например, если в столбце "Марка ТС" нет данных ...
Теги: макрос
Изменен: 11.11.2017
Читать сообщение на форуме или сайте.
хеш ячейки
Автор: aist123. Вставляю этот макрос в Module1, запускаю, и вижу в ячейке B2 - #ЗНАЧ! и никак не могу в чем дело! ячейка A1-  пустая, в ней нет ничего.Function GetHash(ByVal txt$) As String Dim oUTF8, oMD5, abyt, i&, k&, hi&, lo&, chHi$, chLo$ Set oUTF8 = CreateObject("System.Text.UTF8Encoding") Set oMD5 = CreateObject("System.Security.Cryptography.MD5CryptoServiceProvider") abyt = oMD5.ComputeHash_2(oUTF8.GetBytes_4(txt$)) For i = 1 To LenB(abyt) ...
Теги: vba
Изменен: 18.02.2017
Читать сообщение на форуме или сайте.
vba Прочитать диапазон применения условного форматирования, не работает AppliesTo
Автор: vladjuha. Здравствуйте. На листе есть вручную созданные правила УФ. Созданы они с большим запасом по строкам (диапазон применения) - на все случаи вводимых пользователем объёмов данных. Но чаще УФ работают на ~10%. А раз так, да учитывая, что правила УФ  к тому же волотильны, пришла идея макросом, при необходимости, причёсывать нижнюю границу правил УФ (через ModifyAppliesToRange). Проблема в том, что не получается прочитать (свойство AppliesTo) текущий диапазон применения правила УФ ( ...
Теги: vba, FormatConditions
Изменен: 08.02.2017
Читать сообщение на форуме или сайте.
Подтянуть значения не по точному соответствию, а по совпадению одного из слов в двух столбцах
Автор: calve. Есть справочник городов с номерами. Есть стобец из предложений, в которых находятся города из справочника. Каким образом массово напротив каждого предложения проставить город из справочника. Города в предложениях написаны точно так же как в справочнике. Текст по столбцам бить не хочется - некоторые предложения ужасно длинные. По идее надо как то использовать функцию НАЙТИ() Файл во вложении.
Теги: макрос
Изменен: 12.12.2016
Читать сообщение на форуме или сайте.
Отключение макроса при закрытии книги.
Автор: Castiel666. В общем такая проблема. Есть таблица, которая обновляется каждые 30 секунд при открытии книги при помощи макроса. Но дело в том, что при закрытии книги, через 30 секунд книга сама открывается, чтобы обновить значения))). Как этого избежать?
Изменен: 04.12.2016
Читать сообщение на форуме или сайте.
Результат работы регулярного выражения не работает с FormulaLocal, при корректном поиске и замене
Автор: vladjuha. Добрый день. В представленном примере при помощи регулярного выражения подбираются вхождения ДВССЫЛ(...) с последующей заменой на прямой путь к файлу. Есть две ячейки: в одном исходная формула состоит из одной строки, во второй - из трёх (перевод строки внутри ячейки). Результат поиска и замены корректный - это видно в отладочном окне, более того, если скопировать получаемый итог (для "трехстрочной" ячейки) ручками из отладки в ячейку - будет работать. ...
Изменен: 10.10.2016
Читать сообщение на форуме или сайте.
Выбор случайного значения из списка-массива (спинтакс)
Автор: NaMoRZA. Всем доброго вечера! Не смог кратко полностью описать в заголовке вопрос, но как бы основную проблему написал. Теперь подробнее. На днях столкнулся с новой задачей и никак не могу ее до конца решить. Суть: Найти в файле "html" все конструкции типа спинтакс, например, "{Доброго дня|Здравствуйте|Привет}, {уважаемый|дорогой} Петр!", случайным образом выбрать один вариант и заменить им набор. Т.е., в результате должно получиться: - Доброго дня ...
Изменен: 16.09.2016
Читать сообщение на форуме или сайте.
Макрос для копирования строки по условию на определенный лист, помогите новичку.....
Автор: kroling. Здравствуйте уважаемые гуру Excel. Прошу помощи от ваших светлых голов. Для вас может быть моя задача будет элементарной, но для меня, знакомого с макросами 3-й день - это пока сложновато.... Итак задача такая: есть документ со списком файл "база" в столбце R есть маркер которым отмечается строка, и кнопка "переместить". Необходимо, чтобы по нажатию кнопки "переместить" значения отмеченной маркером строки скопировалась в книгу ...
Изменен: 11.09.2016
Читать сообщение на форуме или сайте.
Вставить картинку в тело письма Lotus Notes, вставка в тело письма картинки из определенного диапазона
Автор: oleg_man. Добрый день. Прошу помочь. Есть функция отправки писем через Lotus Notes. Но не могу понять как в тело письма крепить картинку, например копию определенного диапазона ячеек, либо диаграмму. Public Function Local_mail( _ ByVal MyAtt As Variant, _ ByVal MyTheme As String, _ ByVal MyText As String, _ ByVal StrSendTo As Variant, _ ByVal StrCopyTo As Variant, _ StrBCC As Variant) 'MyAtt - вложение 'MyTheme - тема 'MyText - текст письма 'StrSendTo - кому 'StrCopyTo - ...
Изменен: 10.08.2016
Читать сообщение на форуме или сайте.
Макрос для автоматического изменения высоты объединенных строк
Автор: WaleraPP. Нужен макрос который для объединенных ячеек будет выполнять следующие условия:  если отсутствует текст то высота равна 0 (объединенные ячейки скрыты); Размер увеличивается по ходу наполнения текстом объединенных ячеек и собственно уменьшается по уходу их удаления в плоть до скрытия.
Теги: макрос
Изменен: 12.07.2016
Читать сообщение на форуме или сайте.
VBA - макрос для маркирования каждых n ячеек одинаковыми данными
Автор: mushkin. Уважаемые спецы! Целый день не могу найти нужную инфу. Вроде бы и простая задача и много похожих, но все не так. Короче, есть список адресов, их надо разбить по группам. В группе может быть только 15 адресов, поэтому нужен макрос, который будет эти группы распределять. Например с 1 по 15 строку будет группа "1", с 16 по 31 - группа "2" и так далее пока есть данные.
Теги: VBA, макрос
Изменен: 01.07.2016
Читать сообщение на форуме или сайте.
Совместить два кода вместе: удаление слов и сортировку чисел в столбце
Автор: next777pro. Здравствуйте, помогите совместить два макроса или сделать так, чтобы выводил как в ячейке K9 Один код отвечает за удаление слов и сортировку чисел в столбце в нем есть недостаток, он не удаляет последнее 1-865, т.е нужно доработать, чтобы код оставлял только числа, а с тире вовсе удалять Function yyy$(t$) Dim i% For i = 1 To Len(t) If Mid(t, i, 1) Like "[0-9]" Then s = s & Mid(t, i, 1) Next yyy = Trim(s) End Function Sub Сорт() [A:A]. ...
Теги: макрос, код
Изменен: 22.06.2016
Читать сообщение на форуме или сайте.
Страницы: 1 2 След.
Наверх