Страницы: 1 2 3 4 5 6 7 8 9 10 След.
Поиск
Построение диаграммы из диапазона активного листа
... с задачей построения диаграммы в VBA. Есть множество листов, в каждом ...
Теги: VBA
Изменен: 05.03.2024
Читать сообщение на форуме или сайте.
Формирование отдельного файла с данными из исходной таблицы
Автор: lodes11. Всем доброго дня. Обращаюсь за помощью, так как самому не получилось собрать макрос отвечающий моей задачи. ТЗ к макросу: Есть документ "Пример", в нем есть лист с таблицей данных "$ Данные $", необходимо по нажатию на "Кнопку" сформировать новый документ (пример нового документа на листе "! Реестр к выполнению !"), который будет содержать определенные заголовки отличные от заголовков таблицы исходных данных и иметь другой порядок столбцов, ...
Теги: VBA
Изменен: 06.02.2024
Читать сообщение на форуме или сайте.
Сведение по признаку, Исправить код VBA Excel
Автор: romeiro. Здравствуйте! Пожалуйста, подправьте мой код, ниже пример исходных данных и желаемого результата. Нужно по Номеру короткому(nname) и Уровню(Uroven) сгруппировать строки. Уровень для одного номера может отличаться, но для след. строк Уровень также будет расти внутри группы.Sub Sostav_po_uzlam() Application.ScreenUpdating = False ' îòêëþ÷àåì îáíîâëåíèå ýêðàíà Set wb = ActiveWorkbook x = 2 'ÁÛËÎ 2 !!! y = 1 For Each nname In Range("A3:A50000").Cells x = x + 1 nvbom = ...
Изменен: 24.01.2024
Читать сообщение на форуме или сайте.
Горячие клавиши для вызова окна редактора VBA не работают, alt+F11
Автор: Yum. Добрый день всем! Собственно, сабж. По отдельности каждая работает, но в сочетании нет. Что тут можно сделать ?
Теги: VBA
Изменен: 08.01.2024
Читать сообщение на форуме или сайте.
Сломался Personal.xlsb, После некорректного выключения компьютера сбои в работе книги макросов.
Автор: ne.bla.bla. Всем добрый день! Неудачно вчера выключил компьютер после чего сломался Personal.xlsb, некоторые макросы, выведенные на кнопки работают на одном очень сильно зависают. Но самая большая проблема - нет возможности редактировать код в модулях, они попросту не открываются, не экспортируются, не удаляются. Перепробовал все что можно - перезагружал пк всякими способами, запускал excel в безопасном режиме, убирал из папки файл с макросами, создавал новый - он работает безупречно. ...
Теги: VBA
Изменен: 12.12.2023
Читать сообщение на форуме или сайте.
VBA если видимые строки равны 1, Проставить букву если = 1
Автор: lost.eu. Прошу помочь с кодом, данный код работает, но когда встречается видимая строка = 1 то код не проставляет букву A Задача была в том, чтобы проставить такое количество сколько имеется видимых строк буквы A, B, C вот код: Sub тест() Dim количествоСтрок As Integer Dim количествоБукв As Integer Dim буква As String Dim i As Integer Dim видимаяСтрока As Range ' Укажите ваш диапазон строк, начиная с A2 количествоСтрок = 1 For Each видимаяСтрока In Range("A2:A" & Cells(Rows. ...
Теги: VBA
Изменен: 30.11.2023
Читать сообщение на форуме или сайте.
Формула VBA не высчитывает значения в определённом диапазоне
Автор: Ильяrc. Здравствуйте! Помогите пожалуйста с кодом он должен по значениям в столбике С высчитывать сумму в определенном диапазоне и  делать разницу полученных значений и предыдущих потом с каждым шагом увеличивать диапазон суммирующих значений и т.д. до половины количества значений в столбике С. значения С заполняются индивидуально и не имеет зависимостей в отличии от шага В сам код: Sub gg() Dim Massive As Range Dim G As Double 'задаем форматы значений' Dim N As Double Dim ...
Теги: VBA
Изменен: 25.11.2023
Читать сообщение на форуме или сайте.
VBA Перенос значений из столбцов в одну строку по условию, Структурирование значений из столбца в 1 ряд на каждую объединенную ячейку
Автор: MZ_PLANET. Друзья, мой опыт не позволяет мне сделать макрос. Необходимо переносить значения ячеек слева в горизонтальный порядок справа (окрашенные строки в примере). Каждая позиция отдельно. Если есть такая возможность макросом сделать, можете подсказать пожалуйста?
Теги: VBA
Изменен: 17.11.2023
Читать сообщение на форуме или сайте.
Подружить Dadata c VBA, интересная задачка, интересно мнение экспертов
... документации сопрячь это дело с VBA? Например как функционал надстройки ProXL ...
Теги: VBA
Изменен: 13.11.2023
Читать сообщение на форуме или сайте.
Функция Getobject не видит открытый экземпляр приложения
... между двумя открытыми приложениями использую VBA через функцию Getobject.  Для примера ...
Теги: VBA, Getobject
Изменен: 24.10.2023
Читать сообщение на форуме или сайте.
VBA вставка пустых ячеек вместо отсутствующих данных, VBA вставка пустых ячеек вместо отсутствующих данных при переносе содержимого заранее указанных столбцов из книги в книгу
... .  Это своеобразное продолжение темы "VBA выборочное копирование столбцов в зависимости ...
Теги: VBA
Изменен: 10.08.2023
Читать сообщение на форуме или сайте.
Как парсит ответ get запроса
Автор: sayriddin sohibov. Есть файл с примером GET запроса, он работает, но не знаю как сохранить(парсит) ответ get запроса на отдельных столбцов 
Теги: VBA, GET
Изменен: 18.07.2023
Читать сообщение на форуме или сайте.
MRP калькуляция VBA, Объединение рецептур полуфабрикатов и готовой продукции
Автор: Wulade. Здравствуйте, Помогите с проблемкой. Задача: необходимо собрать базу из рецептур полуфабрикатов и готовой продукции, т.е. в готовый продукт входит полуфабрикат и упаковочный материал, а в полуфабрикат в свою очередь входит основное сырье и полуфабрикат2, который также состоит из сырья и полуфабриката3 (такая матрешка может доходить до 8 уровней, а иногда и меньше или больше). их необходимо соединить таким образом, чтоб можно было увидеть из чего состоит готовый продукт без ...
Теги: VBA
Изменен: 12.07.2023
Читать сообщение на форуме или сайте.
Обработка писем Outlook из Excel посредством VBA, Совместимость между различными версиями MS Office
Автор: Crowner. Подскажите чайнику, пожалуйста. Вот есть у меня макрос следующего вида Dim objFolder As Outlook.Folder Dim objNS As Outlook.Namespace Dim objMail As Outlook.MailItem Dim lCounter As Long Set objNS = Outlook.GetNamespace("MAPI") Set objFolder = objNS.GetDefaultFolder(olFolderInbox).Folders("Важная папка") For lCounter = 1 To objFolder.Items.Count Set objMail = objFolder.Items.Item(lCounter) {Здесь я получаю информацию различную из objMail такие как дата, время, ...
Теги: VBA, EXCEL, OUTLOOK
Изменен: 27.06.2023
Читать сообщение на форуме или сайте.
Сбор данных из файлов excel в 1 файл VBA, Сбор данных из выбранной папки в 1 файл VBA
Автор: lilo295. Добрый день. Помогите в написании макроса. Необходимо из нескольких файлов excel в которых находятся одинаковые таблицы с разными значениями собрать данные в 1 файл excel. Вариант 1: осуществить поиск по строке №6  по названию ячейки и определить столбец и вставить данные с 7 строки и до конца со всех файлов в 1 файл и на один лист. Поиск колонок: Наименование, артикул, цвет и последующая вставка столбцов в 1 файл, поиск нужно произвести во всех файлах. Заранее благодарствую!
Теги: VBA
Изменен: 18.04.2023
Читать сообщение на форуме или сайте.
VBA Фоновое открытие Книг в папке, кроме уже открытых, Макрос должен открывать все Книги в папке, кроме уже открытых
Автор: boberchik. Ребята, всем привет! Помогите доработать макрос. Я его нашел на просторах интернета, добавил к своей Книге - работает, но есть нюансы. Изначальная задача: при открытии Альфа-Книги необходимо в фоновом режиме открыть все Книги в Папке, сохранить изменения и закрыть. Тестовый запуск показал, что файлы открываются, сохраняются и закрываются нормально. Но только до тех пор, пока не случается ситуация, когда один из файлов в Папке уже кем-то открыт. Тогда работа макроса ...
Теги: VBA, Workbooks.Open
Изменен: 23.03.2023
Читать сообщение на форуме или сайте.
Перенос таблицы из word с помощью VBA, оптимизация кода
Автор: KrabNaGalerah. Всем привет, есть у меня пару ворд файлов, длинных, с большой таблицей в примерно 3к строк (выгрузка). Эти таблицы нужно закинуть в эксель. Написал код. Закидываю значения в массив, потом уже буду с этим массивом дальше работать. Однако обработка оставляет желать лучшего, около 5ти минут считывает данную таблицу. Код не большой, может быть кто то уже делал похожие вещи и знает хитрости, к примеру может быть скопировать таблицу как нибудь целиком, или что нибудь похожее. ...
Теги: word, vba, array
Изменен: 09.02.2023
Читать сообщение на форуме или сайте.
Regex execute, Проверка и подстановка скопированных данных в ячейку
Автор: Dzhode -. Доброй ночи, форумчане. Возник вопрос по использованию RegEx.Execute сёрфил форум в поисках ответа, увы видимо не хватило компетенций или упорства... Если быть кратким вопрос следующий: Как использовать функцию Execute для определённого диапазона, если в ячейку вставляются данные из буфера обмена (любого другого файла), содержащую следующий примерный текст : "Машина KAMAZ А101СЕ178". Диапазон к примеру используется "A". я могу только проверить, но не ...
Изменен: 02.02.2023
Читать сообщение на форуме или сайте.
Цикл For для нескольких строк
Автор: Сергей Тихомиров. Здравствуйте, сразу к делу: нужно преобразовать данный код, чтобы он работал не только на первую строку, а на диапазон строк. Например до 10. Понимаю что скорее всего нужно взять это все в массив и использовать\внедрить For Each, но никак не получается разобраться. Заранее благодарен.Private Sub CommandButton1_Click() Dim m As Integer Dim x As Integer Dim out As Integer m = Cells(2, 1) x = Cells(2, 2) out = Cells(2, 3) For i = m To x Step -x If i > 0 Then i = i - out ...
Теги: EXCEL, VBA, Макрос
Изменен: 22.11.2022
Читать сообщение на форуме или сайте.
Сохранение одного листа как отдельный файл.
Автор: В. Здравствуйте. Нужен VBA макрос скрипт который бы сохранял ...
Теги: VBA, Макрос, EXCEL
Изменен: 03.11.2022
Читать сообщение на форуме или сайте.
Не прогружается дата в поле TextBox при открытии, При открытии Экселя и автоматического запуска макроса поле TextBox остается пустым, хотя у него есть присвоенное значение. Может как обновить нужно?
Автор: Юлия Лунева. При открытии Экселя и автоматического запуска макроса поле TextBox остается пустым, хотя у него есть присвоенное значение. Может как обновить нужно? Dim NameOfFiles(2) As String Dim PathOfFile() Private Sub Back_Click()     Me.Hide     Choose.Show End Sub Private Sub ChooseFiles_Click()     Dim i As Integer     PathOfFiles = Application.GetOpenFilename(",*.csv", , "Choose file", , True)     If UBound(PathOfFiles) = 2 Then     NameOfFiles(1) = Mid( ...
Теги: VBA
Изменен: 26.10.2022
Читать сообщение на форуме или сайте.
VBA - как импортировать XML программно с подключенной внешне схемой, проблемы с программным импортом XML
... имею.  PS. На Stackoverflow excel - VBA - Doesn't import ...
Теги: xml, vba
Изменен: 13.10.2022
Читать сообщение на форуме или сайте.
VBA excel парсер highchart графика, Парсер на VBA (excel, макрос) highchart графика
... . Добрый день. Необходим парсер на VBA (excel, макрос) highchart графика  https ...
Теги: Excel, VBA, Парсер
Изменен: 16.09.2022
Читать сообщение на форуме или сайте.
Выгрузка CSV макросом на лист
Автор: Сергей Разумчиков. Добрый день! Помогите с задачей: Есть CVS открытый в EXEl с разделителями запятыми, далее его делим по столбцам по разделителю. Затем на другом листе па данной таблице строимсводную. Хотел автоматизировать процес подгрузки нового CSV (за другой период) с затиранием данных по старому. Но опробовав множество различных вариантов запутался и сломал голову. Ключевые моменты которые хотелось бы использовать: 1. Выбор файла CSV через диалоговое окно - что бы среди прочего ...
Изменен: 12.09.2022
Читать сообщение на форуме или сайте.
Команда vba Replace не работает с данными, считанными из ячеек, Команда vba Replace не работает с данными, считанными из ячеек
Автор: zenija2007. Здравствуйте. Создал скрипт для пакетной замены одной фамилии на другую. Когда вбиваю в команду Replace текст на поиск и замену напрямую, все работает, когда считываю из ячеек и подставляю через переменные - не работает. 'Список файлов на пакетную обработку Function ScanFolder() Dim sFolder As String, sFiles As String Dim str As String Dim s() As String 'диалог запроса выбора папки с файлами With Application.FileDialog(msoFileDialogFolderPicker) If .Show = False Then Exit ...
Теги: VBA
Изменен: 10.09.2022
Читать сообщение на форуме или сайте.
[VBA] Поиск и перенос уникальных данных
Автор: BUCK. Всем добрый день! Очень прошу вас помочь в создании макроса для переноса уникальных данных из одной книги в другую, так как макросами владею не сильно. Пример приложил в файле, для простоты Лист=Книга. Допущения следующие: Исходный файл "Книга 2", который выгружается из открытого источника, и куда постоянно добавляются данные в верхнюю часть таблицы, а также обновляются существующие данные "Книга 1" - рабочий файл, в который мне необходимо перенести новые ...
Теги: VBA, Excel
Изменен: 09.09.2022
Читать сообщение на форуме или сайте.
Vba самопроизвольно меняет путь сохранения файлов и названия некоторых файлов , Vba самопроизвольно меняет путь сохранения файлов и названия некоторых файлов
... . Сохранение происходит через .save. 1. Vba сохраняет изменённые файлы не с ...
Теги: VBA
Изменен: 06.09.2022
Читать сообщение на форуме или сайте.
Макрос копирования данных с критериями
Автор: Сергей Тихомиров. Здравствуйте, стоит задача составить макрос для копирования данных с одного листа по критериям в другой. На просторах интернета нашел похожую, но все равно иную и попытался этот макрос переделать по нужную мне задачу. И вот он вроде бы работает, но криво. Прошу помощи разобраться. Сама задача звучит так:  Нужно чтобы данные с листа 2 копировались на лист 1 по критерию в столбце С. Подобных строк в листе 2 будут около 250, а листе 1 зависит от заказа. Sub Копирование() ...
Изменен: 22.08.2022
Читать сообщение на форуме или сайте.
Преобразование формул в значения vba
Автор: twistd. Добрый день. Необходимо при изменении значения в ячейках столбца1 (Таблица2[Столбец1]) преобразовать строку с формулами в значения. При выполнении макроса цикл не заканчивается и уходит в ошибку. Помогите подкорректировать макрос.Private Sub Worksheet_Change(ByVal Target As Range) Dim KeyCells As Range Set KeyCells = Range("Таблица2[Столбец1]") If Not Application.Intersect(KeyCells, Range(Target.Address)) _ Is Nothing Then Range(ActiveCell, ActiveCell.End ...
Теги: VBA, Макрос
Изменен: 14.07.2022
Читать сообщение на форуме или сайте.
Страницы: 1 2 3 4 5 6 7 8 9 10 След.
Наверх