Форум программистов и сисадминов Киберфорум

Темы раздела VBA

Многопоточность в VBA
Подскажите пожалуйста, есть ли возможность сделать VBA многопоточным? Без dll и прочего, только кодом VBA и есть ли уже инструменты для этого?

Как удалить "хвосты" от удаленных вручную листов рабочей книги?
Добрый день. Листы, создаваемые программным кодом, путем копирования из шаблонного, и имеющие программный код обработчиков своих предопределенных процедур, иногда (в результате сбоев в работе и...

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

Создать файл из картинок каждой страницы Word
Добрый день. Есть исходный файл, необходимо создать новый файл, из картинок каждой страницы. Подскажите как можно это сделать ?

Батник или PowerShell. Скрипт для копирования файлов по маске в заданное место
Приветствую! Есть стартовая/корневая папка по пути sFolderStart вида "c:\FromHere". В корневой папке есть (помимо всего прочего) папки вида "AB1234" или "CD5678_Corr" — подходит маска sMaskFolder...

Альтернатива GoTo в приведённом примере
Возможно ли в данном примере избежать применение оператора GoTo? (В процедуре 3 GoTo, не хотелось бы злоупотреблять, и вообще..) Dim currentmonthname As String Dim pathОтчета As String...

Макрос проговаривающий фразы
Всем привет уважаемые участники форума. Нужна ваша профессиональная помощь. У меня есть файл эксель, с макросом. Нужно как-то сделать так, чтобы когда : 1- Менялось значение в колонке Е,...

При открытии книги или после работы макроса все данные на листе принимают формат даты
Всем здравствуйте! Установил Excel 2010 32 бита. Столкнулся с такой ошибкой. Время от времени при открытии книги или даже после работы какого нибудь макроса все данные на листе принимают формат...

Макрос для объединения ячеек на основании данных других столбцов
Добрый день. Подскажите пожалуйста, 2 день мучаюсь. Есть Excel Файл в котором уже есть макрос для вставки данных. (проба) Он из формы для заполнения переносит данные в базу оценки рисков. Но не в...

Не парсится сайт
Здравствуйте ! Подскажите, пожалуйста, что неправильно ? Значения имени и цена на вытаскиваются этим методом. Хотя ищу элементы по имени, как они в HTML. Sub ПарсингChrome() Dim driver As...

Перемещение курсора по таблице
здравствуйте подскажите, если я вручную перемещаюсь по таблице применяя кнопку со стрелкой "Вниз" то курсор движется верно по нужным ячейкам таблицы Ворд - таблица естественно имеет объединённые...

MsgBox запускается в свернутом состоянии
В чем может быть причина запуска MsgBox в свернутом состоянии и как это исправить? Предполагаю это как-то связано с применением оператора SendKeys (может приводить к автоматическому отключению...

Код для сравнения строк в двух таблицах на разных листах
Подскажите пожалуйста код для сравнения строк в двух таблицах на разных листах и перенести несовпадающие строки из таблицы на листе 2 в таблицу на листе 1.

Скорректировать макрос для другой формы excel
Добрый день всем, помогите заточить файл (2), по образцу файла (1). Что бы все работало как в 1 файле. Файлы прикрепил как архив.

Запуск макроса VBA из внешней программы
Win10 Создаю макрос в личной книге макросов, он создаётся здесь: C:\Users\Username\Appdata\Roaming\Microsoft\Excel\XLSTART\PERSONAL.XLSB Сам макрос: Sub Macro Cells(1,1) = "abc" End Sub Создаю...

Получить доступ к файлу Excel на Яндекс-диске
Дано: На Яндекс-диске лежит файл Excel. Имеется ссылка на него типа "https://disk.yandex.ru/i/RbFVlmDVb6Nw" Задача: Посредством VBA открыть этот файл, внести данные, сохранить и закрыть. Есть...

С помощью VBA заполнить ячейки столбца, ЕСЛИ
Как с помощью VBA заполнить ячейки столбца 38 единицами если слева в ячейках столбцов 31-35 есть число 111. Разделители различные. ст31 ст32 ст33 ст34 ст35 ст36 ст37 ст38 2 2 2 2 0...

Почему Excel дополнительно запрашивает подтверждение о сохранении файла?
Собственно, вопрос в заголовке топика: почему Excel иногда (!!!) дополнительно запрашивает подтверждение о сохранении файла, при выполнении этой процедуры? При этом, чем проще спредшит и меньше кода,...

Перенос из word в excel
Здравствуйте. Возможно ли создать макрос excel. -имеется определённый файл ворд с данными ФИО, дата рождения должность, район и тд на 100 листах, -перенести в аксель в определённую ячейку. В...

Пакетное изменение текста в Word исходя из названия файла
Добрый день, Уважаемые программисты! Есть острая проблема по массовой замене текста в документах word *.docx В названии файла фигурирует порядковый номер (от 1 до 999), этот порядковый номер в...

Генерация штрихкода EAN13, Code128 в VBA
Добрый день! Возникла потребность в генерации штрихкода EAN13, Code128 с помощью VBA в среде Excel. В идеале, хотелось бы найти функции, которые создают штрикоды в кодировках EAN13 и Code 128:...

Работа макроса совместно с общим доступом
Всем привет. После включения общего доступа к листу, в работе макроса происходит ошибка. Пытался выяснить причину, но как то без результатно. Почему так происходит? Как это решить? Код выглядит так...

VBA compiler - Компиляция VBA проекта в DLL
Добрый день, жители форума! В процессе работы мне потребовалось вынести код из VBA Excel в DLL. Поскольку я не силен в программировании (хотя попробовал сделать это на Python, но там нельзя...

Посмотреть координаты вершин отрезка
Требуется увидеть координаты (x1,y1,x2,y2) точки (или концов отрезка). В идеале мне требуется в эксель вставить рисунок (без проблем), поставить на рисунке несколько точек и знать их координаты...

Можно ли управлять сборкой мусора из VBA Excel
Много данных приходится лопатить. Столкнулся с проблемой мусора. Можно ли запустить сборку мусора из VBA?

Как узнать размер таблицы Word (ширина, высота) в пикселях?
Здравствуйте ! Можно ли узнать размер таблицы Word (ширина, высота) в пикселях ?

При запуске в Excel редактора VBA, появляется окно с надписью file, и больше ничего сделать нельзя
Доброго. Проблема: при запуске в Excele редактора VBA, появляется окно с надписью file, и больше ничего сделать нельзя. Переустановка, установка нового офиса ничего не помогает. Попробовал на...

Смешанный допуск
Можно ли сделать вывод смешанного допуска (это когда есть допустим верхний +0,007 и нижний -0,5) это надо вывести как в конструкторских документах. Можно ли такое реализовать на VBA в access?

Ресайзинг (масштабирование объектов) в VBA
При разработке проектов на VBA часто возникает проблема ресайзинга окон, так как у пользователей могут быть очень разные разрешения экранов. Это обстоятельство делает невозможным размещать формы и...

Макрос для вставки в ячейку листа многострочного текста
Ну короче, задача такая. Вот я, например, скопировал из браузера или ещё откуда-то большой фрагмент текста и хочу вставить его весь целиком в одну ячейку. Без пляски с бубном каждый следующий абзац,...

Заполнение таблицы в Word с добавлением строк данными из Excel
Добрый день! Буду благодарен в помощи поиска решения по задаче: в екселе заполняется таблица данными о сотруднике и его выходе на работу в выходной день, эти данные нужно перенести в документ ворд в...

Парсер файлов yaml на vba
Здравствуйте! Может есть у кого или встречали парсер yaml файлов на vba или vbscript? В принципе даже можно без поддержки всех особенностей

Копирование строк в таблицу по условию с закрытого файла
Нужна помощь. Есть таблица 1 в на листе 1 в Книге1. В таблице в столбце "А" идут номера строки. В таблице 2 на Листе1 Книги2 такая же таблица. Разница между ними в том что в таблице 1 в Киге1 номера...

Пользовательская функция вставки текущих даты-времени в качестве статического значения
Здравствуйте. Возможно ли создать пользовательскую функцию для заданного диапазона соответствующую формуле: При заполнении ячейки В2 текстом или числами ячейка E2 заполняется значением текущей...

Как просуммировать список диапазонов (Range)?
Делаю значит простой подсчет суммы из 3 переменных. Через кнопку макроса. Sub Knopka() Dim a, b, c, d As Double a = Range("A2") b = Range("B2") c = Range("C2")

Конкурентная запись в книгу
Приветствую. Есть расшаренная книга. Работа с ней ведется с помощью Microsoft Excel 15.0 Object Library. И имеются рабочие процессы, которые могут записывать в книгу данные параллельно. Последние...

Странное поведение Like (VBA)
Мое почтение, джентльмены. Есть интерес послушать специалистов, почему Like в варианте 3 выдает True, а в последнем варианте ошибку? Sub TestLikeERR() Debug.Print "-" Like "" 'True ...

Макрос очистки папки Temp
Здравствуйте! При очистке папки Temp возникает ошибка 70 (Строка 25) Атрибут папки Temp "Только для чтения" снял, но он восстанавливается... Как можно решить данную проблему? Sub...

Замена аббревиатур на расшифровку
Документ состоит из строк с аббревиатурами. Каждая аббревиатура имеет формат: КД<табуляция><цифра> Ее нужно заменить на: КД<табуляция><короткое тире><табуляция>расшифровка Код ниже работает, но...

Как перенести значение времени из ячейки в дисковый файл?
В ячейке Excel значение, например, вот такое: 0:02:14. Формат в той ячейке выбран "Время". Требуется просто (просто?! Уже второй день сражаюсь) программно скопировать значение времени из той...

Создать массив из отфильтрованных строк одной командой
Работаю с большими массивами данных в Excel Если помещать весь массив данных в память и обрабатывать в нём нужные мне строки - долго и малоэффективно с точки зрения перелопачивания в памяти ненужных...

Не могу понять почему неправильно работает формула
Добрый день, товарищи. Столкнулся с проблемой, которую не могу решить своими силами. Вот код для функции в Excel: Function define_stat(ws As String, dd As String, dta_rng As Range, pls_tank As...

Автофильтр методами VBA
Установить Автофильтр методами VBA. Оставить видимыми все ячейки столбца К, содержащие значение выбранной активной ячейки массива (А3:А22) Например: ActiveCell.Range("А4") = 2 Использовал...

Многострочный запрос sql не выполняется в excel
У меня при выполнении макроса выдается ошибка ошибка run-time error 3704 application-defined or object-defined error Думаю это связано с многострочным sql запросом, который находится в переменной....

Перекодировка файлов XLSX в формат XML
День добрый, очень нужна помощь специалистов для охотсообщества России - от Калининграда до Сахалина. Суть вопроса - с некоторых пор приходится передавать каждый месяц в налоговую информацию по...

Прибавить часы к значению в ячейке
Доброго дня форумчане. Помогите с вопросом, как прибавить к значению в ячейке 4 часа. В ячейке находится время и текст такого плана Понедельник 19/05/2025 10:05 "СДЕЛАНО В РОССИИ" 10:30...

Импорт таблицы из Excel
Доброго дня, коллеги! Есть у меня задача импортировать в Access большее число таблиц из Excel, а стандартным способом (Внешние данные->Создать источник данных->из файла->Excel) не подходит, в виду...

Класс не зарегистрирован. Не появляется страница браузера
Здравствуйте ! Подскажите, пожалуйста, при пробном написании попытки парсинга с сайта выдаёт ошибку "Класс не зарегистрирован". Что неправильно ? Не связано ли это с тем, что InternetExplorer...

Выделения цветом несовпадающих фрагментов строк (Excel, VBA)
Добрый день! Задача сравнения строк в Excel (VBA) и выделения цветом несовпадающих фрагментов строк. Посмотрел решения и нужного как-то не нашел. В файле есть код, который ближе всего к...

При нажатии "Выполнить" в Excel: Файл уже используется. * docx заблокирован для редактирования
Добрый день. Сразу извиняюсь, если не туда написал. Есть написанный макрос для заполнения формы в ворд с экселя. Работает отлично на многих компьютерах, кроме одного с Window 11 pro и...

В виртуальной машине Vmware не передвигается курсор
Здравствуйте форумчане. Очень странная ситуация. На главной оси передвижение курсора мыши с помощью "Public Declare PtrSafe Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As...

Макрос для конвертации изображений внутри Word документа в jpg
По работе часто возникает такая задача, что нужно сконвертировать много изображений внутри документа Word в jpg, чтобы размер файла был приемлемым. Вручную делать это оооочень долго, понятно, поэтому...

Ошибка кода VBA: Несоответствие типа
Добрый день! Помогите, пожалуйста, не пойму в чем ошибка. Суммы вроде с нулями. Эта ошибка появляется когда добавляю столбец 9 и @менеджер, без этого код работает отлично. Option...

Вписать путь к папке через диалоговое окно в код VBA
Добрый день. Есть файл Excel который заполняет шаблон данными из таблицы с подстановкой чертежей. На страницы с шаблоном вписан код, по которому через ВПН подтягивает чертежи. В коде нужно указать...

Выделение диапазона двух столбцов через переменные
Добрый день. Подскажите, необходимо одновременно выделить два отдельных столбца(без выделения столбцов между ними), наподобие кода Range("B18:B29, J18:J29").Select Но, есть условие, что...

Скопировать лист с заменой значений в ячейке
Помогите решить задачу. Нужно макросом сделать много копий одного листа (Маркировка), при этом в каждую созданную копию подставить в ячейку F2 значение с листа (Данные). Например, на первую копию...

Управление Chrome из VBA
Парсинг сайтов делаю автоматически. Но некоторые сайты не могу пока добыть в память. Хотя страницу с данными уже расковырял и анализирую. Чтобы ее получить делаю следующее: 1. Открываю страницу с...

Ресайз при сабклассинге UserForm
Доброго времени коллеги, буду без кода т.к. если кто в теме - либо заинтересуются и на ЛЛМ-ке накидают код теста или знают ответ ... вообщем, при сабклассинге существующей формы, если ранее был...

Возможно ли в VBA в адрес ячейки подставить значение другой ячейки
Добрый день, уважаемые форумчане. Ячейка S2 = 6, возможно ли в VBA в адрес ячейки подставить значение этой ячейки, чтобы получилось Range("B6")? Добавлено через 1 час 37 минут Всем спасибо....

Вставить номер страницы в TextBox
Доброго времени суток! Прошу строго не судить только начал изучать VB Написал код который вставляет номер страницы в текстовое окошко в документе которое принадлежит объекту c Все в принципе...

Макрос для добавления выделенного текста в библиографический список Word
Добрый вечер. С помощю искусственного интеллекта создал макрос который добавить в ворд список библиографический список выделенног текста. Но макрос полностью не может добавить в нужные места. Пример:...

Боковая панель навигации по заголовкам
Нужна помощь в создании макроса для word. Есть большой файл с текстом, в нем имеются заголовки двух типов -один жирный с размером шрифта 16 и -второй жирный со шрифтом 14. Но там много стилей...

Compile error: ByRef argument type mismatch
Не понял я, с чего эта ошибка. Кто может объяснить? '---Развернуть строку Function LineString(s As String) As String sout = "" For k = 1 To Len(s) c = Mid(s, k, 1) If c = Chr(10) Then ...

Проблема с форматом ячейки
Здравствуйте! Нужна помощь. В ячейке стоит формат # ### ;(# ### );"-" Если в ячейке значение >=1000, то шрифт чёрный, если <-1000 то красный и в скобках. Но если от -1000 до 1000 то должно...

Макрос получения списка праздников сегодня от сайта
При выполнении процедуры выдает ошибку 438 «Объект не поддерживает это свойство или метод» 15 строка, причем на разных сайтах, проверка классов элементов для поиска заголовков праздников ничего не...

Макрос для вставки столбцов с данными в другую книгу
Всем привет. Пожалуйста, помогите решить следующую задачку: Есть 2 книги: Возвратная ведомость Свод Нужно из файла Возвратная ведомость с листа "Ведомость" копировать...

Реализация алгоритма блокировки части элементов управления пользовательской панели по ключу
Необходимо блокировать (не отключать) часть элементов управления пользовательской панели нажатием на кнопку "Х", сохраняющей состояние ключа Блокировка = True в ini файле (getText для editBox ...

Excel "думает", что его код VBA завис
...но это не так. При выполнении вычисления в цикле, спустя >10 секунд вычислений, Excel и форма VBA принимают "зависший" вид с добавкой в заголовок формы "...не отвечает". Расчет продолжается в...

Вернуть фокус табличной формы с учетом неизменного положения самой верхней в области видимости
Здравствуйте! Возможностей закладки (Bookmark) не хватает, я меняю форме рекордсет, затем возвращаю его обратно, сделанная закладка возвращается к нужной строке, но сами строки в области прокрутки...

Макрос для удаления строк по значению из ячейки
Доброго времени суток. Прошу помочь с написанием макроса VBA по удалению строк. Ситуация такова: имеется диапазон ячеек, в ячейки подтягиваются даты из другого файла, когда даты не найдены эксель...

Свойства объектов, не указанные в документации
Ругал я тут документацию на LibreOffice, но теперь убеждаюсь, что с ней и в Microsoft не всё хорошо. Сейчас занимаюсь графиками и читаю, вроде бы, официальную страницу Microsoft:...

Не могу изменить значение константы. Excel падает
Добрый день. Константа ge148 - нужно поменять значение. Попытка что-либо делать с нею приводит к падению Ексель при попытке откомпиллировать или сохранить проект после изменений.

Определить начало и конец таблицы excel
Здравствуйте! Подскажите пожалуйста, как можно кодом vba-excel автоматизировать следующую задачу: Есть таблица Excel, нужно задать границы этой таблицы - кликнуть в ее начале и в конце (либо в...

Парсинг содержимого тегов html, коррекция вывода полученных данных
При парсинге таблицы сайта Битрикс24 получил данные со сдвигом правого столбца: Вопрос_1: Как можно привести их в следующий вид?: Sub ParseBitrix24()

Чек userName на равенство одному из разрешённых
Здравствуйте! Имеется рабочий вариант проверки: Option Explicit Sub CheckName_1() Dim userName, usernames As Variant, accessAllowed As Boolean accessAllowed = False usernames...

Получить от сайта с авторизацией данные
Здравствуйте. Почему в Immediate Window (строка 56) Debug.Print HTMLcode я получаю dataType: "json" dataType: "json", lsId: "sync-mailbox", lsTimeout:...

Удаление пустых строк в таблице
Доброго времени суток! Прислали базу данных, в которой порядка 50 таблиц, примерно по 1000 строк в каждой. В некоторых таблицах есть строки, в которых есть только ключевые поля, но остальные...

При копировании кодом ВБА, который используется в Ворде знаков "˂" они отображаются как "?"
здравствуйте, копирую в буфер с переменной кодом: Function CopyToClipboard(textToCopy As String) As Boolean Dim hGlobal As Long Dim lpGlobal As Long ' Открываем буфер обмена If...

Метод Find затрудняется с поиском значения
Здравствуйте. Как исправить код? Не работает строка 60 переменная GCell не содержит данных '--------------------------------------------------------------------------------------- 'Purpose :...

Кодом VBA вставить данные с Листа1 и забрать ответ из Google Chrome
Задача: Кодом VBA вставить значение ячейки A1 в поле ввода данных сайта и забрать в ячейку В1 перевод текста из Listbox на сайте, открывающемся/открытом браузером Google Chrome (который не является...

Как в Exel добиться поиска нужного числа путем увеличения на единицу, до получения нужно значения в другой ячейке?
Я на данном форуме впервые и не очень знаю, как правильно и проще можно описать нужный мне вопрос. Не судите строго. Есть 3 ячейки: Стоимость |Тираж | Сумма Пример: Стоимость = 6р. Сумма -...

Сохранение строк из одного файла, в разные файлы в определенном формате
Добрый вечер. Помогите прописать код сохраняющий строки из 1 файла в новые файлы. Требуется определенный формат отображения данных. Во вложении файл с формулами, на 1 листе источник, на листах...

Рандомная картинка в макросе
Здравствуйте. Есть незатейливый макрос, выполняющийся по нажатию кнопки ActiveDocument.Shapes.AddPicture(Anchor:=Selection.Range, FileName:="C:\word+\wPictures\_Подпись1.png", _ ...

Количество строк в Textbox или его высота в зависимости от текста
Добрый день ув. форумяне! как посчитать кол-во строк в текстбоксе, при том что текст в нем постоянно меняется, но его ширина остается неизменной, меняется лишь высота - по сути нужно вычислить высоту...

Как побороть мерцание?
Думаю проблема в вызове gHwnd = CreateWindowEx(0, "static", "OpengGL", WS_POPUP, 0, 0, gWidth, gHeight, GetUserFormHandle(pCtrl.Parent), PtrNull, PtrNull, ByVal PtrNull)...

Запрос погоды
Добрый день! Есть такой сайт https://open-meteo.com/en/docs/historical-forecast-api, позволяющий узнать погоду на заданную дату и координаты без API-ключа. Если в нем выбрать СПб на 10.10.25,...

Парсинг ИНН (не работает макрос)
всем доброго ! нашел макрос котрый скачивает выписку с egrul.nalog.ru запускаю не работает в строке. Подскажите пжл в чем трабл . прикрепил фото и сам файл с макросом в о вложение спасибо ...

Обновление макросов в файле
Всем привет, помогите, пожалуйста, решить мою проблему, какой день мучаюсь! Нужна была готовая таблица в ексель для планирования задач. Нашла подходящую в интернете, но этот файл не работает...

Численное дифференцирование
Я застрял на том, что не могу понять, как исправить код так, чтобы погрешности второй производной стали меньше. Пожалуйста, укажите, где можно улучшить или упростить код. условии задании (просто...

Вставить значение формулы из данных в строке
Уважаемые форумчане, здравствуйте. Помогите решить вопрос с прописанием формулы в макросе. Есть таблица с данными по температуре воздуха и скорости ветра. Необходимо чтобы при нажатии на макрос...

Как узнать, что в Combobox еще ничего нет
Создан комбобокс. В него массив строк помещается программно. Но иногда не помещается. И это правильно. Нужно узнать, что в комбобоксе ничего нет вообще (пустой элемент). Как?

Макросы для Mac
Доброго времени суток! Столкнулась с непонятной проблемой: у меня есть рабочий макрос, который импортирует данные, путем выбора файла при запуске проводника и принудительно форматирует некоторые...

Макрос для создания копии бланков
Доброго врнмени суток. Спасите от меня GPT&Grok... Очень зашла идея автоматизировать рабочие будни с нейросетями. Но случился затык. Описываю: В общей сетевой папке лежит документ blank.docm....

Настройка чекбокса на пользовательской вкладке ленты Excel
Здравствуйте, При открытии книги получаю ошибку " Wrong number of arguments or invalid property assignment " Как это можно исправить? Код VBA: Option Explicit Public gRibbon As...

При задании серий чарта почему-то важен порядок
Если я сначала задаю цвет линии серии чарта, а потом убираю линию, Ser(nser - 1).Border.Color = RGB(r, g, b) Ser(nser - 1).Border.LineStyle = xlLineStyleNone то всё проходит нормально, но если...

Безопасность типов
Если в языке нельзя объявлять типы переменных (нет типобезопасности) и переменные пишутся вот так $ИмяПеременной это нафиг, просто нафик я дальше уже не смотрю )

Вставить текст в картинку на листе в координаты точки
Есть картинка, она в файле ексель. Требуется вставить текст в точку на картинке, зная координаты точки (x,y)

Ворд получить иконку расширения в Яндекс браузере
здравствуйте у меня установлено в Яндекс браузере самописное расширение для Яндекс браузера, там в зависимости от выбранного пользователя меняется иконка расширения, как с помощью ВБА узнать её...

Не видит таблицы PostgreSQL
Коллеги, чего-то все перерыл, не получается: Sub ReadData() Dim conn As ADODB.Connection Dim rs As ADODB.Recordset Dim sql As String Set conn = New ADODB.Connection ...

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

Найти все запятые между маркерами в Notebook++ (regex)
Здравствуйте! Если есть желание, возможность и знания, помогите, пожалуйста, подправить код (?:kwd1|\G)+\K,(?=.*kwd2) чтобы он находил все запятые между двумя ключевыми словами в Notebook++....

Прочитать свойство набора характеристик из объекта с помощью VBA Civil
Добрый день! Как через VBA прочитать свойство с вкладки "Дополнительно" на панели свойств? Как добраться до стандартных свойств я знаю. Вопрос про свойства созданные через "Наборы характеристик".

Проверочные тесты
Здравствуйте. Никогда раньше не сталкивалась, поэтому жду помощи. Мне поручили разработать задания для олимпиады по программированию. Задачи придумала. Теперь нужны проверочные тесты. Я думаю...

Проблема с элементами управления формы
Добрый день, уважаемые форумчане! Проблема следующая Есть файл Excel с расширением .xlsm, который содержит макросы, запускаемые при помощью нажатия на кнопку. У одного из пользователей кнопка...

Горячая клавиша на макрос в надстройке
Здравствуйте. 1.Описание проблемы: Не работает вторая горячая клавиша для макроса надстройки. (Первая работает). 2.Мои действия: 2.1.Назначил двум макросам хоткеи в модуле рабочей книги: ...

Автоматическое выполнение макроса при изменении значения в ячейке
Пытаюсь разобраться как посредством макросов сделать тренажер запуска ГПА компрессорного цеха. Суть работы такая: машинист нажимает на кнопку (OptionButton), на которой написан номер крана на...

Как по каждому числу из одного столбца сделать выборку чисел из другого столбца?
Добрый день! Есть таблица с номерами. К примеру берем номер 1525 из столбца L. Он повторяется 3 раза. В столбце K есть три номера, которые в строках соотносятся с номером 1525 из столбца L, например...

UserForm, как заблокировать редактирование?
Всем привет! Я сделал форму(userForm), хочу заблокировать её для редактирования, что бы отправить ее другому человеку, а тот в свою очередь пользовался ей и не мог посмотреть код и тем более что-то...

При открытии (UserForm) нет возможности копировать данные с ячеек EXCEL и т.д
Нужна помощь. При пользовании формой заполнения, нет возможности пользоваться самим Excel фалом. Копировать данные из листа Excel либо переходить на другие листы и в другие книги Excel и от туда...

Комбинированного метода(хорды + Ньютон)
Прошу понять, я начинающий и именно так учусь — на ошибках! Гуглить умею и пользоваться ИИ тоже, но я хочу понимать свои ошибки, решая сложные задачи, и учиться так. Это уже 4–5-я попытка решить...

Как использовать дробные числа
При создании контура для объекта через .CreateCONTOUR можно задать только целочисленные. Как можно использовать дробные числа

Копирование слоя из одного файла Corel Photo-paint в другой
Здравствуйте! Мне нужно автоматизировать вставку подписи в файл Corel Photo-paint. Разобрался как открыть файл и записать нужный слой в переменную. Но дальше не понимаю как вставить этот слой в...

Сообщение о большом размере рисунка, хотя макрос с рисунками (пока) не работает
При запуске работе макроса он отрабатывает нормально в паре с Lazarus, формирует именно то, что нужно и завершает работу. Сформированная таблица остаётся на экране. Но при закрытии Excel-файла...

Запуск Outlook в фоновом режиме
Запускаю приложение в скрытом режиме, но через пару секунд оно закрывается... Sub StartOutlook() Dim OutApp As Object Dim OutMail As Object Application.ScreenUpdating = False ...

Привязка макроса к кнопке в Outlook
Есть MS Outlook. Включил режим Разработчик, вхожу в соответствующую вкладку, выбираю Выбрать форму, далее выбираю Сообщение. Далее Разработчик, Конструктор и попадаю в режим конструктора. далее чуть...

Как сохраняется измененная таблица: полностью или отдельными листами?
Привет всем. Не нашел ответа на такой вопрос: как сохраняется таблица xls при изменении данных только на одном листе ? Т.е. пересохраняется на диске SSD только один измененный лист или вся таблица...

Удаление надстройки кодом VBA
Can't execute code in break mode при запуске процедур: Sub DeleteMyAddIn() Dim fso As Object AddIns("ВалидацияПД_V_1.2").Installed = False Set fso =...

Почему нельзя запускать макрос более 19 раз в Access 2010
Option Compare Database '------------------------------------------------------------ ' Копия_Макрос1 ' '------------------------------------------------------------ Function Копия_Макрос1()...

Excel удалить строки группировки 1-го уровня
Как удалить строки группировки только 1-го уровня? Заодно можно и строки 3-го уровня удалить, пример прилагается.

Обрамление ячеек по условию
Есть макрос обрамления ячеек диапазона по условию. Как скорректировать код, чтобы обрамлялись все ячейки строки диапазона, если в строке диапазона есть непустая ячейка? Sub...

Косвенная адресация в Excel
Доброго вечера! У меня есть адрес нужной мне ячейки вида 'Лист1'!$А$X , он получается динамически путем поиска X строки через ПОИСКПОЗХ() склеивается и содержится в значении технической ячейки в...

Custom UI Excel. Привязка onAction RibbonSplitButton к значению в editBox
Вопрос касается кнопки RibbonSplitButton, сочетающей в себе и кнопку и меню (вы можете либо нажать кнопку, либо нажать на меню). Нажимаем кнопку SplitButton на треугольник справа , отображается ее...

Настройка расположения диалогового окна Application.InputBox
Здравствуйте. Положение диалогового окна Application.InputBox жестко зафиксировано в единственной позиции относительно расположения окна Excel. Как в данном случае менять его расположение не...

Проблема с сохранением документа
Добрый день! Создал шаблон по заполнению автоформы через эксель по меткам. Все работает. Пытался сделать сохранение в том же месте где находится файл эксель. Но почему-то он сохраняется не в...

Проигрывание звуков и показ шейпов при смене слайда в презентации
На слайде есть несколько шейпов. К ним прикручены звуки wav. При переходе на этот слайд я могу проиграть эти звуки. Однако у меня не получается проигрывать звуки и параллельно показывать эти шейпы....

Заполнение значением формулы заданного количества видимых ячеек отфильтрованного столбца
Появилась необходимость заполнить значением формулы заданное количество видимых ячеек отфильтрованного столбца, в котором отфильтрованных строк больше чем нужно заполнить. Поиски дали лишь...

Убрать сетку
Здравствуйте ! В строке таблицы Word выделяю строку oTb.Rows(25).Select() и хочу скрыть нижнюю границу ячеек этой строки oWrd.Selection.Borders(wdBorderBottom).LineStyle = wdLineStyleNone -...

Как распечатать Spreadsheet1 с листа?
Spreadsheet1 как распечатать с листа

Заполнение данными в нескольких таблицах
Здравствуйте. По этому коду создаю новый лист с таблицей в книге. Private Sub CommandButton2_Click() ActiveSheet.Copy After:=Sheets(Sheets.Count) ActiveSheet.Name = "copied sheet"...

Макрос копирования строк по условию
Добрый день! Прошу оказать помощь в доработке макроса. Строка с листа "ЗАДАЧИ" копируется на лист "КАЛЕНДАРЬ" по условию, что в столбце "G" - "Просрочено". Но записывается со столбца "А". Можно ли...

Dictionary и как записать туда экземпляры класса
Здравствуйте, коллеги, прошу помощи, не могу разобраться почему в коллекцию Dictionary пишутся одни и те же данные. Вроде при каждой итерации создается новый объект, добавляется в коллекцию с новым...

Как разбить документ по заголовкам
Необходимо разделить документ на части следующим образом - содержимое от 1-го заголовка до 2-го записать в отдельный документ, содержимое от 2-го заголовка до 3-го - в другой и так далее. Дайте...

Сортировка таблицы по строкам
Прошу помощи. Стоит задача отсортировать слова в ячейках по алфавиту. То есть, в ячейке например написано Слива, Мед, Абрикос. - а нужно Абрикос, Мед, Слива. (пример во вложении) Сейчас делаем...

Выделить все строки в таблице и вставить пустые
Всем привет подскажите пожалуйста, кому не трудно Копируем с листа1 первую строку Sheets("лист1").rows(1).copy Выделить все строки Вставляем на лист2 строку которую скорировали For i =...

Обработка исключений при поиске
Здравствуйте. В теме https://www.cyberforum.ru/vba/thread3188208.html уважаемым AlexOld было предложено решение поиска заданного значения при условии. С тех пор оно прекрасно работает лишь...

Прошу реализовать алгоритм макросом
Добрый день! Прошу помочь в реализации алгоритма макросом(ускоренно), файлы тяжелые, в один файл не удается все внести и через сводную работать с данными. 1. В папке лежат много файлов,...

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

Кодом открыть VBE из .xlsx с переходом на Module2 Проекта надстройки
Здравствуйте, Как открыть VBE с переходом на Module2 Проекта "ВалидацияПД_V_1.2.xlam" (надстройка)? Sub OpenVBE(ByVal Control As IRibbonControl) Application.VBE.MainWindow.Visible = True ...

Сохранить текст с активного листа в txt колировка windows
Добрый день! Подскажите пожалуйста кому не трудно, на листе содержатся денные: Имя=Дмитрий Фамилия=Иванов Отчество=Иванович Если использовать функцию ActiveWorkbook.SaveAs Он сохраняет txt с...

Обработать выбранный Item в ListBox в зависимости от флага
Прикрепил файлик, в котором сформировал два вопроса. Суть задачи. Есть Листбокс, в котором указан список неких признаков и номера столбцов, в которых признаки указаны. листбокс работает в...

Создание динамической usetform в excel
Коллеги, кто сможет, пните в нужном направлении. Есть некоторый список документов с перечнем замечаний (закладка mine) Пользователь, на закладке Свод (презентация) запускает форму, с помощью...

В коде VBA обозначению листа Sheet ("Лист1") вместо "Лист1" указать ячейку А1 в которой внесено название листа
Добрый день, уважаемые господа-Программисты!!! Пытаюсь в коде VBA прописать следующее: 1. В файле "Макрос_Название_листа_переменной" записан макрос Sub Перескок() Workbooks.Open Filename:=...

Синхронизация значений ячейки и editBox (на ленте пользовательской надстройки)
Здравствуйте. Задача: Как при изменении значения ячейки H1 синхронизировать (в динамике) значение в поле editBox "Всего валидированных документов:" на ленте пользовательской надстройки? В...

Управление автооткрытием пользовательской вкладки ( customUI) элементом ленты
Возможно ли в принципе программно отключать-подключать (кнопкой, чекбоксом) функцию автооткрытия пользовательской вкладки (СustomUI)? Option Explicit Public gRibbon As IRibbonUI Sub...

Поймать вывод командной строки (Shell)
Здравствуйте, прошу помощи! Вот так подписываю выгружаемые файлы с помощью КриптоПро: Sub SignFileCryptoPro(fileFullName As String, myCert As String) Dim utilPath As String utilPath =...

Как вывести на предварительный просмотр для печати отчёта только текущую запись, а не все записи БД Access c помощью кнопки
Всем добрый вечер! Каким образом можно вывести на предварительный просмотр для печати отчёта только текущую запись, а не все записи БД Access c помощью кнопке на форме?

Макрос удалить дубликат по условию
Добрый день. Подскажите, пожалуйста, может быть сталкивались с такой задачей. Даны строки (1 строка): сегодня я написал программу (2 строка): написал программу вторая строка уже содержится в...

Статистика данных по цене товара за разный период времени
Здравствуйте! Помогите, пожалуйста, реализовать следующую задачу: Есть таблица Exel. В ней на первом листе информацию об изменении цены за разные промежутки времени (полгода, год, предыдущий...

Таймер, настройка - значение секунд в ячейке
Приходится корректировать время работы таймера меняя секунды в коде формы, а как прописать время работы таймера, забирая значение секунд например из ячейки листа? Set TimeValue_ss = Range("AO1")...

Не могу создать связь внешнего интерфейса
Добрый день. Я новичок, если кто сможет помогите пожалуйста. Имеется внешний интерфейс Access в нём пользовательские формы. На удалённом П.К., установлена SQL Server в которой есть две базы...

Возвратить значение переменной из коллекции Names
Как возвратить значение переменной из коллекции Names? (Начало в https://www.cyberforum.ru/vba/thread3208348.html#post17598910) Option Explicit Public gRibbon As IRibbonUI Public pressed As...

Помощь с реализации поиска по умной таблице
Всем привет. Есть умная таблица, не выходит доделать поиск в ListBox через TextBox. Private Sub TextBoxFind_Change() Dim rng As Range, адрес$ ListBoxFind.Clear ListBoxFind.Visible = False If...

Не закрывается таблица и приложение
Есть таблица с макросом file1.xlsm Макрос такой (сильно упростил): Sub cserver() Sleep 1000 ActiveWorkbook.Close SaveChanges:=False ThisWorkbook.Close SaveChanges:=False ...

Макрос для создания титула диссертации и автореферата
Добрый день. Имеется 3 макросы для форматирование титула диссертации и автореферата и требование для титула. Макросы должны форматировать титулы по требованию. Макросы для форматирование титула...

Определить количество абзацев с метками, удалить лишние абзацы
Доброго дня, форумчане. Задача следущая: есть абзацы в которых текст: глас 1: глас 1: глас 7: глас 3: глас 3: глас 3: глас 3: Слава:

Преобразовать макрос поиска по условию в безусловный
С 13.01.2025 пользуюсь замечательным поиском по условию от уважаемого Angry Old Man https://www.cyberforum.ru/vba/thread3193322.html?ysclid=mc6arml8l2358255567, там же где нужен поиск без условия - ...

Удаление n строк по условию (дата, время) в заданной процедуре модуля указанного проекта
Необходимо удалить строки с 3 по 20 из процедуры "ZZZ" Workbooks("ВалидацияПД_V_1.2.xlam") по условию. При выполнении кода возникает ошибка «Invalid procedure call or argument» т.к. значение...

Конфликт имен при открытии файла
Здравствуйте ! Есть файл - exc.xlsx В этом файле, прописаны имена print_area, print_titles. При клике этот файл запутится без проблем, однако если его открывать программно -...

Запись составной строки в Log.Txt
При открытии книги.xlsx с надстройкой на строке 4 Sub WriteLog() выходит ошибка Can't execute code in break mode. (Окно сообщения 3 раза закрываю) В стандартном модуле: Option Explicit Sub...

Продление макроса до последней строки в таблице
Здравствуйте! Есть макрос. Он выполняется для одной строки. Необходимо, чтобы точно такой же макрос выполнялся для всех строк в таблице. Количество строк в таблице может быть разным. Подскажите,...

В выбранной по условию ячейке создать выпадающий список и выбрать ФИО пользователя в зависимости от UserName
Как в выбранной по условию ячейке с выпадающим списком выбрать ФИО пользователя в зависимости от user_name? Option Explicit Dim user_name As String Dim ФИО As String ФИО =...

Скрипт, для регистрации писем из Outlook
Добрейшего и бодрейшего! Подскажите пожалуйста по скрипту для Outlook, чтобы при получении нового письма данные сообщения записывались в таблицу access и вложения сохранялись в отдельную папку, на...

Варьировать вывод содержимого тэгов
Здравствуйте! Хотелось бы получить ответ хотя бы на 1 из вопросов: как получить содержимое тэгов "p" в 1. обратном порядке, (приоритет 1) 2. исключив 1 или более из них,...

Как макросом вынести содержимое из рамок
Здравствуйте. Помогите решить проблему в VBA. В документе MS Word - находится множество рамок, в которых есть различное содержимое (либо текст, либо рисунки ) Эти рамочные элементы - VBA...

Формула не видит минимальное значение в диапазоне
Здравствуйте, почему формула не видит минимальное значение в диапазоне? =ЕСЛИ(AS:AS=СЕГОДНЯ();"нет";(МИН(AT4:AT77777))) "Размещение заданий в виде картинок запрещено" Картинка -для...

Модификация кода в целях уменьшения тайминга процедуры
В настоящее время тайминг измеряемой части процедуры примерно 10 сек., как можно уменьшить это значение путем модификации кода? Option Explicit Option Compare Text Public PapkaSkanov, lf As...

Как управлять именами кнопок
Здравствуйте. Создаю массу кнопок-модулей на странице Есть ли возможность сортировать кнопки по номеру, по алфавиту? Мне нужно это в процессе работы программы что бы я по желанию мог менять...

Как удалить все гиперссылки из ячейки таблицы ворда?
Здравствуйте ! Как удалить все гиперссылки из ячейки таблицы ворда ? Добавлено через 25 минут Все, разобрался

При добавлении анимации через VBA и привязке к ней звука - меняется тип триггера и обратно не возвращается
Программно создаются шейпы. Они анимируются, и если звук не привязывать то trigger:=msoAnimTriggerWithPrevious отрабатывает нормально Но если по дороге встречается...

AutoCAD *.dst в XML
Здравствуйте! В соседней ветке дан код на VB.NET Возможно ли выполнение аналогичных действий из VBA Excel?

Вывести названия подпапок в первую пустую ячейку указанного столбца
1. Как вывести названия подпапок в первую пустую ячейку столбца С, изменив код в процедуре: Option Compare Text Sub ЗагрузкаСпискаПодпапок() On Error Resume Next L =...

Сохранение книги открытой в экземпляре приложения Excel и изменённой в фоне
Здравствуйте, при закрытии с сохранением книги получаю «Subscript Out of Range «9» (Выход индекса за пределы диапазона). Как сие можно исправить? Dim objApp As Excel.Application Sub...

Как реализовать граф-матрицу (двумерный массив) по координатам отрезков?
Товарищи, подскажите алгоритм или логику, чтобы граф из прилагаемой картинки представить в виде матрицы или двумерного массива, где по вертикали и по горизонтали отложены номера (а не координаты!)...

Метод Workbook.Close не принимает параметры
Здравствуйте! Не могу прописать в своём скрипте никаких необязательных параметров никакому методу, тут же начинает ругаться из разряда: Непредвиденная лексема "False" в выражении или операторе. ...

Поиск аббревиатур модернизация кода
Здравствуйте, в теме https://www.cyberforum.ru/vba/thread2141982.html был приведен код Казанского по поиску заглавных букв в документе при помощи коллекции. Но одним шаблоном поиска всё не найдется,...

Фото по кнопке из формы Access
Добрый день! Очень нужна помощь! Задача: 1. Необходимо из формы Access по нажатию кнопки сделать фото товара внешней камерой 2. Сохранить файл в указанную папку под именем артикула текущего...

Программирование в excel:Цвет ячейки должен меняться (при отсутствии галочки цвет, а при её наличии без заливки)
Коллеги, всем доброго времени суток! Помогите обычному чайнику с Excel. Мне нужен код. Задача такова: -есть база данных, в которой нужно ставить галочку во флажке, когда процесс закончил ту...

Копирование определенных ячеек из строки на другой лист по условию
Добрый день! Как из общей сводной таблицы перенести на другой лист все данные по условию "Исполнители"? Нужно чтобы ячейки с данными по исполнителю автоматически копировались на другой лист с...

Автоподбор ширины столбцов на основании содержимого не объединённых ячеек
Sorry, Тема закрыта, решение найдено

Полилинии в html
Доброй ночи! Задали вот такой вопрос: ====== Есть документ с морфемным разбором слов в MS Word. Приставку, корень, суффикс, окончание и основу расставляли при помощи макроса. Сейчас стоит...

Кнопка в новой строке Excel
Добрый день! Есть таблица, где в конце каждой строки есть кнопка с макросом (при нажатии происходит некий анализ строки, в которой находится эта кнопка и данные обработки добавляются на другой лист)....

Обратиться к картинке внутри Shape
Здравствуйте! Пишу макрос обработки картинок в Word - нужно массово менять яркость/контрастность перед их печатью. С обычными вставленными в текст картинками проблем нет - циклами прохожусь через...

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

Word таблица в одну страницу
Здравствуйте ! Можно ли вместить Word таблицу в одну страницу ?

Как обратиться к открытой книге Excel из книги Word
Уважаемые форумяне! как обратиться к открытой книге Эксель из Ворда? в нете только методы, как это сделать в одном и том же приложении, нашла макрос, как обратиться к файлу из другого приложения и...

Создание листов по шаблону если данные одинаковые в стобце
помогите решить проблему с макросом-нужно автоматизировать заполнение бланка шаблона лист template из данных с листа import. Он почти работает, но не заполняет строки ниже если данные в столбце C...

Как узнать номер страницы, на которой находится таблица Word'a
Здравствуйте ! Чтобы узнать номер страницы, на которой находится таблица Word'a, использовал .Selection.Information(wdActiveEndAjustedPageNumber) Однако в 21 офисе всегда получаю -1. Может...

Высота строки таблицы
Здравствуйте ! oTb.Rows(1).Height возвращает 9999999.00 Это что ?

Добавить новый аргумент в поле со списком ActiveX, чтобы он появился в источнике
Здравствуйте уважаемые спецы форумчане! Помогите советом (или делом)! Вторую неделю прыгаю по сайтам, пытаясь найти ответ, как сделать поле со списком ActiveX с двусторонней связью с...

Поменять значение ячейки и примечания к ней местами в excel?
Приветствую! Дана таблица с цифровыми значениями, количество строк и столбцов всегда одинаковое. В ячейках таблицы находятся цифры отчета. В примечаниях к каждой цифре написаны пояснения к...

Сумма элементов двух массивов
Вроде всё просто! Сумма каждого элемента массива kol() и массива pryn(), но почему то выдают ошибку несоответствие типов (ошибка 13) Не понимаю в чем ошибка. Sub Pryniy() Dim i As Integer Dim...

Проход макроса по нескольким файлам
есть макрос для автоматического добавления заголовков и гиперссылок из ключевого слова в заголовке, нужно чтобы прошелся по всем докам в папке "D:\роман\папка\папка2". Имена нужных файлов...

Галочки в окне макроса
Есть макрос который вызывает окно, в которое ввожу текст для удаления найденного слова (слов) во всем документе, хотелось бы добавить туда галочку для поиска с подстановочными или без. Если это...

Как удалить проект VBA
Доброго времени суток! Подскажите как удалить проект VBA?

Как вернуть и присвоить коллекцию из функции
добрый день, никак не могу понять, почему у меня коллекция возвращается из функции, но не присваивается в процедуре. помогите, пожалуйста. функция sheets_name_list возвращает список уникальных...

Слияние из БД и генерация отдельных PDF
Исходные данные: База данных 300 строк в Excel с ИНН, E-mail, ФИО, социнформация и время приема в госпиталь. В Word делается слияние. Получается 300 листов и на каждом своя информация. Как...

Составить программу для вычисления значения функции у=-e^x+u+v, где х изменяется от 0 с шагом h
Составить программу для вычисления значения функции у=-e^x+u+v, где х изменяется от 0 с шагом h. Цикл заканчивается при первом отрицательном значении у. Функции u, v, h приведениы ниже u ...

Как удалить имена диапазонов
Когда-то пытался работать с именованными диапазонами. Сейчас это мне вылезло боком. Как удалить имена диапазонов, разименовать диапазоны, избавиться от этой дряни? Пробовал вот такое (спасибо...

Access + inDesign
Доброго времени суток! Есть проблемка! Нужно запустить скрипт в InDesign из Access. Метод DoScript не работает. Очень нужна помощь!!!

ВПР, ГПР функции
Здравствуйте! Помогите пожалуйста! Есть задача из сводной таблицы выводить список на другую таблицу. Весь мозг уже сломала:cry: Есть примерное представление как сделать, это Попытка 5 во...

Почему программа не работает в vba
Sub num_14() Sheets("Лист1").Cells.Clear Dim i As Integer, j As Integer Dim a(10) As Integer Worksheets("Лист1").Cells(1, 1) = "Исходный массив" For i = 1 To 9 a(i) = InputBox("введите...

Частный случай сохранения значения переменной после цикла
Всех причастных - с Новым годом! Здравствуйте. Требуется помощь зала, не могу сохранить значение переменной Результат1 для вывода в MsgBox в рамках процедуры. При Public - Error 424 Object...

После выполнения макроса не открывается файл
Здравствуйте! После выполнения макроса не открывается вторая книга. Код заполнения ячеек на двух листах во второй книге в фоновом режиме из ComboBox на форме активной: Option Explicit Dim wb...

Пограмма на языке VBA для нахождения среднего арифметического
Здравствуйте, препод сказал мне переписать данный код, но чтобы он брал значения из ячеек Эксель, а не через массивы(Я не нашёл в редакторе VBA и выбрал VB, пожалуйста, не ругайте!!): Sub Lab7() ...

Форматирование Даты
Здравствуйте, после вставки текущей даты Cells(ActiveCell.Row, 37).Value = Format(Now, "dd.mm.yyyy") имею такой результат: А нужен такой: Как можно изменить формат?

Заполнение ячеек в другой книге в фоновом режиме из ComboBox этой книги
Прошу помочь скрестить два кода в целях заполнения ячеек в другой книге в фоновом режиме: первый: Sub РаботаВФоновомРежиме() ' Открытие книги в фоновом режиме (Visible = False) Dim wb As...

Последняя строка таблицы на странице
Здравствуйте ! Word-таблица на несколько страниц. Можно ли узнать номер строки таблицы в конце каждой страницы ?

Строка таблицы на 2-х страницах
Здравствуйте ! Несмотря на то, что для каждой строки Word-таблицы указываю AllowBreakAcrossPages=False, иногда попадаются строки разбитые страницы. В Инете предлагается способ определения таких...

Удаление элемента списка из listBox
Написал такую строчку Me.ListBox21.RemoveItem(Me.ListBox21.ListIndex, 0) не работает. Где я ошибся? мануалы вроде так указывают делать Добавлено через 4 минуты ListBox имеет несколько столбцов...

Редактирование сводной таблицы
Подскажите, как исправить код, чтобы результат был как слева на фото. Когда добавляю количество данных «Место события» он выводит общее количество без самого столбца «Место события». На языке VBA

Как мне раскрывать все листы при открытии любой книги excel?
Нужно чтобы при открытии любой книги excel у меня раскрывались листы снизу, а точнее ползунок этот уменьшался. Нашел такой код и он рабочий, но как я понимаю не в надстройке... я создал надстройку и...

Сумма по критериям
помогите с макросом. суть проблемы: есть строки с данными, в колонке оформление через формулу "ЕСЛИ" проставляются единицы. формула работает от колонки со стоимостями, однако необходимо выводить...

DataGridView для массивов COM SafeArray
Мое почтение, джентльмены. Хочу представить вашему вниманию подпиленный ListViev для массивов COM SafeArray (VT_ARRAY | VT_VARIANT). См. Видео Умеет: +Показывать данные из массива в форме с...

Синтаксичекая ошибка в макросе под Win-7
Макрос нормально отрабатывает под Win-10. А под win-7 выдаёт ошибку. В чём может быть дело, и как исправить? Просто убрать PtrSafe? В win-10 Word-2016, в win-7, по моему Word-2007

Выполнить код VBA из поля на форме
Всем привет, стала интересна возможность такого действия) На форме есть Поле1 и в него пишу DMax("Путь", "БазаТек") Как сделать чтобы при вызове Msgbox me.Поле1 получить результат от...

Поиск по части слова
Здравствуйте, в vba не давно и появляются проблемы. Подскажите как сделать так, чтобы при вводе части названия в textbox (не обязательно начало названия) проводился поиск нужного значения с выводом в...

Загрузка из excel скрипта на sql server
Есть макрос который делает следующее : 1. Соединяется с БД SQL Server 2. Кидает на сервер скрипт, который делает следующее: -создает пустую таблицу -в эту пустую таблицу с помощью BULK INSERT...

Почему программа работает неправильно в VBA?
Даны два одномерных массива одинаковой размерности. Написать программу получения третьего массива такой же размерности, каждый элемент которого равен сумме соответствующих элементов данных массивов....

Перенести данные из БД в EXCEL
Всем привет! Может кто подсказать в чем ошибка? Нужно перенести данные из таблицы БД в таблицу EXCEL. Макрос получает данные из БД при помощи хранимой процедуры. Полученный ответ преобразую в...

Подкорректировать код VBA
Доброго дня! Нужно чтобы наименование файла было из первой колонки, но чтобы она не попадала в слияние, что тут поменять? Спасибо. Option Explicit Private FSO, arrUsedRange, xFiles, sFiles,...

Отображать результат в строке состояния
здравствуйте, давно не юзал этот код: Sub MultiplyStringBySeven() Dim originalText As String Dim resultText As String Dim i As Integer Dim endTime As Date originalText =...

Перебор данных EXCEL, перенос данных по признаку на другой лист
Добрый день. Получил задание, подскажите кто может, необходимость перебрать excel таблицу. 1. Перебирать нужно по столбцу "Остаток А" если число >= 0 нужно эту строку перенести на новый лист и...

Значение из одного ComboBox инсталировать в две ячейки на разных листах
Здравствуйте, Как оптимизировать код заполнения двух ячеек на разных листах значением из одного ComboBox? Получилось сделать лишь при помощи двух.. Private Sub ComboBox2_Change() End Sub ...

Запуск макроса по гиперссылке в новом листе
Есть макрос, который формирует выписку по счету на отдельном листе Excel. Нужно сделать так, чтобы все счета в сформированной выписке были гиперссылками и при нажатии на любой счет формировалась...

Вывод данных ленточной формы через поиск ComboBox
Добрый день всем!!!! Помогите разобраться с проблемой: Имеется ленточная форма, источником данных, который является запрос на объединение для того, чтобы на форме отображалась группировка по...

Призакрытии книги форма не держит заданную паузу
Впервые столкнулся с тем, что задержка показа формы в 5 сек Private Sub UserForm_Activate() Application.OnTime Now + TimeValue("00:00:05"), "KillTheForm_2" End Sub работает из формы, но не работает...

Настройка MsgBoxAutoClose на условие
Как сделать, чтобы MsgBox, автоматически закрываемый по истечении указанного времени, ОТКРЫВАЛСЯ только при условии что искомое не найдено? Был рабочий вариант MsgBox Sub ПоискЯчейкиПоУсловию()...

Программа работает неправильно в VBA
Дан массив А из 10 целых чисел. Написать программу подсчета суммы элементов, расположенных между максимальным и минимальным элементами. Sub zad_12() Sheets("Лист2").Cells.Clear Dim A(10) As...

Почему не корректно отображается список

Функция СЧЕТЕСЛИМН в сводной таблице
Есть сводная таблица, формирующаяся макросом. Возможно ли прописать условие для 3 столбца так, чтобы он считал как второй с дополнительным условием (Условие: "Вид события" должен соответствовать "INC...

Макрос расчета производительности
Здравствуйте, Возникла проблема в коде расчета производительности. Подробности во вложении.

Ворд 2007 проблема с радиокнопками
здравствуйте часть моего кода: Option Explicit Dim IgnoreEvents As Boolean Private Sub UserForm_Initialize() Dim paragraphs() As String Dim paragraphCount As Long Dim i As Long ...

Как взаимодействовать с окном "сохранение" в процессе выполнения скрипта?
Добрый вечер! Дополняю макрос VBA в excel, который автоматически выгружает информацию по заданным параметрам в SAP и вот как только мы просим SAP что-то там выдать и экспортируем данные в формате...

Как VBA закомментировать сразу несколько строк?
как VBA закомментировать сразу несколько строк, чтоб каждую не начинать ковычками?

Как получить путь к файлу и имя этого файла в переменные
Добрый день, Задача проста, есть решение, но оно не изящное, хотелось бы оптимизировать код. Все делается в VBA Excel 2010. Необходимо выбирая случайный фаил получать полный путь к этому файлу,...

Сохранение листа в из книги как отдельный файл.xls
Процедура по нажатию кнопки-сохранить к примеру лист3 из текущей книги как отдельный файл.xls с названием текущей даты в отдельную папку. А также если файл с таким названием уже существует, тогда...

Макросы вставки строки сверху/снизу...
Здравствуйте! Прошу вас помочь, сам я точно не справлюсь!! В таблице, скажем, из 4-х столбцов (A,B,C,D) необходимо добавить строку сверху. При этом по столбцу A происходит автоматическая...

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

Закрасить ячейки определенным цветом в зависимости от содержимого
Здравствуйте. Я не могу разобраться в создании программы. Мне нужно в определённом диапазоне: ячейки с текстовым символами - залить красным цветом, ячейки с цифрами - жёлтым цвет, а пустые...

Вставка текста из Excel в Word
Здравствуйте, ув. форумчане. Помогите начинающему. У меня есть экселевский файл с реквизитами клиентов. могу ли я сделать, чтобы по нажатию какой-нибудь кнопки(или по запуску макроса) создавался...

Проверка ячейки на содержание слова
Подскажите, как написать в vba, проверку ячейки на содержание слова? Например в ячейке cells(1,1), предложение: Форум программистов. Надо проверить на содержание слова 'форум' Мне нужно что-то...

Сортировка массива по возрастанию и убыванию
В ячейках H1:H10 записаны числа. Написать программу сортировки этого массива по возрастанию

Вернуть адрес ячейки на Excel VBA
Как вернуть адрес выделенной ячейки? Dim name As String Worksheets("input").Activate name = ActiveCell.Value необходимо получить номер строки и столбца, выделенной пользователем ячейки....

Вытянуть данные из закрытых книг в Excel
Следующая ситуация: В ячейке А1 активной книги прописан полный путь к *.xls файлу, в ячейке А2 - к другому файлу и так далее в столбце А. Каждый из этих файлов имеет одинаковую структуру и из...

Подскажите оператор "не равно"
Здравствуйте уважаемые участники форума! Я новичок здесь, у меня есть одна задача примитивная состоящая из двух кнопок про треугольник, первая кнопка работает и все нормально, a вторая почему то не...

Вызов UserForm
В общем, у меня есть форма, мне нужно, чтобы она вызывалась, не заходя непосредственно в VBA, кнопку вынести или сочетание клавиш назначить, можно так сделать? :)

Удаление макроса из персональной книги макросов
Кто может подсказать, как правильно удалить макрос? Я сохранил макрос в Личную книгу макросов. Когда пытаюсь удалить созданный макрос появляется сообщение: "Изменить макрос в скрытой книге...

Экспорт таблиц из access в excel и наоборот
Как импортировать таблицу excel в access и наоборот в vba?

Преобразовать текст в число
Добрый день! помогите решить проблемку. Есть таблица exel в одной из колонок находятся числовые данные в текстовом формате. Какможно средствами VBA преобразовать текст в числовые данные?

Как узнать номер строки для активной ячейки?
Как узнать номер строки для активной ячейки? спасибо

Как соединить две строки в одну
Суть такова - есть 2е переменные, нужно склеить их в одну. Например Per1 = "Hello " Per2 = "World!" Нужно получить третью переменную "Hello World!"

Получение значения переменной из ячейки
Sub Макрос1() ' ' Макрос1 Макрос ' ' m = Cells(1, 1) ' получение значения ячейки из A1 (может я я тут что то не так сделал?) If m = 1 Then Range("H13:L13").Select

Запуск макроса из другого макроса
Как в Word запустить из одного макроса другой? RunMacro куда засунуть?

Ошибка "run-time error '424' object required"
в следующем коде в строке 4 (открытие файла с расширением doc) выскакивает ошибка "run-time error '424' object required" Dim wdApp As Object Dim wdDoc As Object Set wdApp =...

Создание папок с именами ячеек Excel
Простите если пишу не в этот раздел. Помогите пожалуйсто... В програмировании полный ноль... Суть такова: есть таблица Excel, в одной колонке перечесляются данные, около 6000 ячеек, необходимо...

Как получить имя листа в Excel
Нужно получить имя первого листа в книге (всего в книге предполагается 2 листа) и записать его в строковую переменную.

Плавающая ошибка - runtime error 13 - type mismatch
В приложении файл с таблицей эксель и макросом. Для работы макроса - выделите ячейки ((1,3):(23,5)) выдает ошщибку, причем раз через раз, до некоторых пор с этим куском все работало отменно. Что...

Удаление символов из строки
приведите пожалуйста пример.

Определить, есть ли лист в книге с заданным именем
Нужно программно спросить есть ли лист в книге Excel с таким именем

Как в макросах отключить предупреждения Excel?
Как в макросах отключить предупреждения Excel. В часности предупреждение при удалении листов из книги.

Создать папку
Не знаю возможно ли это вообще, если возможно то хелп. Короче есть у меня задумка как можно автоматизировать немного свою работу, но найти ответ пока не удальсь. Суть вопроса такова, каждый месяц...

Выделить диапазон заполненных ячеек
Добрый день. помогите пожалуйста сообразить: как мне выделить диапазон заполненных ячеек в колонке 1: определяет первую заполненную ячейку: ActiveSheet.Columns(1).Find("*", , xlFormulas,...

Как указать адрес ячейки через переменную
Нужно в ("C5:C116") вместо С116 вставить переменну i, которая обозначает ячейку. Подскажите пожалуйста как это реализовать?

Сохранить файл Excel с именем, содержащимся в ячейке
Есть - EXCEL-овский файл, в некой ячейке (например A1:A1 первого листа) содержится (или формируется) некое имя (типа простой текст, например, название и т.д.). Надо, чтобы по нажатию простой кнопочки...

Последний столбец и последняя строка на листе
Конструкция ниже определяет на текущем листе последнюю строку, заполненную данными lastRow = Cells(Rows.Count, "B").End(xlUp).Row Как таким же образом определить последний столбец с данными на...

Копирование строки из одной книги в другую
Необходимо скопировать строку под номером 10 с активного листа активной книги, открыть книгу например С:\test.xls (с одним листом) и вставить скопированные данные в 5 строку. Помогите пожалуйста....

Группировка строк в Excel (макрос)
Помогите, пожалуйста, я так устала вручную группировать строки. Как написать макрос, чтобы в таблице EXCEL строки автоматом группировались по одинаковым названиям в первом столбце. Т.е. сбоку слева...

Макрос поиска и вывода строк, содержащих значение поиска
Здравствуйте! Есть макрос для поиска значения из ячейки А1 по всему листу и копированием строк из всех листов, содержащих это значение. Но есть и проблема: макрос поиска ищет только цифровые...

Run-time error 1004
На предприятий используется Екселевский фаил! привязан к базе Беста! И при формирований документов выводит Run-time error"1004" Общая ошибка "ODBC" Я так понимаю это проблемма связанна не с...

Как в макросе перейти на другой лист книги Excel
Мне нужно взять данные с одного листа и скопировать их в ячейки другого листа и далее работать со вторым листом. Какой командой можно поменять лист? Помогите.

Как очистить буфер обмена?
вот собственно и весь вопрос Заранее спасибо

Error 9: Subscript out of range
Господа, всем добрый день мне нужно исправить ошибку в программе для Microsoft Excel 2003 После ввода данных в форму, вылезает Error 9. Вот кусок кода с ошибкой Может кто-нибудь помочь с...

Как добавить файл Excel в виде значка в презентацию PowerPoint
Добрый день! Подскажите, возможно ли с помощью кода добавить файл EXCEL в виде значка в презентацию PowerPoint? Много форумов просматривал, но нигде не нашел. Если это невозможно, то как сделать...

Присвоение переменной имени книги и листа
Есть файл (Расчет.xls). В нем 3 листа(Лист1, Лист2, Лист3). Как при открытии файла присвоить переменной (F) имя файла и имя нужного листа для использования в range(F.cells(....))

Выдает ошибку Run-time error 1004
Sub Макрос5() ' Dim Sht As Worksheet Dim a As Long, b As Long, c As Long, i As Long Set Sht = ThisWorkbook.Worksheets("1") ...

Как в MS Excel сделать выпадающий календарь при выборе ячейки мышкой
Всем привет! Как в MS Excel сделать выпадающий календарь при выборе ячейки мышкой?

Как сделать выравнивание текста в ячейке
Мпа, добрый вечер!:D Скажите, пожалуйста, как сделать выравнивание текста в ячейке средствами VBA? Какое свойство за это отвечает? Заранее спасибо за ответ!

Ошибка application-defined or object-defined error
При выполнении кода Range("DateAdd").Select Selection.Resize(Selection.Rows.Count, _ Selection.Columns.Count - 1).Select выскакивает ошибка-run-time error '1004':...

Добавление выпадающего списка к ячейке
Всем, привет! Ситуация: программно создается несколько книг. Необходимо что бы в ячйках A1, A2,A3 созданных книг появлялся выпадающий список известных значений(значения текстовые). Помогите с...

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

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

Как использовать ReDim Preserve для двумерного массива
Создали, например, mArr(n, 4). При определенном условии в ячейке первого столбца, нужно загнать в этот массив еще несколько значений из той же строки. mcounter=0 For i=1 to endRow ' ...

Удаление лишних пробелов
В заданной строке удалить все лишние пробелы. Прошу помощи.

Выделение фрагмента текста в Word, заключенного между заданными словами
Добрый день! Помогите, пожалуйста с кодом макроса! Дан файл с текстом: ............. ...Олег.... ............. ...Иван.... .............

Поставить кавычки (" ")
Всем добрый день! Коллеги подскажите пожалуйста как можно в ячейку с помощью VBA поставить кавычки (вот такой знак - ")? Я только нашёл способ сделать это с помощью функции Chr(34). Код выглядит...

Выход из цикла на месте выполнения условия
Private Sub CommandButton3_Click() 'Решения уравнения в форме Dim X1 As Double Dim X2 As Double Dim X3 As Double Dim E As Double X1 = Val(TextBox3.Text) 'Начало интервала X2 =...

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

Задать диапазон ячеек через переменные
Привет! такой вопрос: мне надо задать диапазон ячеек. обычным способом типа Range("A1:A100") - неактуально, поскольку какое А100 у меня - неизвестно т.е. А100 - плавает. Мне нужно чтобы это...

Вывод массива на экран
Привет. Извините за глупый вопрос, но подскажите пожалуйста, как в MsgBox вывести двумерный массив, размерность которого задается в программе, чтоб он весь был в этом окне? т.е. например массив 3x3...

Макрос - имя листа по имени ячейки
Господа, помогите нубу:) Вот в чем вопрос: 1. Нужно что бы имя листа менялось по имени ячейки. я находил подобный макрос, но...имя листа почему то менялось только один раз и потом на изменение...

Поиск слов в документе средствами Word
Есть какая нибудь функция реализующая алгоритм стандартного поиска Word`а ? Просто перебор коллекции Words явно медленнее...

Самый быстрый метод поиска в массиве
Пишу в Excel макрос. По условию имею массив около 1 000 000 записей, каждая запись представляет из себя строку: формата - , это пример. В первых двух вертикальных линиях ||,в строках массива...

Перебор ячеек в столбце exel
Добрый день, Товарищи! Не совсем понимаю еще exel. Задача, перебрать все строки (ячейки) в одном столбце и выполнить условие. Вот условие, если в чейке сегодня, то закрасить всю строку красным....

Передача значения ячейки в переменную.
Доброго дня. Ворос такой: есть файл .xls, надо брать значение из диапозона ячеек, и сравнивать их с другим файлом. как можно это сделать в цикле???

Динамические массивы
застряла в решении задач на динамические массивы, поскольку всю жизнь решала задачи на паскале, а там данных возможностей нет, поэтому суть работы не могу понять. необходимо: а) создать событийную...

Очистка данных в ячейках
Подскажите пожалуйста как можно очистить ячейки данных в VBA?

Создание документа Word из Excel
Доброго времени суток. есть макрос в excele надо создать документ ворд заполнить его по шаблону некоторыми текстовыми данными после чего создать таблицу и заполнить её данными из таблицы excel ...

Макрос для копирования информации с одного листа на другой по определенным условиям
Доброго времени суток, Гуру excel!!! Помогите написать макрос который будет копировать нужные данные по определенным условиям с одного листа и вставлять на другой, если конечно это возможно... ...

Вывод данных в ячейки Excel
Подскажите пожалуйста, как сделать так, чтобы при нажатии кнопки результат, результат выводился в определенную ячейку?

Как устранить ошибку: "user-defined type not defined"?
user-defined type not defined - эта ошибка возникает тогда из Excel должен создаться документ отчета у Word, а при запуске на исполнение на первой строчке нижнего примера возникает ошибка. Вот...

Как можно узнать backcolor (цвет заливки) для активной ячейки
ActiveCell.BackColor - так не работает, а еще как можно?

Макрос копирования по условию
Добрый день форумчане, нужен макрос для копирования строк с определенным значением в столбце с основного листа на лист2; второй макрос - для копирования с этого же листа на лист3 если значения...

Сравнение двух столбцов листа и выведение совпавших данных
Доброго времени суток. Возникла такая потребность: имеется лист со столбцами A и B. В столбце A находятся данные, которые нужно сравнить с имеющимися в столбце B. Сравнивать ячейку нужно со всем...

Выделить ячейки с B4 и до последней заполненной
Я Вас уже, наверное, достал, но мне нужна Ваша помощь. В общем мне нужно в макросе прописать выделение диапазона ячеек, начиная с B4 и кончая последней заполненной. Напишите, пожалуйста, как...

Функция Find - принцип поиска
Добрый день, уважаемые форумчане! В очередной раз обращаюсь к Вам за помощью. Имеется следующий код: dim kodG as single kodG = Cells(Selection.Rows.Row, 7) 'Запоминаем код графика...

Макрос: копирование данных из одного файла в другой
Здравствуйте! Хочу сделать макрос на копирование данных (в определенном диапазоне ячеек) из файла "шаблона". К примеру я открываю какой нибудь файл (имена файлов могут быть различны), запускаю...

Закрыть книгу без сохранения
По данному коду закрывается файл Private Sub CommandButton10_Click() ThisWorkbook.Close (False) 'без сохранения изменений End SubА как закрыть книгу без сохранения?

Макрос не работает в 64bit
Здравствуйте, макросы были написаны на 32-разрядной системе. заменили компы на вин 8 64бит. Столкнулся с проблемой "the code in tthis project must be updated for use on 64-bit systems. please...

Как ввести в VBA arcsin, arccos
или arctg Подскажите, пожалуйста. Заранее спасибо

Ошибка выполнения макроса Runtime Error 9: Subscript Out of Range
Здравствуйте, у меня есть написанный макрос для Exel 2003 на нескольких компах работает , а на нескольких компах выдает ошибку Runtime Error 9: Subscript Out of Range причем систем и офис...

Спойлер в Ворде
Здравствуйте, не подскажите как создать?

Преобразовать текст в дату
Привет всем ! В файле excel есть дата, записанная как текст, которую необходимо преобразовать в дату, которую понимает excel для последующих вычислений. Не понятно как лучше сделать с помощью...

Определить количество дней для определенного месяца и определенного года
Составить программу, которая по заданным году и номеру месяца m определяет количество дней в этом месяце.

Копирование-вставка (буфер обмена)
Народ не ругайтесь слишком сильно, есть код на VBA TextBox1.SelStart = 0 TextBox1.SelLength = TextBox1.TextLength TextBox1.Copy из которого ясно что данные текстового поля копируются...

Пропал MS DTPicker
Доброго времени суток! У меня Win XP, Office 2003. Начал в Word'е делать пользовательскую форму. Вставил в форму DTPicker. После переустановки системы и офиса при открытии формы в VBA ругается, что...

Как прервать работу зацикленного макроса, если CTRL/Break не "того"?
Привет. Макрос (видимо) зациклился и колбасит уже час вместо положеных 10 минут. Ни на что не реагирует, собственно. Хотя параллельно могу открывать другие книги ексель для работы. Я так понимаю,...

Рисунок на задний план в Excel
Здрасти У меня есть рисунок (Овал)прозрачный, необходимо поместить овал на задний план т.е. за текстом на листе при этом при клике как обычно (без рисунка)выделяется ячейка. Заранее благодарен...

ComboBox: добавить значения для выбора
Как в ComboBox добавить стандартные значения, которые потом можно будет выбирать?

Эмуляция кликов мыши
Ребята, помогите написать простой макрос в VBA, встроенном в экселе. Необходимо следующее: при запуске макроса (Макрос1 пускай будет называться) надо чтобы мышь кликнула на экране в точке с...

Обьединение нескольких листов данных в один макросом
Здравствуйте, подскажите пожалуйста. У меня есть 30 листов с данными Мне нужно объединить их в один лист. Как мне записать макрос? Я копирую данные из первого листа выделяю до последней ячейки с...

Как остановить выполнение макроса в самом макросе?
Подскажите, пожалуйста, можно ли остановить выполнение макроса в самом макросе.. имею ввиду аналогию команд типа halt, exit... Есть вариант End Sub, но он не подходит - процедура вызывается из...

Как разделить строку из ячеек в массив?
Всем привет, друзья! Кто знает, подскажите что не так делаю: Задача Поместить в массив значения разделенные пробелом из InputBox . Мое кривое решение Копирую значения трех ячеек из...

Как через макрос добавить столбец?
Как через макрос добавить столбец? В объемной таблице я ищу нужный столбец. If DialogSheets('d1').Show = No Then GoTo M10 Worksheets('1').Activate Range('A2:BA2').Select ...

Как скопировать только цвет ячеек? Без формата
Есть столбец с разноцветными ячейками, содержащими текст. Справа от него столбец с цифрами. Еще правее столбец с процентами. Нужно, чтобы второй и третий столбцы были раскрашены так же как...

Посчитать сколько символов содержится в строке
дана строка символов.посчитать сколько символов содержится в ней. Private Sub CommandButton1_Click() Dim stroka As Variant, k As Integer, char As Variant 'объявляем переменные stroka = ? k = 0 ...

Can't find project or library, Excell файл открыть не могу
Здравствуйте, у меня есть файл ексель с макросами, раньше все работало нормально, сейчас открываю и выдает ошибку "Microsoft Visual Basic for Applications" "Сan't find project or library", далее...

Закрытие активной формы
И еще один вопросик небольшой ))) Скажите, пожалуйста, какой функцией VBA закрывается формочка ? Хотелось бы прописать, мол, если пользователь закрывает активную форму(которая до этого высветилась...

Вычисление суммы по диапазону в VBA
Есть ли в Vba функция суммы по диапазону.Диапазон вычисляется в программе.На листе функцию задать не могу т.к. таблица создается программно изначально размер неизвестен.

Как использовать оператор GoTo
Спасибо

Свойство .Range для умной таблицы. Обращение по названию столбца
Добрый день. На листе имеется умная таблица с заголовками. При работе с ней макросами, я обращаюсь к ней так: WTName = "UT" Set WS = ThisWorkbook.Worksheets("Лист1") Set WT =...

Макрос для вставки макроса в Excel
Собственно, вопрос в названии. Можно ли написать макрос, который будет добавлять другой макрос в другой файл?

Подсчет непустых ячеек в столбце
Всем доброго времени суток! Подскажите, кто знает: необходима простая функция для подсчета непустых ячеек в указанном столбце (либо диапазоне). Т.е аналог екселевской ПРОМЕЖУТОЧНЫЕ.ИТОГИ (СЧЗ) Для...

Поиск макросом дубликатов в таблице excel
Регистрация: 19.01.2009 Сообщения: 2 Репутация:10 поиск макросом дубликатов в таблице эксель Приветствую появилась необходимость поиска повторяющихся улиц с номерами домов в таблице эксель с...

Макросы вставки строки снизу в таблице Excel
Здравствуйте! Прошу вас помочь, сам я точно не справлюсь!! В таблице, скажем, из 4-х столбцов (A,B,C,D) необходимо добавить строку снизу. При этом по столбцу A происходит автоматическая...

Удаление строк в Excel на VBA.
Прошу помощи у специалистов. Есть массив (2 столбца) на одном листе. Со временем в одном столбце некоторые ячейки оказываются пустыми. Надо удалить (НЕ очистить) те строки, к которым принадлежат эти...

Почему вдруг начали появляться сообщения "ByRef argument type mismatch"?
Работал достаточно долго с программой. Проверял элементы по отдельности. Делаю сборку программы - и вдруг на все переменные стали появляться такие сообщения. В чем может быть причина?

Русская кодировка в Excel
Привет! Ребят, нужна ваша помощь. Написал один макрос на VBA. Протестировал его в Excel 2013 на двух компьютерах все работает корректно. На домашнем компьютере стоит русский Windows 8.1, на рабочем...

Взятие данных из PDF
Взятие данных из PDF-файла с помощью VBA. Возможно ли это? Если возможно, то, наверное, понадобится какая-нибудь библиотека классов и соответственно справка по этой библиотеке нужна, чтобы...

Не удается открыть базу данных из-за ошибки чтения ее VBA-проекта
Ребят, подскажите, что делать. Уже перепробовала все способы решения проблемы, которые были в интернете. Если нажать отмена, то ничего не получается сделать. Если ок, то весь код VBA удаляется

Как получить список папок в заданной директории
Подскажите как получить список папок в заданной директории (при этом имена файлов в список попадать не должны)?

Слушать порт из Excel
Добрый день. У меня есть устройство с адресом 192.168.90.50, оно через порт 2001 передаёт данные по сети. Возможно ли как-то слушать эти данный через VBA Excel? Какие надо подключить компоненты или...

Найти количество четных чисел, содержащихся в диапазоне
Hello, world! Вот такую задачу перед нами, студентами, поставил товарищ преподаватель, НО попросил внести небольшие дизайнерские и соответственно головоломающие коррективы. Вот непосредственно...

Какое значение содержит value пустой ячейки?
Какое значение содержит поле value у пустой ячейки?

Перенос слов в ячейке Excel XP
Господа, каким образом можно задать программно из модуля перенос слов в определенной ячейке или диапазоне ячеек... HELP!!!

Ошибка "Can't find project or library" при открытии документа на других машинах
Здравствуйте уважаемые коллеги. Написал програмку :). Возника следующая проблема: она работает на компьютере на котором я её написал, а на двух других (с офисом 2003 и 2007) она работать...

Решение квадратного уравнения
Составьте программу на языке VBA для решения квадратного уравнения a *x^2 +b*x + =0 Программа должна проверять правильность исходных данных и в случае, когда коэффициент при второй степени...

Макрос для переноса данных в виде таблицы из Excel в Word
Добрый день, помогите пожалуйста довести до ума макрос , который бы экспортировал определенные данные из таблицы в виде таблицы Excel в Word. Критерием для выбора определенной строки из всего объема...

Получить список всех поддиректорий в указанном каталоге
Помогите создать список подпапок в текущей папке. Мой код не помогает Dim a a = Dir(CurDir, vbDirectory) MsgBox aКод следует не раскрашивать, а выделять тегом ( в нашем случае) Выдаёт в ответ...

Как побороть Code execution has been interrupted
Почитал другие форумы и не нашел ответа. Вот выдержка: " При выполнении вполне работоспособного кода выскакивает сообщение "Code execution has been interrupted". Строчка программы, на которой...

Как загружать в массив данные из Excel
:( Создал макрос в VISIO2010, но столкнулся с проблемой. Как загружать в массив данные из Excel. Есть ли такая возможность??????

Как узнать количество страниц при печати в Excel на VBA?
Убедительная просьба помоч!!! Как узнать количество страниц при печати в Excel?

Как работать в ListBox с несколькими столбцами
Есть ListBox с 4 столбцами (ColumnCount = 4) Есть 4 массива данных: элементу 1 первого массива соответствует элемент 1 второго, третьего и четвертого массивов. AddItem в ListBox нужно делать так,...

Поиск по столбцу
Всем привет! Тема уже избитая, но все равно я не нашел ответа на вопрос. На таблице есть два столбца. В первом данные, во втором вычисления(формулы). Нужно найти значение в столбце при помощи...

Как проверить наличие файла?
Нужно проверить есть ли файл по заданному пути ,например: "C:\Users\мвидио\Desktop\VBA\txt\123.txt" Нужно проверить не был ли удален этот файл пользователем!

Как проверить пуст ли массив?
это продолжение темы. интересует грамотность записи If Массив(0) = "" Then ' вот эта проверка мне кажется неграмотная Добавлено через 1 минуту Еще интересно: как его грамотно начать заполнять....

Скопировать несколько столбцов в один по порядку
Здравствуйте! Подскажите, пожалуйста, как сделать следующую вещь. Имеется произвольное число столбцов с произвольным количество строк. Необходимо, чтобы справа налево, все столбцы были сформированы в...

Ошибка при открытии файла - Ошибка в части содержимого в книге
Добрый день! Открываю файл. Создаю макросом сводную таблицу, сохраняю файл. Затем при попытке открыть данный файл появляется ошибка: “Ошибка в части содержимого в книге “Книга1.xlsx”. Выполнить...

Адаптация кода для 64 битных систем (x64)
всем, здравствуйте. помогите пожалуйста решить проблему. Есть книга с макросами, написанная для 32 битной платформы - там все работает ок. Сейчас у меня win7 x64 и Office 2010 x64 и возникла...

ошибка "Run-time error '91': Object variable or With block variable not set"
приветствую! имеется документ на нескольких листах, заполняется по дням соответственно на многих листах есть даты текущего периода, в начале каждого месяца документ создается заново, для того чтобы...

Макрос. Автозаполнение анкеты в Word. Нужна помощь
Делаю макрос для автоматического заполнения анкеты. Есть куча повторяющихся строк, например фамилия, имя, отчество и т.п. При выполнении макроса данные вставляются только в одном месте, т.е....

Возведение числа в степень
Ребята. Не математик я. Как возвести в степень число в VBA? Степень - целочисленная переменная. Возводим в степень двойку. Как, например возвести 2 в степень 8, не прибегая к For-циклу? Покопал...

Как узнать Item листа в книге Excel
есть большая книга (листов больше 1000) Не ругайте - так удобнее мне для своих целей Name листов меняются программно, а item - величина постоянная Мне нужно оперировать доступом к конкретному...

Копирование текста между документами Word
' "Пусть надо скопировать текст из текущего файла в новый документ, ' с начала первой страницы, до 11 (включительно)". Dim rng As Range, s1 As Range, s2 As Range Dim bm As Bookmarks Dim tmpDoc...

Как вставить CheckBox в ячейку Excel'я?
Вопрос такой. Надо составить опросник (анкету) в Excel. Варианты ответов я предполагаю помечать галочками (CheckBox). Как в ячейку Excel встроить CheckBox ? Не на форму, а именно в ячейку!

Макрос - добавить данные в конец таблицы
Друзья, нужна помощь. Существует ли макрос выполняющий следующую функцию: В столбце "А" имеется список слов(всегда разное значение), необходимо что бы при выполнении макроса в конец этого списка...

Макрос для автоматической нумерации строк
Подскажите, пожалуйста, как исправить макрос чтобы строки нумеровались автоматически на листе, а также при удалении строки нумерация также смещалась. Private Sub worksheet_change (byval target as...

Ошибка Run-time error 9: subscript out of range. В чем причина?
В VBA не очень шарю, но пришлось написать программу для выставления цен. Появляется ошибка, не могу понять, что не так. Задача: написать программу, которая берет число из ячейки F1, если оно...

Вывести число прописью
Добрый день. Прошу у вас помощи. Мне нужно создать макрос в ворде, чтобы когда пишешь число, например, 23, то рядом автоматически писалось это же число прописью в скобках. Помогите,пожалуйста. Кто...

Узнать статус фильтра на рабочем листе: включен или выключен
как в VBA узнать статус фильтра на рабочем листе: включен или выключен? Кнопка включения фильтрации в столбце реализована как переключатель. Мне нужно в любой момент узнать статус листа: включена на...

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

Календарь, который понравится всем (готовое решение)
Сегодня я решил выложить настоящий календарь. Который реализован только встроенными объектами и методами и на обычной форме UserForm и нужна для этого только одна форма, больше ничего стало...

Открыть диалог сохранения файла
Здравствуйте, господа программисты! Скажите, пожалуйста, как средствами VBA можно открыть меню на сохранение программно созданной книги документа (изображение "сохранение).jpg " в прикрепленном...

Копировать только значения
Добрый день. Пишу макрос и на данный момент столкнулся со следующей проблемой: есть готовый код,с помощью которого я собираю информацию со всех листов на отдельном листе и не знаю что следует...

Получение значений из ListBox в ячейку
Подскажите пожалуйста как мне получить значения из ListBox в ячейку, значений в ListBox может быть и 1 и 20. Заранеее благодарен.

Какое событие вызывает клик по крестику закрытия окна
Какое событие вызывает клик по крестику закрытия окна (правый верхний угол) ввода?

Цикл в обратном направлении
Можно ли в VBA сделать обратный цикл(что бы считал наоборот). На паскале он реализуется вот так. for k:=6 downto 1 do

Максимальное значение
Добрый день, даны два столбца дробных значений (А1:А47 и В1:В47), нужно, с помощью макроса, из столбца В найти максимальное значение, а затем найти в А соответствующее значение для В максимального и...

Управление ошибками в VBA. Операторы On Error, Resume, объект Err
Информация из интернета: Ошибки в VBA можно разделить: Возбуждение ошибки может быть сделано самой операционной системой (VBA) или исполняемой процедурой(почти все они классифицированы и...

Макрос копирования ячеек по условию в Excel
Здравствуйте господа программисты! Столкнулся с непосильной задачей. Знания в написании макросов на уровне новичка, да и то, в большей степени по примерам, так что прошу помощи. Буду благодарен за...

Пересчет формул только для 1 листа
Подскажите, пож. Ситуация: программный пересчет объемных данных на листе 1; генерируются пошаговые значения, расставляются по таблицам, часть значений (используемых на следующем шаге расчета)...

Вывод массива на лист excel
Всем добрый вечер. Собственно, проблема вот в чем, пользователь вводит количество столбцов и строк массива, после чего сам же вводит значения Как сделать так, чтобы это выводилось на лист excela? ...

Транслитерация из латиницы в кириллицу
Подскажите, вот нашел такой макрос: Option Explicit Function Translit$(iValue$) Dim iRussian$, iCount%, iTranslit As Variant iRussian$ =...

Запуск пользовательской формы при открытии файла
Пока нашел только такой способ Private Sub Workbook_Open() Application.Visible = False Call UserForm1.Show End Sub Но при запуске .xlsm видно как открывается книга, потом...

Как открыть форму, а Excel скрыть или вовсе не открывать
Собственно меня интересует как возможно открыть форму в документе эксель но так что бы была видна только форма при открытии документа а сам документ был скрыт или свернут?

Поменять язык интерфейса VBA
Здравствуйте, подскажите, где меняется язык интерфейса VBA? Вместо английского меню отображаются иероглифы

Как сделать книгу активной, зная имя книги?
Как сделать книгу активной зная имя книги?

Замена меток в документе WORD данными из EXCEL
Доброго времени суток. Возникла необходимость на работе в создании данного макроса, а правильно реализовать проблематично. Суть: Есть папка в ней имеется файл Word (Set objWrdDoc =...

Перейти на одну видимую ячейку вниз
Здравствуйте. Как на VBA записать код, который переводит активную ячейку на одну вниз среди видимых? т.е. у меня есть таблица. По одному из полей включён фильтр. Пусть это будет столбец номер...

Макрос на замену каждого третьего слова в тексте на код EQ
Здравствуйте! Помогите, пожалуйста, создать макрос для замены каждого третьего слова в тексте на код EQ. Вот собственно в чем вопрос: Исходный текст: Однако громадные возможности компьютеров...

Сравнение двух массивов в excel
Всем добрый вечер! очень нужна Ваша помощь. Есть два массива (пример приложил, размерность у них условная, на самом деле 10 тыс. и более записей в каждом), если их сравнить, в предыдущем массиве...

Программно снять защиту с листа чтобы добавить строку
Добрый день! Есть макрос на добавление строки: Sub add_row() Rows(ActiveCell.Row).Insert Rows(ActiveCell.Row + 1).Copy Rows(ActiveCell.Row) End Sub На листе есть защищаемые...

Получить имя активного файла Excel и создать копию
Скрипт должен получить имя активного файла, создать его копию, и в копии имени заменить некоторые символы. Например файл назывался "12File_Name.xlsm" нужно создать копию с именем...

Application defined error 1004
Добрый день, Помогите разобраться. Есть код Sub GetValues(f As Variant) Dim last_row As Long, last_col As Long Dim wb As Workbook Set wb = Excel.Application.Workbooks.Open(f) For Each sh...

Добавление строк в таблицу
Ребят, нужно по условию добавлять строки в нужные места. Никак не соображу как. Подскажите пожалуйста. Спасибо

Можно ли использовать формулы Excel в коде VBA?
можно ли использовать формулы Excel в коде VBA? например есть такой диапазон: Dim r1 As Range Set r1 = Range("A1:B2,A4:B6") можно ли как то в коде vba подсчитать сумму в этом...

Как быстро определить: целое ли число?
Public Sub a() Dim x As Single Dim i As Single t = Timer For i = 1 To 256 For j = 1 To 256 For k = 1 To 256 x = 1 + (i / 129) If 0 = (x - CInt(x)) Then ...

Четность не четность
В общем, сделал я вот это: Private Sub CommandButton1_Click() Dim a As String a = lable1 If TextBox1 Mod 2 = 0 Then a = "четное" Else a = "не четное" End If

Перенос данных с одного листа на другой
Добрый день! В книге два листа лист 1 с данными, лист 2 в него надо перенести некоторые данные. Так как данных много, возможно перенести автоматически В требуемые ячейки. Например "ФИО" в Одну...

Система электронного хронометража в Excel
Надеюсь что задумка, реализованная с помощью уважаемых форумчан, поможет многим спортивным судьям. Собственно смысл задумки в том, чтобы фиксировать время велогонщиков по кругам с помощью...

Цикл по символам строки
Есть непустая строковая переменная x, хочу перебрать ее посимвольно в цикле. Умеет ли VBA как в пайтоне запускать цикл по элементам строки? For Each i in x ... Next i

Присвоение переменной
Ребят, подскажите, пожалуйста, как задать строковую переменную, а мотом присвоить ей значение, находящееся в буфере обмена? А если мы знаем, что в строке будет число, её можно как-то...

VBA функция Find поиск нескольких значений в диапазоне
Доброго времени суток! Заранее извиняюсь за неумный вопрос, VBA изучаю недавно. Столкнулась со следующей проблемой: With Range("j22:k29") Set cell = .Find(What:="± -",...

Элементы управления InternetExplorer.Application
Всем привет! Не могу найти в интернете документацию по элементам управления InternetExplorer.Application. Т.е. создаю код Set objIE = CreateObject("InternetExplorer.Application") ...

Перекодировка ANSI -> UTF-8 программно.
Проблема: в VBA Excel создаю xml-файл. Файл создается в кодировке 1251. А нужен в UTF-8. Посоетуйте, плиз, как сделать программно: 1 - Перекодировать весь файл, типа SaveAs .... UTF-8 2 - При...

MS WORD - изменить цвет текста и его стиль
Создать программный продукт средствами языка VBA в MS WORD который позволяет: 1. Менять цвет (5 цвета) текства в выделенной области; 2. Изменять стиль текста (подчеркнутый стиль); 3. Изменять...

Как записать переход по стрелке вниз на одну ячейку, либо вправо - влево - вверх
Добрый день. Необходимо в макросе прописать переход по стрелке вниз на одну ячейку, либо вправо - влево - вверх. При записи идет отображение как активация той или иной ячейки с определенным адресом....

Как в Excel можно подсчитать количество символов в ячейке?
Как в Excel можно подсчитть количество символов в ячейке. Например мне нужно в ячейке D1 вывести количество симолов в C1. Спасибо.

Суммирование произвольного диапазона ячеек
Здравствуйте, уважаемые форумчане. Подскажите, пожалуйста, как можно сделать следующее - хочу просуммировать диапазон ячеек A (начальный номер) : A (конечный номер) и результат выдать, скажем в...

Замена текста в колонтитуле макросом
Здравствуйте! В ходе разработки проектов возникла необхоидмость создавать большое количество пояснительных записок. Иными словами - создание большого количества документов word по шаблону. Макрос...

Определить количество строк в таблице Excel
доброго времени суток! есть небольшая проблема, не знаю в чем загвостка. хочу вывести количество строк из таблицы excel в text box (количество строк все время изменяется) Private Sub...

Создание выпадающего списка
Нужно создать выпадающий список в ячейке средствами VBA, который ссылался бы не на диапазон ячеек, а на внутренний диапазон в тексте программы. Как это дедается? Заранее спасибо обитателям форума

Удаление строк по условию
Народ, помогите ускорить процесс: For i = 10000 To 1 Step -1 If Cells(i, 2) = "" Then Range(Cells(i, 1), Cells(i, 2)).Select Selection.EntireRow.Delete End If Next i ...

Макрос для обхода антиплагиата
Здравствуйте! Тут уже обсуждали антиплагиатные макросы, я просмотрела темы и даже попробовала некоторые из тех, что были предложены. Какие-то из них выдают ошибку, какие-то рабочие и действительно...

Снять выделение цветом отдельных ячеек диапазона
Здравствуйте! Снова задаю неумный вопрос. :sorry: Подскажите как снять заливку отдельных ячеек диапазона. Я смогла уговорить Excel снимать выделение в случае, если заливка всей строки. А если в...

Макрос отправки письма Outlook через Excel с автоприкреплением файла
Добрый день! Есть следующий вопрос: Нужно из Excel 2010 макросом создавать письмо Outlook, в которое автоматом прикреплялся бы иной файл Excel 2010, размещенный (например) на рабочем столе...

Макрос сортировки строк в Excel
Добрый вечер, помогите пожалуйста с макросом в excel 2010. Есть таблица шириной в 6 столбцев (A-F) длина не фиксированная, может быть любой. Задача макроса заключается в следующем, необходимо чтоб...

Формула log в vba
Помогите записать в vba - Log по основанию 1/2 (x^2-1) Когда пишу Log(x^2-1) выдает ошибку записи основания

Форматирование таблиц в Word
Здравствуйте! У меня есть куча документов с таблицами на 3 листа. Нужно, чтобы по нажатию кнопки всё содержимое отформатировалось(уменьшился шрифт, уменьшилась высота строк, удалились разрывы страниц...

Поиск подстроки в строке
Тему уже создавал, но так и не понял, как делать. Нужно, что бы в экселе в ячейке А1 выполнялся поиск слов, записанных через запятую в столбец А2, а результат, и найденные слова, с числом их...

Запуск макроса из командной строки
А можно ли все-таки запустить макрос Excel'я из командной строки или bat-файлы, не используя auto-open()? C auto-open() неудобно то, что при ручном открытии файла макрос также будет...

Убирать первые символы строки
50851 бла бла бла блаблабла вот есть допустим такая строчка, как убрать !первые! символы, от 3 до 5, либо убирать первые цифры в строчке

Ошибка 5941: "Запрашиваемый номер семейства не существует" при добавлении макроса на панель быстрого доступа
Всем привет. я не программист и у меня такая проблема: писала довольно простой макрос для создания формулы с автоматической нумерацией в ворде (чтобы формула не "съезжала" влево). вроде создаю сам...

Вставить изображение в ячейку Excel
Привет всем Гуру ЕКСЕЛЯ И VBA. Помогите разобратся с проблемкой! Как сделать в екселе 2007 чтоб при щелчке на ячейке А3 отрывалось собственное окно черес которое, можно вставить самому фото в...

Функция split: указать несколько разделителей
можно ли в качестве разделителей функции split указать несколько разделителей. Мне нужно одновременно разбить строку на пробелы, знаки переноса строки и запятые. желательно с примером. плизз...

Создать матрицу размера n х m / найти значение элемента матрицы
Привет всем) Помогите пожалуйста разобраться с заданием: 1)Ввести значения переменных n и m, создать матрицу А, в которой n - количество строк, m - столбцов. 2)Найти значение элемента X...

Получение данных из другого файла и копирование их в файл с макросом
Необходимо импортировать данный из нескольких определенных диапазонов ячеек в другом файле и поместить их в заранее определенные места. Диапазоны импорта: B3-D5 B7-D10 B12-D16 поместить их...

Автоматический ввод текущей даты в Excel
Всем доброго времени суток. Такая вот задача: при выборе значения из списка в одной ячейке таблицы - в другой ячейке должна появиться текущая дата. И самое главное - дата не должна больше...

Написать программу для вычисления квадратного корня
как написать программу для вычисления квадратного корня в Visual Basic в excel

Открытие по очереди всех файлов из каталога
Здравствуйте, подскажите как правильно написать строку Application.Workbooks.Open ("c:\Âõîäÿùèå\3.xls"), что бы в имени файла была переменная. В моем случае s Суть в том что бы открыть все файлы из...

Прервать итерацию цикла for
Здравствуйте. Есть цикл For i = 10 To 60 внутри цикла есть условие при котором нужно перейти к следующему значению i If old_s = new_s Then ??????? (начать цикл сначала со следующим...

Установка и снятие закрепления областей в Excel
Подскажите, как с помощью VB установить закрепление областей в Excel.

Копирование ячеек с сохранением форматирования
Привет. Проблема такая....у меня в таблице есть много полей,и одно из них индикатор. В роли индикатора выступает цвет ячейки. Как мне скопировать на другой лист сохраняя цвет этой ячейки!? У меня...

Макрос, копирование ячеек в пустую строку на другом листе
доброго времени суток, господа! на листе 1 имеются ячейки для заполнения(анкета). требуется при нажатии кнопки, чтобы данные из этих ячеек переносились на лист 2 в строку (чтото типа базы), при новом...

Получение номера выделенной колонки
Как получить номер выделенной колонки, т.е. выделил колону 'С', а он мне выдал, колонка '3', а не 'C:C' Заранее спасибо

Макрос для всех документов
Здравствуйте! Поскажите как сохранить макрос для всех документов, что бы не писать в каждой книге. (эксель, офис 2007) Также вапрос такой, если я кнопку макроса повешу на меню в 2007 офисе, будет...

Автоматическая замена части формулы в ячейке Excel
Доброго времени суток ! Вот столкнулся с такой пробелмой, ищу помощи.. На листе Excel 2003 имеет несколько тысяч формул типа ='C:\ Budget- 2013\1.1'!$AR$10 ='C:\ Budget- 2013\1.1'!$AА$10...

Найти минимальный и максимальный элементы массива
Дан массив целых чисел K(n), найти в нем минимальный Kmin, и максимальный Kmax элементы. Вывести в порядке возрастания все целые числа из интервала (Kmin; Kmax), не встречающихся в исходном массиве.

Команды VBA к умной таблице
Добрый день, Где можно посмотреть синтаксис команд обращения к умной таблице? По сути мне необходимо проверить в ячейке на наличие формулы только в пределах умной таблицы Видел только ...

Чтение файлов формата .txt в кодировке utf-8
Уважаемые форумчане! Делаю скрипт для чтения и записи txt-файлов из Excel-вского файла по средствам VBA макросов. Но всё упёрлось в проблему с кодировкой. Мне по умолчанию нужна UTF-8, так как...

Как отключить расчет формул при работе макроса?
Народ, расскажите как отключить расчет формул при работе макроса, а то формул навалом и при каждом лишнем движении формулы заново расчитываются - по пятнадцать минут жду! как отключить и как...

Объявление двумерного динамического массива
Всем доброго здоровья! Как известно (некоторым продвинутым юзерам), одномерный динамический массив объявляется так: Dim arrRecords() as string Может ли кто подсказать, как объявить двумерный...

Изменение формата даты
Всем хорошего дня! У меня такая проблема: Написал функцию расчёта срока изготовления изделия для этапов производства, в зависимости от общей даты Старта (А1) и Финиша (А2) Заказа, (К -...

Найти остаток от деления двух действительных чисел
Задание такое: найти остаток от деления двух действительных чисел. Реализовал вот так: Sub Lab4_1() Dim a! Dim b! Dim c As Double a = Cells(2, 1) b = Cells(2, 2) c = a Mod b Cells(2, 3) = c

Close и Save документа Word
Close и Save документа Word, не могу в них врубиться, посмотрите пжл, три нижепреведённые строки правильно закомметировали, если нет поправьте '1 закрываем документ, чтобы не появлялось...

Создать фильтр по значению ячейки
Всем привет! Как в MS Office Excel реализовать фильтр по значению ячейки. покажу на картинках что я имею ввиду. Имеется программа со списком различных форм отчетности. для удобного поиска форм...

Как из Excel открыть папку с файлами Word
Всем доброе время суток ! Есть задача. Как кнопкой, находящейся в Книге Excel, открыть папку с несколькими документами (файлами) Word? Книга с кнопкой и папка с документами Word...

User-defined type not defined
Уважаемые, помогите, запарился... Есть макрос в Access, нужно вызывать этот макрос из excel (нужно именно так) Ниже код: Sub m1() Dim As cnn As ADODB.Connection Set cnn =...

Worksheet_Change как обозначить Target
Люди добрые, подскажите плиз как обращаться с этим зверем: "Private Sub Worksheet_Change(ByVal Target As Range)" В литературе типа VBA для чайников и прочей написано кратко: Хочешь, чтобы макрос...

Ввод в текстовое поле только цифр
Подскажите пожалуйста, как сделать так чтобы в компонент TextBox можно было вводить только цифры, а не буквы?

Записать формулу в ячейку, используя vba
Добрый день! Имеется такая проблема: есть 2 листа, пусть лист1 и лист2. На каждом листе есть таблицы разной размерности: на листе1 - 12х12, на листе 2 - 3х144 (пусть начальная ячейка таблицы на...

Работа Excel со сканером штрих-кодером
Помогите пожалуйста настроить работу Excel со сканером штрихкодером. Точнее у меня есть сканер и мне нужно чтобы он работал с Excel. Может нужно прогу какую или в Excel что-нибуть настроить

Как задать "Пи" через встроенную функцию
как задать пи через встроенную функцию раннее я просил помочь решить данный пример но мой преподователь не принимает данное решение тк она утверждает оно не верное и просит задать пи как то иначе...

Сохранение текущего листа Excel в отдельный файл
Доброго всем времени суток! Помогите справиться с небольшой проблемкой. Есть файл Excel с несколькими листами. Сделал ToolBar с кнопками. Как реализовать кнопку "Сохранить как" только для...

Программное построение диаграмм в Excel
Скажите пожалуйста, как программно построить линейную диаграмму в excel при том условии, что количество строк, являющихся источником данный все время будет разным? Я научилась их строить для четко...

Среднее арифметическое и геомитрическое
Задать 3 действительных положительных числа,найти среднее арифметическое и среднее геомитрическое этих чисел...

Можно ли заставить функцию возвращать несколько значений(массив)?
Доброго всем. Очень неудобно, что в ВБА функция возвращает только одно значение. Может кто обошел эту преграду? Можно ли заставить функцию возвращать несколько значений(массив)?

Работа с комментарием ячейки Excel через VBA
Здравствуйте. Прошу вашей помощи, уважаемые эксперты. Сейчас пилю таблицу учета рабочей документации. Хочу реализовать такую фишку: при щелчке по ячейке определенного столбца появляется формочка,...

Избавиться от ошибки "Procedure too large"
У меня при запуске макроса выдаётся ошибка Procedure too large. Можно обойти эту ошибку, не разбивая на несколько разных сабов? Процедура действительно большая. А какое ограничение есть по...

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

Протягивание формулы до последней строки с данными в макросе
Добрый день! Создала макрос через "Запись макроса" Мне нужно протянуть несколько формул по столбцу до последней строки с данными. Макрос записал протягивание только до конкретной ячейки. Так как...

Как создать надстройку с макросом и установить её на несколько компьютеров?
Подскажите пожалуйста как создать надстройку с макросом и установить её скажем на несколько компьютеров, но чтобы эта надстройка не была прикреплена к одному файлу(вся работа происходит только с...

Как отключить конфликт имен?
Как отключить конфликт имен при копировании данных из одной книги в другую, если имена требуются одинаковые

Ввод и вывод сообщений
1. Организуйте ввод с клавиатуры двух чисел. Окна ввода должны иметь различные заголовки, появляться в разных частях экрана, содержать разные сообщения и неравные значения в поле ввода по умолчанию....

VBA .json парсинг
Добрый день. Используя API получаем ответ от сервера в формате json: {"История": { "Данные": { "Нация": {"type": "string", "bytes": 50, "max_size": 0}, "Население": {"type": "integer",...

Есть ли в VBA функция переводящая номер столбца в его буквенный эквивалент в Excel
Есть ли в VBA функция переводящая номер столбца в его буквенный эквивалент в Excel'е? Т.е. мне предположим надо вывести в msgbox информацию о том, с каким столбцом мы имеем дело. Его числовой номер...

Вставка картинки в ячейку программно
Здравствуйте, Есть два столбца: id, рисунок имя картинки состоит из id. Например, id=111, а рисунок 111.jpg. Я установила высоту строки=200, Мой код: Public Sub insPic() ...

В Excel внутри ячейки внутри слова не ставится курсор
в Excel внутри ячейки внутри слова не ставиться курсор. Выделив какию-нибудь ячейку я не могу поставить туда курсор и что-то исправать внутри написного слова. Кто-нибудь знает в чем может быть...

Как с помощью VBA в Excel можно получить координаты определенной ячейки?
Как с помощью VBA в екселе можно получить координаты определенной ячейки. Просто в определенную ячейку надо вставить имейдж

Из Excel открыть документ Word
Как из Excel открыть документ Word, в котором был бы определенный текст

Нужен макрос для удаления значений в ячейках по условию
Ребята каким можно макросом удалять значения определённых ячеек .Задача макроса ,в ячейках в каждой из строк начиная с 28 строки столбца I ,промониторить выполняется ли условия чтобы если в ячейке...

Аналоги или ускорение ВПР через макрос
Есть лист, в который простейшим ВПР-ом подтягиваются данные из другого листа. Но...на листе оооочень большое количество строк (от 300 000 и далее), соответственно ВПР виснет часа на 4, а то и больше....

Организовать связь элемента checkbox (флажок) и ячейки в excel
возникла потребность создать кучу ячеек и чтобы в каждой из них был checkbox который бы устанавливал для этой ячейки значение 0 или 1. Попробовал сделать - вид-> панели инструментов -> элементы...

Как найти минимальное и максимальное значения массива и вывести их разность на экран
Здравствуйте. Помогите пожалуйста с составлением программы в VBA. Вот задание: создать одномерный массив из 20 целочисленных значений. Найти минимальное и максимальное значения, вывести их разность...

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

SQL запрос к Oracle из Excel через ODBC
Люди! Подскажите, pls, как написать макрос, который по данным запроса к базе данных Oracle устанавливал бы значения переменных или ячеек рабочего листа? Очень хотелось бы пример соединения с базой...

Как найти последнюю строку таблицы Excel
Доброго времени суток. упорно занялся изучением VBA кое какие вещи уже получаются, но при работе столкнулся с таким затруднением: имеется неограниченое кол-во одноструктурных таблиц, которые должны...

Как выделить всю текущую строку в Excel?
как выделить всю текущую строку? Excel. если извесно, что в строке 5 ячеек? спасибо

Выполнение процедуры с задержкой
Ребята! Возник вопрос! Есть процедура которую нужно выполнить (Excel VBA), но эта процедура должна выполняться с задержкой в секунд , после того как ее вызвали! Не могли бы Вы помочь с кодом! Заранее...

Перенос данных таблиц из Excel в Word
Имеется Word''овский файл-отчет - текст, таблицы-источники для графиков (10 шт.) (по 2 строки и 15 столбцов, не отображаются), графики (10 шт.), таблицы информационные (5 шт.) (порядка 15 строк и 10...

Фильтры и макросы в Excel
Доброго времени суток! Необходимо сделать следующую вещь: Книга Эксель и все ее листы должны быть защищены и при этом нужно реализовать фильтр(желательно не автофильтр, чтобы автофильтр был...

Можно ли писать на VBA в OpenOffice
Есть программа, которая экспортирует в excel через макросы. Т.е. просто запускается определенный xls-файл в котором подгружается шаблон xla. В MS Office Excel все работает на ура, а вот в OOo Calc...

Ошибка runtime error 1004 application-defined or object-defined error
Здравствуйте! Взяла простенький пример из книги Уокенбаха "Excel 2010. профессиональное программирование на VBA", но у меня почему-то не работает, выдает ошибку: 'runtime error 1004...

Ошибка: Недостаточно системных ресурсов для полного вывода на экран
Помогите пожалуйста: При выполнии макроса, а также при его редактировании в VBA возникает ошибка 'Недостаточно системных ресурсов для полного вывода на экран' Проект содержит около 7 форм. После...

Подскажите как работать с ComboBox
Подскажите как работать с ComboBox, а то уже давно неработал с формами Есть 4 названия, как их вписать в ComboBox, чтобы при выборе одного названия, оно записывалось на лист екселя

Object required
в одном документе Ворда есть созданное мною меню что-то с сегодняшнего дня нажимая на меню стал получать ошибку Object required - требуется объект Код пошагово проверить нельзя из-за этой строки,...

Обращение к ячейкам открытой книги (не текущей)
Макрос должен запускаться, спрашивать - какой файл ему взять. Открыть его, разделить определенную ячейку на 1000, сохранить файл. Как это сделать? А то я глючу. listname = "Топливо форма"...

Импорт таблицы html из тела письма Outlook
Привет всем! Возник немного нестандартный вопрос по использованию VBA outlook. Вопрос мягко говоря увеличенной сложности. В большей степени касается обработки тела письма Outlook средствами VBA. ...

Подключение нужных библиотек при переносе программы на другой ПК
Всем доброго здоровья! Может ли кто подсказать, как автоматизировать процесс подключения нужных библиотек VBA при переносе программы на другой комп? Как правильно создать какой-нибудь bat-файл или...

Макрос для подбора параметра (Данные - Анализ что-если)
Здравствуйте! Возможно ли создать макрос, выполняющий подбор значений? Эту операцию надо проделывать многократно, от того ручками долго. Он категорически не хочет, у меня по крайней мере, записывать...

Как добавить строку в таблице в Word используя VBA?
Здравствуйте! Прошу помочь мне со следующим: в документе есть 3 таблицы. Во время заполнения 2-ой таблицы из формы нужно сделать так, чтобы при добавлении новой записи создавалась и строчка в...

Как получит номер строки выделенной ячейки?
Подскажите как получит номер строки выделенной ячейки. Заранее благоларю за помощь!

Как узнать объединены ли ячейки
Здравствуйте. Помогите пожалуйста. Как определить объединены ли ячейки. Задача такая перебирая строки в таблице определить объединены ли столбцы (например первый и второй столбец), если да то одно...

Корректное закрытие файла Excel
Здравствуйте, уважаемые участники! Подскажите, пожалуйста как корректно закрыть файл .xls в vba? Файл открывается следующим кодом: Dim oWbk As Workbook Set oWbk =...

Импорт данных из xml-файла
Добрый день. Есть такая задача: Есть xml файл в котором есть перечень сотрудников. Нужно циклом из этого файла фамилию каждого сотрудника выгрузить в отдельную ячейку в екселе. Как сделать это...

Округление числа до 2 знаков после запятой
Буду очень признательна, если кто-то подскажет, как написать программу, округляющую число до двух знаков после запятой. Программа должна использовать функцию Int.

Копирование данных из одного excel файла в другой
Добрый день! Знаю тут много тем про копирование данных. Но я так и не нашла по теме. Вобщем мне надо из разных файлов собрть ин6формацию в один. Я сделала это так: iPath = ActiveWorkbook.Path...

Проблема с типами данных. Run-time error '6': OverFlow
Option Explicit Option Explicit Dim curCSP As Single Dim curSP As Single Dim dbSV As Single Dim dbIr As Single Dim dbTM As Single 'Const curCSP = 51 'Const curSP = 50

Макросы на копирование данных из нескольких файлов excel в один файл excel
Здравствуйте! Помогите сделать два макроса в excel, которые будут копировать данные из множества файлов excel в один файл excel. Я полный новичок в данной теме... Находил различные варианты в...

Заполнение ячейки по условию от содержания другой
Доброго времени суток! Помоги решить проблему, нужно написать макрос или что-то в этом роде. Суть такая есть 2 столбца и нужно чтобы определял что написано во втором столбце и автоматически писал...

Как правильно организовать заполнение массива
Хочу создать и заполнить массив. Вот на такой код ругается: Dim a_RightAns (2 To 11) As Integer a_RightAns = Array(1, 0, 2, 2, 0, 3, 3, 2, 4, 0) Придется вручную заполнять или как-то можно проще...

Что за функция IIF в VBA и для чего он служит?
Кто объяснит что за функция IIF в VBA и для чего он служит в ХЕЛПЕ ни чего не понял Спасибо

Как изменить активный лист в коде одного макроса?
Здравствуйте, подскажите как сделать в одном макросе замену активного листа. То есть я скопировала ненулевые значения в другой лист и теперь нужно, чтобы в этом втором листе убрались пустые строки....

Копирование листа из другой книги
Снова здравствуйте! Пытаюсь скопировать лист из одной книги в другую Private Sub Load_Click() shName As Variant On Error Resume Next ZDBFileName = Workbooks("1.xls").Path...

Поиск файлов в заданной папке и копирование посредством Excel
Здравствуйте! Нужен макрос, который будет находить файлы в заданной папке с подпапками и копировать в заданную папку. Допустим заданная папка, назовем ее "А", содержит папки(подпапки) "А1",...

Как записать значение в определенную ячейку
Функция в VBA использует значения из различных ячеек на листе, получаю их так s = Worksheets(1).Cells(nom, 4 + i) однако обратного действия не получается, т.е. я не могу в функции записать...

Ввод в Textbox только чисел (фильтрация ввода)
Подскажите, как грамотно организовать фильтрацию ввода символов в TextBox? Нужно, чтобы вводились только цифры. Никаких других символов вводить нельзя - ни запятых, ни точек, ни букв. Вообщем защита...

Как определить количество строк? (Excel)
После установки AutoFilter надо определить количество видимых не пустых строк на листе. (Способ, просмотра и подсчета от первой до последней строчки не подходит).

Сравнить две таблицы на листе в Excel
Форумчане, доброго времяни суток) Ковыряясь в Excel VBA сталкнулся с проблемкой для себя,и хотелось бы найти способ реализации,ради чего пишу,Вам. Ситуация: Имеются две таблицы, на одной из...

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

Закрыть файл Excel с сохранением сделанных изменений
Вроде изучил этот вопрос 'параметр SaveChanges типа Boolean, если установить True сделанные изменения сохранятся 'в противном случае нет, если параметр упускается 'тогда при закрытии появляется...

Как программно узнать разрешение экрана
Здравствуйте MsgBox$ _ "Экран Вашего монитора имеет разрешение: " & GetSystemMetrics(0&) & "x" & GetSystemMetrics(1&) & vbCrLf & _ ...

Оператор Like
Оператор Like, такой простой, но такой таинственный :) Вообще, по нему всё ясно, кроме некоторых особенностей. Так, например, оператор Like очень здорово работает, если в качестве шаблонной строки...

Сортировка таблицы по определенному столбцу
Здравствуйте, уважаемые программисты. Подскажите, пожалуйста, как отсортировать таблицу (с помощью макроса) по определенному столбцу, если количество строк в таблице постоянно меняется. Т.е ...

Узнать первую пустую ячейку
Здравствуйте. Подскажите пожалуйста, у меня есть лист, на котором в некотором месте есть таблица. Дело в том что я через макрос провожу некоторую манипуляцию в таблице - тем самым удаляю в ней...

Ошибка Runtime error '6' Overflow
Помогите пожалуйста разобраться. Все время возникает ошибка Runtime error '6' Overflow в VBA Private Sub btCalc_Click() Dim T As Integer Dim I As Integer Dim S As Double Dim...

Нестандартные символы
Всем здравствовать! Вопрос следующий: есть задача импортировать данные из таблицы в файл. Но фикус в том, что данные на немецком языке и есть буквы, которые в стандартных раскладках отсутствуют....

Условное форматирование ячеек
Ребята, подскажите. Есть в Excel такая возможность - применить к определённому диапазону условное форматирование. Т. е., например, если в ячейке записано "1", то она закрашивается каким-нубдь цветом...

Выделение отдельной строки в ячейке таблицы Word
Ребята хелп ми, уже из сил выбился. Как выделить отдельную строку в ячейке таблицы Word? Ставлю курсор в начало строки и пробую различные методы типа MoveEnd(), EndOf(), MoveEndUntil() и другие. Все...

Календарь на год в Excel
Помогите пожалуйста! необходимо создать календарь на год! вводим год а он нам календарь....есть календарь на месяц а на год как сделать не понимаю...

Проверить существование объекта
Как проверяется в vba существование объекта? Например объект selection.listobject или selection.offset(-3, 0)

Снять выделение (select) с объекта
Добрый день! Не могу понять, как сделать, чтобы программа сняла выделение графика, чтобы при повтором запуске процедуры снова его выделить? Мой макрос работает так, что процедура вызывается...

Пропинговать компьютеры и занести результаты в соответствующие ячейки столбца
Доброго всем времени суток. В документе один лист. Один столбец со списком имен компьютеров (начиная с "B2" и вниз). Всего около 4000 ПК. Есть задача: пропинговать их и занести результаты в...

Макрос для Outlook: автоматическая проверка всех входящих писем
Друзья, простите что обращаюсь, но уже давно пытаюсь и никак не могу написать макрос для outlook. Нужно чтобы он проверял автоматически все входящие письма, доставал файлы .xls .xlsx, если они в .rar...

Заполнение ячеек листа Excel из массива
Есть массив строк, нужно заполнить первый столбец значениями из массива Добавлено через 3 минуты Worksheets("Лист1").Select For i = 1 To UBound(massiv) Step 1 Cells(i, 1) =...

Что делает команда Application.DisplayAlerts
Здравствуйте. Вообщем, у меня на кнопке удаления страницы графика с екселя записана команда: Application.DisplayAlerts=false charts.delete Application.DisplayAlerts=true Объясните...

добавить пробел
Подскажите, что нужно добавить в следующий код, чтобы между словами в строках Cells(9, 1) и Cells(9, 2) ставился пробел? "<font face=arial><a href=mailto:" + Worksheets("Body").Cells(9, 1) +...

Разделить строку на слова и вписать в ячейки
Надо написать программу которая будет из ячейки с символами выделять по одному слову и вписывать их в отдельные ячейки.В строке,слова могут быть отделены большим количеством пробелов... Фишка в том...

В каком файле находятся значки (иконки) панелей инструментов MS Office?
Скажите, пожалуйста, в каком файле находятся значки (иконки) панелей инструментов MS Office? Я так понимаю, что это или dll или exe-файл.

Сложные UserForm в Excel
Добрый день! Очень нужна помощь по UserForm в excel... Есть задача и отличная мысль по ее решению, однако сомневаюсь в ее реальности... Вобщем, можно ли сделать как-то так, чтобы при открытии книги...

Работа процедуры с ячейками таблицы
Ребята помогите выполнить задачу! Откройте новую рабочую книгу. Введите следующие значения в первый лист рабо¬чей книги. Ячейки Значения ———————————————————— А1 Товар А2:А6 Названия каких-либо...

Получение массива критериев из автофильтра excel
Всем доброго времени суток. Есть два весьма весомых и интересных вопросов: 1) как получить массив критериев фильтра. Т.е. фильтр может принимать в виде критерия массивы, но как его достать от туда...

Получить только дробную часть от числа
День добрый, помогите пожалйсто... в VBA Excel ( Вводим 2 числа.... например 15 и 7 и что-бы при нажатии на кнопку оно оставляло только дробную часть)... зарание спасибо

Собрать данные из разных книг в одну
Добрый день. Прошу помощи в написании макроса, который собирал бы данные из нескольких книг в одну. таблицы во всех книгах одинаковые: шапка таблицы на 6 строке, ниже построчно идут данные, в...

Копирование отфильтрованного диапазона
Прошу подсказать, Как скопировать из таблицы и перенести в другую таблицу отфильтрованный автофильтром (2 условия) диапазон ячеек по столбцу "G" например Rows("13:13").Select ...

Макрос для печати определенных листов книги Excel
Всем доброе время суток! Помогите пожалуйста. Дано: Лист с данными о клиенте и виде выполняемых работ, на котором определяется какой из 65 листов нужно напечатать. Лист с договором, Лист с актом...

Удаление выделенных строк из ListBox
For I = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(I) Then ComboBox1.AddItem (ListBox1.List(I)) End If Next I Скажите пожалуйста, что нужно добавить,...

Как удалить повторяющиеся элементы динамического массива?
Массиву меняем размер равный количеству заполненных ячеек в столбце "А", на листе2! Нужно удалить повторяющиеся значения! Вот часть кода для заполнения массива. ReDim intArr(intcount_cell)...

Проблема с запуском макросов
Добрый день. Столкнулся с такой проблемой на своём домашнем ПК, на рабочем такого не было, но теперь тоже появилось. Значит есть файл Excel, в котором имеются макросы, один записан в объекте...

Ошибка "Subscript out of range"
Добрый день, уважаемые знатоки, обращаюсь к Вам от безысходности. Имеется следующий цикл: Do Until Workbooks(НазваниеКниги).Worksheets(НазваниеЛиста).Cells(НомерСтроки, j) = "" With...

Как отключить "мерцание" окна
Всем доброе время суток! В макросе одна за другой открываются две книги Excel. Set wb1 = Workbooks.Open(Filename:=ThisWorkbook.Path & "\Книга1") Set wb2 =...

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

Application.Calculation = xlCalculationAutomatic
Здравствуйте, подскажите пожалуйста значение команд: Application.Calculation = xlCalculationManual Application.Calculation = xlCalculationAutomatic В каких случаях их надо...

Получить имя файла без расширения
Помогите написать код программы. Дана строка содержащая ПОЛНОЕ ИМЯ ФАЙЛА , т.е имя диска, список каталогов ( путь) , собственно имя и расширение. Нужно выделить из этой строки имя файла (без...

Ошибка: Invalid procedure call or argument. Что не так?
Имеется код. Он вроде считает, а вроде и нет. Выдает ошибку: Invalid procedure call or argument. Private Sub CommandButton1_Click() a = Range("B1").Value TextBox1.Text = a X =...

Сравнение двух диапазонов ячеек на совпадение
Здравствуйте! Подскажите пожалуйста... Имеется 2 диапазона ячеек А1:A3 и C1:C3, в которых забиты цифры, допустим в ячейках А1:A3 (3,6,2 соответственно), а в C1:C3 (2, 4, 8) и мне необходимо, чтобы...

Как использовать Таймер в VBA
Здравствуйте, проблема в следующем: в экселе нужно создать код, который берет заданное численное значение (например 80 сек) из ячейки и при нажатии на кнопку начинает работать таймер (его...

Как перенести макрос на другой компутер?
Привет, All Я написал несколько макросов (на Экселе). Но они должны работать на другом компутере. Как бы мне их перенести туда? Говорят, что одного файла (xls) с макросами недостаточно....

Склонение фамилий, имен и отчеств по падежам
Можно ли програмно заставить VBA склонять по отменкам Фамилию, Имя и Отчество?

Изменение кодировки текстового файла
здравствуйте, в своих записях имею пару кодов для перекодировки файлов, а как сделать из ANSI > UTF 8? спасибо ' 'преобразование текстового файла из 'windows-1251' в 'cp866' 'требуется ссылка...

Автоматическая сортировка
Excel 2007. По столбцу проведена сортировка. При изменении или добавлении значения ячейки в этом столбце, необходимо чтобы выполнялась автоматическая сортировка. Что бы не нужно было нажимать...

Снятие блокировки открытия с макроса в Excel2003
weeper (15.04.2006) 1. Меню Сервис/Доступ к книге/Разрешить совместный доступ (галочку убрать); 2. Нажать Ок; 3. Нажать Да в появившемся окне; 4. Alt+F11. Может кому еще пригодится: Только что...

Вывести на печать переменные A, B, C в порядке их возрастания
1. вывести на печать переменные A, B, C в порядке их возрастания. Значения переменных: а) ввести с клавиатуры; б) взять из диапазана B2:B4 листа Excel; в) задать оператором присваивания 2. даны...

Собрать данные из нескольких документов в один
Доброго времени суток, я сам начинающий, и у меня вопрос, как сделать обработку, например бат файл, чтобы он собирал все файлы в один, или указываешь на какой то определенный каталог(папку) и он...

Чтение в массив полей таблицы Excel
Добрый день, появилась необходимость написать некий макрос, с VBA столкнулся впервые. Нагуглить внятный пример не получилось, может подкинете, а там я уже интуитивно разберусь, думаю) Спасибо.

Как получить данные из Textbox на форме
Не могу решить проблему На форме программно создается Textbox, как из него получить данные Private Sub CommandButton1_Click() Dim lbl(10) As Control For i = 0 To 10 Set lbl(i) =...

Как снять все фильтры во всех файлах(листах) excel
Друзья! Столкнулся с такой проблемой. В папке лежит 220 файлов, формата xlsx. Пытаюсь объединить все листы и во всех файлах в один единый файл и лист. Макром у меня на это есть, однако как назло...

Ошибка - Метод Select из класса WorkSheet завершен неверно
люди!!!! подскажите плиз такую вещь - обращаемся в excel из access при этом почему-то перестало работать выделение ячейки (до этого работало)или листа :((( примерный код Set MyObj_Shablon =...

Как изменить номера страниц в оглавлении
Всем доброе время суток. В оглавлении указанны номера страниц, т.е. {Page}, есть ли возможность поменять эти значения? Формулу, например (={{page}-5}), поставить или макросом поменять. В документе...

Скрытие/отображение рабочих листов макросом
Всем здравствуйте! Подскажите, пожалуйста, есть ли возможность реализовать в VBA скрытие/отображение листов по признаку закрытый лист сделать открытым, и наоборот. Или код приведенный ниже сделать...

Вывести текущую дату и день недели словами
вывести текущую дату и день недели словами например мы вводим 15.05.1990 и программа выдают сообшение это же дата не цифрами а словами Добавлено через 1 час 19 минут некто незнает как это...

Как выделить (выбрать) несколько строк (в Excel) используя относительные координаты?
Вроде-бы вопрос элементарный, но нигде не могу найти. Как выделить (выбрать) несколько строк (в Excel) используя относительные координаты. Делаю Rows(Range(Cells(r - 6, 1), Cells(r - 1,...

Применение ВПР в VBA
Доброе утро! Помогите пожалуйста с написанием макроса функции ВПР. В файле-примере есть два листа: 1. "Результат" - в этом листе пользователь вставляет в поле "А", начиная в ячейки "А5" уникальные...

Автоматическая отправка e-mail с Excel или с Access
Друзья помогите решить задачу!!!!! Есть три колонки: -список работников -электронный адрес -соответственно дни рождения. Возможно ли написать макрос для автоматического отправления...

Сумма элементов массива
Такое вот задание. Окно для ввода количества элементов я написал, а сумму не могу. да, начинающий совсем. помогите, пожалуйста

Как получить уникальные значения из колонки VBA Excel?
Как получить уникальные значения из колонки таблицы в VBA Excel например в массив? При работе в Excel при установке автофильтра, Excel моментом заполняет ListBox уникальными значениями, даже при...

Ошибка 76 Путь не найден (Path not found)
Есть: файл с .pptm макросом, в котором созданы UserForm1 и Module2. Код Module2: Sub SlideGenerate() UserForm1.Show End Sub При запуске выдаёт ошибку: Run-time error '76': Path not found

Макрос для склеивания PDF файлов
Коллеги, есть вопрос: например есть 2 документа в разных приложениях например в визио и экселе. можно ли в каком нибудь из pdf-принтеров создать пдф из каждого документа и их объединить в один...

Выделение текста жирным шрифтом
Добрый день! Есть диапазон ячеек. В некоторых из них записан текст через точку. Необходимо выделить жирным шрифтом весь текст до первой точки.

Количество столбцов и строк в двумерном массиве
Нужно в цикле пройтись по неизвестному двумерному массиву. Как получить у него количество столбцов и строк?

Ворд: Печать книгой
Здравствуйте! Помогите пожалуйста =) Уже все облазил не найду решения =( Вроде бы и задача не сложная.. в общем надо сделать что бы в ворде можно было напечатать книгу (20 страниц) Надо что бы при...

Програмно заставить VBA рассылать SMS через мобильный телефон
Есть моб. телефон ....., через отдельний браузер можно посалать смс, как подлючить браузер к VBA, или же как работат брузер по отсилке смс.....может есть какие то варианти еть, над етим долблю...

Макрос для проверки двух диапазонов данных
Здравствуйте, уважаемые форумчане! Я недавно начал изучать VBA и столкнулся с такой задачкой: есть две таблицы - в одной номер и название организации, но номера могут содержать ошибки. В другой...

Перенос картинок в Excel с одного листа на другой
Добрый день! Я умею худо бедно программировать на VBA, а хочу сделать программу для Android, делаю прототип на VBA, чтоб потом готовую программу перегнать под Android, может буду искать кого-то, а...

Запуск cmd и выполнение команды макросом
Доброго дня! Подскажите, пожалуйста, как запустить макросом из excel командную строку и выполнить команду? Нужно пропарсить много папок с фото сделать список со всеми путями ко всем файлам. ...

Как перебрать все непустые ячейки в Excel?
Вот собственно

Проверка пустой ячейки Excel или на наличие в ней пробелов
Доброе время суток! Нужно проверить ячейку в Excel на следующее условие: Если ячейка совершенно пустая (IsEmpty) или содержит один или несколько пробелов, то x=True Иначе x=False Заранее...

Отображать на странице Word'а число страниц в документе
1) Есть документ Word, в котором постоянно меняется количество страниц. Нужно чтобы в одном месте в документе отображалось текущее количество страниц. Как это можно реализовать? 2) Как можно...

Скопировать строку на новый лист, если ячейка содержит определенное значение
Добрый день, нужен макрос, или как по другому решить: Нужно скопировать строку на другой лист, если в ячейке F содержится значение "Процессор", "Жесткий диск", "Монитор".

Макрос поиска и замены букв в MS Word с верхним подчеркиванием
мне нужно позарез написать мкрос чтобы он искал во всем документе жирные слова или буквы и заменял их на обычные буквы но уже с черточкой вверху...как сделать их обычными я знаю)))...как сделать так...

Отправка и получение ответа XML
Здравствуйте. Я в VBA не очень (учусь) и с такими задачами еще не сталкивался, - руководство поставило задачу сделать макрос проверки параметров сайта в Excel на основании API c сервиса...

Удаление символов в ячейке ексель
Приветствую. Опыта нет. Требуется обработать файл ексель - 2003 с помощью макроса. 1. Замена комбинаций символов - в примере " " (двойной пробел) на " " (одиночный пробел) 2. Замена комбинаций...

В антиплагиат.ру видны скрытые символы
Оригинальность он поднимает, но когда просматриваешь текст в антиплагиат.ру видны скрытые символы, как добиться того чтобы скрытые символы не были видны?? Sub Че() ' ' Че Макрос ' '...

Поиск одинаковых значений в столбце
Добрый день. Не могу разобраться с одной задачей на Excel. Дан одномерный массив, занесенный в столбец Excel. Необходимо найти количество повторений числа, но только того которое стоит раньше,...

Синус в квадрате X
Как собственно записать F(x)=sin^2\,x-cos\,2x Точнее сам синус в квадрате икс. Range("B" & myR) = Round(Sin^2(x) - cos(2*x), 2) ' не получается

Копирование диапазона ячеек из одного листа в другой
Подскажите не помогу понять как скопировать в определенное место диапазон ячеек по условию например - с Листа 1 столбец А с 6 строки по условию цвета ячейки в Лист 2 столбец G строки 7. Как в данном...

Заполнение ListBox с использованием свойства List
Здраствуйте, уважаемые форумцы! Можно маленький вопросик? Надо написать макрос, кот бы производил заполнение списка пятью фамилиями, используя свойство List, и связать с кнопкой. Вот написала:...

Сохранение Excel в PDF
Есть скрипт который выполняется после нажатии кнопки генерировать или по шедулеру в определённое время (как неважно) копирует файл ексель на другой диск и присваивает ему имя в формате даты. ...

Экспорт таблицы из Word в Excel
Уважаемые, здравствуйте. Столкнулся с проблемой рутинизации обработки присылаемых файлов в Word и с необходимостью экспорта всего одной имеющей ценность таблицы в Excel, с некоторыми...

Замена текста в закладке Bookmark
Здравствуйте! Помогите, пожалуйста, в решении следующего вопроса. Есть файл Эксель и файл Ворд. В Экселе, к примеру, в ячейке С1 находится какой-либо текст. В файле Ворд при помощи инструмента...

Выбор листа и занесение его имени в переменную
Всем привет! Есть вот такой макрос Sub GetIt() FullPath = Application.GetOpenFilename MainBook = ThisWorkbook.Name i = InStrRev(FullPath, "\") Name = Mid(FullPath, i + 1) Folder =...

Объекты в Excel
Объект Application (Приложение) занимает самый верхний уровень иерархии объектов Excel. Объект Application управляет установками и параметрами уровня приложения, т.е. такими, которые можно найти в...

Вычислить факториал
Здравствуйте! Старшей дочке дали задачку по Excel. Вычислить факториал. Наваяли с ней код. Скомпилился нормально, но ничего не показывает, хотя, вроде должен: Dim IntNum As Integer 'Dim IntCount...

Макрос удаления пустых строк в таблице
Имеется таблица. Если в столбце Н строки не содержат никаких значений (пустые) то такие строки надо удалить. Казалось бы проще некуда. Не могу создать рабочий макрос!

Как добавить кнопку на лист
Подскажите пожалуйста, как сделать в EXCEL кнопку чтобы при ее нажатии запускался макрос Visual Basic? Чего-то не могу ее найти не в Objects, не в Hyperlink... непонятно.

VBA Excel как создать подсказку
Доброго времени суток возможно ли создание подсказки (коммента) в пользовательской функции подобно как в стандартных функциях Excel? Место которое интересует на рисунке выделено красным ...

Экспорт данных ячеек Excel в txt файл
Мне нужно из xmlx файла (Microsoft excel 2010) выполнить экспорт данных в ячейке в txt файл. Однако программа выдаёт ошибку "invalid outside procedure", ругаясь на строчку 2. Из-за этого я не могу...

Заполнение ячеек в Excel циклом for
Ячейки в Excel данным способом почему-то не заполняются. Почему? Как это исправить? Sub t() Dim teta As Double teta = 0 For i = 1 To i = 10 Cells(i, 1).Value = teta teta = teta + 0.25...

определение номера страницы в excel
при переходе в режим предпросмотра и после выхода из него можно (так же при задании областей) можно видеть, что в фоновом изображении Excel отображает номера страниц. подскажите, пожалуйста, где...

Как удалить строку всю?
В Эксель у меня строки с данными..... по номеру строки мне надо удалить всю строку....) есть команда такая или как?

Обработать ячейки таблицы, в которых содержатся цифры
Уже третий день не могу вникнуть в VBA в Word при работе с таблицами. Контрольная подвисла, время начинает поджимать, но нужно разобраться, а не банально копипастом все делать. Задание вкратце: В...

Реализовать в форме удобный выбор даты и времени
Доброго всем времени! Хочу реализовать в форме удобный выбор даты и времени. Есть несколько идей. 1. дата: - первый вариант сделать выпадающий список (comboBox) при нажатии на триугольник...

Выход из документа без сохранения.
Нужно закрыть документ без сохранения. К сожалению ничего неполучается. Private Sub Document_Close() Application.DisplayAlerts = True strPath = 'C:Моя директория' sName = ActiveDocument.Name ...

Информация о pdf файле
Добрый всем день Возник вопрос: из VBA подсчитать количество страниц pdf документа. Бросил на форму контрол. Документ просматривается. На закладке страниц видно, что их 64(страницы даже...

Перевод градусов в радианы
Суть проблемы: сто лет не программировал на языке макросов в Excel и нежданно-негаданно свалилось задание. В ячейку D8 вводится любое число градусов (от 0 до 360), оно должно автоматически...

Имя учетной записи компьютера в VBA
Друзья! Оооооочень много вариантов получения имени пользователя, однако почти ничего не нашел, как найти имя учетной записи компьютера. Дорогие профессионалы, отзовитесь и помогите в решении...

Очистка массива.
объявлен массив public mass_vopr(1 to 30) as integer. по ходу выполнения программы он заполняется значениями. Требуется в определенный момент очистить его и вновь продолжать с ним работать....

Как выделить текст по абзацам и разрывам строк в Word?
Помогите разобраться пожалуйста и написать макрос. Сразу признаюсь, что я не программист, хотя мне многое интересно. Очень часто приходится использовать выделение текста в ворде. Использую...

Visual Basic + Excel - удаление листа из книги
Прошу помощи. Имеется файл kat.xlsx (книга Excel) нужно из него удалить несколько первых листов, например 5. Вот так вот не выходит: Dim ob_exc As Object Dim ob_book As Object Dim ob_sheet As...

Как открыть книгу без выполнения макросов
Помогите открыть файл Excel vba, я туда вписала код: на закрытие программы

Ввести значение переменной в окне
Рисую k = InputBox("Ввести значение k:")Результата нет. Ввожу не важно что, получается k равно то ли бесконечности толи ещё чему, но не тому что я ввёл. Где тут камень? Пробовал проверять ввожу...

Перенос макроса из Excel в Goggle таблицы
Всем привет. Я ничего не понимаю в программировании. Искал макрос, который сделал бы 2 ячейки взаимосвязанными. Нашел... Но теперь мне нужно перенести его в Гугл таблицы. Вот Макрос: Private...

Замена запятой на точку
Совсем маленький "зацеп". Несколько лет назад все работало как положено. А сегодня перестало. Точку на запятую меняет. Все в порядке. По тексту: sB =...

Заполнение многомерного массива
Доброго времени суток, Помогите разобраться. Как заполнить двумерный массив после его объявления? '... Dim Arr(1 to 2, 1 to 3) as string Arr() = Array(("a", "b", "c"), ("d", "e", "f"))...

Combobox с поиском на VBA
Добрый день! Нужна ваша помощь. Недавно начал осваивать VBA по рабочей необходимости возникла задача и столкнулся с проблемой, что не знаю как ее решить. Задача у меня такая: Есть combobox,...

Поиск и замена текста Word из ячейки Excel
Здравствуйте. Стоит такая задача: Требуется создать папку с именем из ячейки эксель, копировать туда вордовский файл, открыть его, найти в нем слова "nomer" и заменить их на число из ячейки эксель....

Макрос сохранения в PDF по имени файла
Всем привет. Имею макрос сохранения Excel в PDF на рабочем столе Sub Export_PDF_Order() ActiveSheet.ExportAsFixedFormat _ Type:=xlTypePDF, _ Filename:="C:\Users\" &...

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

Ошибка Run time error ‘-2147417848 (80010108)’
Добрый день. Долгое время работал с макросом в Эксель 2010, ищущем дубли на листе: 1. в пустую ячейку столбца С, следующую за последней заполненной, вставляется слово, по которому идёт поиск...

Как записать значение в ячейку
Уважаемые! какой функцией сделать вывод не в окно, а в ячейку на лист. Set ra = GetQueryRange(URL$, "2") ' выполняем веб-запрос If Not ra Is Nothing Then Set c = ra.Columns(1).Find("Add*",...

Как написать макросы вычитания, умножения и суммы (integer) 2-х чисел
Помогите. Нужны макросы вичитания, умножения и суммы (integer) 2-х чисел

Узнать количество объединенных ячеек
Может кто подскажет как можно программно узнать количество объединенных строк или столбцов.

Сохранение вложения
Добрый вечер. По электронной почте приходят письма. Как написать макрос для почтовой программы Outlook 2013. Требуется, если письмо содержит хотя бы один файл вида 12_2тлд_НАЗВАНИЕ С...

Переменная String более чем 255 символов
возможно ли в переменную типа string проставить значение болие чем 255 символов

Перевод в двоичную систему счисления
Ребята учусь в Польше очень прошу вашей помощи... нужен сорц программы которая бы переводила из textbox число в другой textbox нормальное число в двоичной системе счисления.... если я правильно на...

Замена символов в строке (макрос)
Записать макрос для двух столбцов, который будет удалять следующие символы: * + - / = _ 111 : . срочно нужно учесть что данные представлены в виде ссылок(при двойном клике...

Найти минимальный и максимальный элемент массива
Как найти минимальный имаксимальный элемент?

Заполнение ячеек случайными числами
Поскажите пожалуйсто, каким самым простым способом можно забить ячейки случайными числами? К примеру, заполнить 50 ячеек (А1:Е10).

Управление приложениями посредством VBA
Доброе время суток! Кто-нибудь знает, может ли VBA управлять приложениями. Например, посредством shell метода запускаем приложение. Посредством SendKey эмулируем нажатие клавиш. А если необходимо...

Заменить один символ на другой на всех листах рабочей книги
Доброго времени суток! Помогите, кто в курсе. В excel нужен макрос замены одного символа на другой (к примеру замена буквы "ё" на букву "е" на всех листах) , устал пользоваться комбинацией Ctrl+H...

Округление в большую сторону, чтобы число заканчивалось на 9
Есть столбец А, в котором есть самые разные цены. Эти цены нужно округлить в большую сторону так чтобы, они заканчивались на 9 (столбец В). Можна ли это как-то автоматизировать и написать макрос....

Выполнить активное действие (чтобы компьютер не блокировался)
Какое действие нужно выполнять на макросе VBA, чтобы не блокировался компьютер? SetCursorPos не канает :). На некоторых виндах стоит такая штука, что через минут 5-10 простоя (не двигается мышь и...

Форматный вывод чисел.
Подскажите пожалуйста как нужно сделать так, чтобы при выводе чисел(числа) выводились 3 знака после точки?

Проверка наличия символа в строке + подсчет
Всем, Здравствуйте. Помогите разобраться в следующем примере Имеется таблица (excel 2003) с данными. Информация имеется только в первом столбце. Необходимо проверить имеется ли символ "!" в каждой...

Удалить повторяющиеся значения в одной ячейке
Помогите, пожалуйста, справиться с такой задачей. В ячейке массив слов такого вида: -слово1 -слово2 -слово3 -слово2 и т.д.. каким образом можно избавиться от повторений одних и тех же слов в ячейке?

Удалить столбцы с определенным заголовком
Друзья, пытаюсь найти макрос для чтобы удалять ненужные столбцы т.к. каждый день имею дело с таблицами содержащими более 100 столбцов - предыдущий работник делал все это вручную. Вот нашел...

Список файлов из папки.
Доброго времени суток уважаемые форумчане. Возник вопрос, как методами VBA WORD, в textbox на форме, при нажатии кнопки, вывести список файлов находящихся в определенной папке? Все файлы имеют...

Переключение между книгами
Открыты 2 книги. Одна - источник данных (название всегда разное). Другая - приемник. Название всегда "Книга1". Как переключиться с источника на приемник, понятно. А вот как обратно, если неизвестно...

Печать с использованием функции Shell
Sub Procedure_1() Const sPathApplication As String = "C:\Program Files\Adobe\Reader 10.0\Reader\AcroRd32.exe" Const sFilePath As String = "C:\Documents and Settings\Пользователь\Рабочий...

Запуск макроса при изменении ячейки
Как сделать, чтобы при изменении значения ячейки, запускался нужный макрос?

Пропал запрос на сохранение в excel
Добрый день. Пропал запрос на сохранение при закрытии отредактированного файла. Второй раз уже, первый раз полгода назад и нашел в поиске за пару минут. Сейчас же сижу уже полдня не могу найти где...

Копирование данных с сохранением формата исходных ячеек
Доброго времени суток. Совсем не разбираюсь в написании макросов, пользуюсь похожими... Возникла вот какая проблема. По команде от "кнопки" происходит копирование данных с листа "база корпуса"...

Сравнение данных 3-х ячеек и вывод данных в 4-ую
Всем доброго времени суток! люди добрый помогите плиз составить расчет... Пр: в 3 ячейках существуют числа... A1=7; B1=4; C1=11 в D1 необходимо поставить условие таким образом, чтоб при...

Перевести все буквы строки в верхний регистр в Word
Имеется документ Word. Нужно в Бэйсике, который вызывается в Ворде написать программу, чтобы 1. можно было увеличить весь текст заглавными буквами 2. уменьшить все буквы нижним регистром 3....

Передача массива в другую процедуру
Как передать массив в другую процедуру вот мой код выбивает ошибку Type mistmach Public Sub vvod() Dim i As Integer Dim p As Integer Dim n As Integer p = 2 Dim b() As Integer ReDim b(1 To 10)...

Как написать макрос на обновление данных из одной книги в другую
Как написать макрос на обновление данных из одной книги в другую, И можно ли НЕ указывать путь книг при написании макроса??

Преобразовать дату в число
Есть дата в переменной в формате «01.02.3088» как ее преобразовать в число 433941 ? То есть просто cells().numberformat = “@“. Но как это сделать в переменной, не изменяя ячейку?

ListBox - убрать выделение элемента
Нужно как-то убрать выделение элемента в листбоксе, ну чтобы он выглядел как изначально, когда в нём есть значения, но никакая линия из списка не подчёркнута. Нужно это чтобы когда я блокирую...

Джон Уокенбах. Программирование на VBA в Excel
Хотел выразить благодарность всем, кто помогает и дает свои советы в решении проблем по программированию. Вот ссылка на книгу размером около 8 мег. ...

Проверка диапазона на наличие значений в каждой ячейке
Добрый день! помогите пожалуйста с написанием макроса по следующему условию: есть небольшая табличка. наименование и несколько столбцов со значениями как сделать так, чтобы проверялось...

Работа с буфером обмена
Есть что-нибудь в WMI или Shell для работы с буфером обмена?

Обмен данными между Excel и Project
Всем здравствуйте. Возникла необходимость по желанию пользователя при нажатии кнопки в ms project выгружать данные в Excel. И обратная задача: чтобы при нажатии кнопки в Excel, данные переносились в...

Число e - как записать?
Как записать эту е? Добавлено через 6 минут Private Sub cmdWork_Click() Dim E As Single Dim qdx As Single Dim Mu As Single Dim Tm As Single Dim L As Single Dim Tn As Single

как добавить в ListBox
Есть лист из 3 столбцов, наименование, Ед.из, цена При поиске наименования в listBox1 появляются варианты совпадений. Как добавить в listBox1 вторую колонку с ценой? Что бы listBox1...

Как скрыть строку в Excel
Здравствуйте! Подскажите, как правильно скрыть в Excel строку по условию. Если значение ячейки 0, то скрываем, в противном случае, берем следующую и проверяем. Что-то сделал, но оно не работает...

Разрешить ввод в TextBox только цифр
у меня есть код ввода только цифр, при вводе буквы выходит ошибка, как сделать, чтобы выходило окно...к примеру, "Буквы нельзя!!" ?? Private Sub TextBox1_KeyPress(ByVal KeyAscii As...

Почему возникает ошибка "sub or function not defined"
Люди подскажите пожалуйста почему вскакивает ошибка "sub or function not defined" на строке №4 на фукции "PathFileExists(adres)" в файле1 Private Sub UserForm_Activate() dim adres as String ...

Создать календарь на Excel
Привет, прошу помочь мне в запутанной программе... Юзал поиск и нашел на этом форуме "Календарь на 1 месяц" Sub q() год = Range("E3").Value номер_месяца = Range("E4").Value Select Case...

Вывод сообщений на VBA в консольное окно
Коллеги, Странного хочу. Хочу выводить сообщения в консольное окно средствами VBA. На какие объекты/методы необходимо обратить внимание в первую очередь? Спасибо. BR

Как из Excel скопировать таблицу и вставить её как bitmap (картинка) в Outlook например в 10ой строке
Добрый день! Подскажите пожалуйста: как из Excel скопировать таблицу и вставить её как bitmap (картинка) в Outlook в заданной строке письма (например в 10ой) Т.е. делаю ежедневный отчет по...

Отмена действий, выполненных макросом
Ситуация: применил макрос. Макрос содержит 5 команд. Затем я понял, что применил макрос по ошибке. Как мне отменить все эти 5 команд? Как я поступаю в этой ситуации: я нажимаю на стрелку кнопки...

Макрос Word: вставить в конец документа строчку с информацией о документе
Нужен макрос, вставляющий в конец документа строчку с информацией о документе (путь, имя, дата открытия). Используемые объекты, коллекции, свойства, методы, функции: Paragraphs, Add, Range, Path, ...

Макрос преобразование цифр в слова
Всем привет. Подскажите есть ли макрос для MS Office 2007, который преобразовывает цифры в словесное написание денежных единиц? или что то наподобие! Например: 1 234, 56 (одна тысяча двести...

Какие параметры принимает "Cells"
Доброго времени суток! Начну с отмазки: задание дали, но теории никакой никогда не было. Задание во вложении. Набросал блок-схему для себя и нашел несколько примеров. Но собрать в единое целое не...

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

Преобразование файла CSV в XLS
Уважаемые знатоки, обращаюсь к вам с проблемой, беспощадно точащей моё сознание уже 5-й день. Заранее оговорюсь, что буду благодарен за ВСЁ по представленному ниже алгоритму: как за предложенные...

Как добавить собственный пункт в контекстное меню Excel?
Здравствуйте всем. Подскажите, пожалуйста, каким образом можно добавить собственный пункт в контекстное меню Excel. Спасибо. Вопрос администратору, у меня не работает поиск по форуму...

Построение графиков в Excel
Подскажите пожалуйста, такая задача. Необходимо построить график в Excel. Даны значения, например, 51 57 56 48 39 46 48 57 47 49. Пользователь вручную через RefEdit выделяет диапазон этих значений...

Выполнение действия в зависимости от значения ячейки столбца
Добрый день! Буду очень признателен, если кто-нибудь сможет помочь в решении относительно простой задачи. Есть таблица excel. Необходимо, чтобы выполнялось какое-либо действие, если значения в...

Как определить, что ячейка скрыта
Доброго дня. для перебора всех не пустых ячеек я использую цикл Do While loop например: Do While cells(i,1) <> "" ' операторы i=i+1 loop Данный цикл игнорирует ячейки скрытые автофильтром,...

Как определить номер недели по дате?
Подскажите, пожалуйста, пример запроса для определения номера недели, по дате? В странице excel для этого действия используется функция Weeknum. Существует ли аналог в VBA?

Как узнать размер только что созданного массива
Dim aDevice() As Variant Dim iDevice As Integer 'Проверяем наполнение массива If UBound(aDevice) > 0 Then Exit SubЕсли массив пустой, наполняем 'iDevice = WorksheetFunction.CountA(Range(''))...

Макрос - вставить число в следующую пустую ячейку
Помогите и мне с макросом: если вводить в ячейку F13 число, оно по средствам "макроса1" копируется в ячейку A2. Как сделать, чтобы при следующем вводе в ту же ячейку F13 другого числа, предыдущий...

Заполнить список combobox при загрузке формы
вот код: Private Sub UserForm1_Click() ComboBox1.AddItem "Беларусбанк" ComboBox1.AddItem "Белинвестбанк" ComboBox1.AddItem "Белагропромбанк" ComboBox1.AddItem "БПС-Сбербанк" End Sub ...

Импорт данных из Word'a в Excel, используя макросы
как импортировать данные из ворда в эксель при помощи макроса?? для начало я включил библиотеку (Сервис-ссылки) MS Word.. потом не знаю что делать... в Доке находится список людей: Новиков...

Создание проверки на ввод цифр в TextBox
В TextBox нужно чтобы вводились тока цифры, и чтобы если ввели неправильно можно было повторить ввод.... помогите плз)))

Какая функция в VBA выделяет целую часть числа?
Простой вопросик: какая функция в VBA выделяет целую часть числа? :)

Скопировать строку из одного листа в другой (Excel)
Не понимаю почему работат. Worksheets('Work').Range(Cells(2, 1), Cells(2, 14)).Copy Worksheets('Work').Range(Cells(31, 1), Cells(31, 14)).PasteSpecial,а Worksheets('Base').Range(Cells(2, 1),...

Поиск первой пустой ячейки в столбце А
Помогите, пожалуйста, новичку. Есть таблица, в которую постоянно вручную добавляются заполненные строки (от 1 до 10000), как макросом найти первую пустую ячейку столбца А, чтобы сделать вручную...

Закрашивание ячеек в зависимости от даты
Здравствуйте, имеется макрос, который закрашивает ячейки в зависимости от дат. Прошу помочь исправить код, так чтобы он ориентировался в зависимости от числа месяца начальной даты, то есть если...

Проверка гиперссылок в Excel на корректность
Здравствуйте. Столкнулся с необходимостью проверки гиперссылок на корректность. Возможно ли сделать так, чтоб макрос автоматически проверял рабочая гиперссылка или нет? Меня интересуют не ссылки...

Не округлять числа в некоторых случаях
Всем доброе время суток ! Относительно способов округления существует стандарт IEEE 754, арифметическое округлениу, бухгалтерское округление и другие виды округлений, которые применяются в своих...

Чтение и запись реестра Windows с VBA
Решил разобраться в теме: Чтение и запись реестра Windows с VBA Читаю с материалов сети: VBA предлагает функции GetSetting, SaveSetting, GetAllSettings и DeleteSetting для чтения и записи реестра...

Как скопировать диапазон ячеек с одной части таблицы в другую пользуясь средствами VBA?
Это наверно очень просто, но никак пока не получается. Как скопировать диапазон ячеек с одной части таблицы в другую пользуясь средствами VBA. Я сделал это через цикл, работает, но очень медленно....

Как генерировать случайные числа в VBA
Нужно как то генерировать случайные числа. Таймера в VBA нет, а функция RND генерирует одну и ту же последовательность. Какие есть идеи?

Проверить существование файла
Здравствуйте, коллеги. Мне нужно проверить существование файла, название которого не известно заранее. Известна только маска фала, которая задаётся приблизительно так: "объект_т" + MyName + ".xls" ...

Как проверить, в каком из Checkbox пользователь сделал выбор?
проблема вот в чем есть n-ое количество checkbox при виборе каждого дожна быть операция.... как поставить проверку на n-ое количество checkbox прикол с for n=1 to 12 if...

Как определить нажатую кнопку?
На рабочем листе Excel (не на форме) расположено N-ое количество управляющих элементов "CommandButton", поставленных на лист из Панели инструментов "Элементы управления", т.е. как OLEObject. Как...

Подсчёт листов в книге Excel
Можно ли составить программу в VBA чтобы она подсчитывала количество листов в книге Excel или же сама определяла номер последнего листа?

Как правильно удалить строку (Rows.Delete) (Решено)
Самое интересное, что метод Delete объекта Rows удаляет не указанную строку, а только первую её ячейку (как я понял). При чём, если строк множество, и их предполагается удалять перебором, то, как...

Частотность слов в word
Здравствуйте, уважаемые программисты! Нуждаюсь в Вашей доброй помощи. Моей девушке (лингвисту-переводчику) на последнем курсе ввели новую дисциплину "основы программирования", зачем это сделали для...

Как сделать автоматический запуск формы после открытия документа?
1. Как сделать автоматический запуск формы после открытия документа? 2. Как сделать автоматический запуск макроса после открытия документа? 3. Как сделать надстройку в меню? Подскажите как...

Исправить ошибку "Type Mismatch" в макросе
Доброе время суток.. При наладку 1с предприятия столкнулся с макросом который выводит бак код на весы.. В нем следуящая ошибка Private Sub CommandButton1_Click() Dim rc1 As Recordset Dim...

Не запускается макрос на другом компьютере
Всем доброе время суток! Написанные макромы работают. Однако проект с этими макросами необходимо разместить на другом компьютере. В данном случае проект необходимо разместить на ноутбуке. На...

Как обратиться к конкретной ячейке
Продолжаю задавать глупые вопросы. Уважаемые, используя метод Range обращался к ячейкам, например: name1 = Range("a1").Text name2 = Range("b1").Text name3 = Range("c1").Text ... Но тут возник...

Разделить содержимое одной ячейки на несколько ячеек по пробелу
Задача состоит в том что нужно разделить содержимое одной ячейки на несколько ячеек.Например "Стул 10*50*60" на отдельно Стул и 10*50*60.Как вариант хотел сделать столбец ну или таблицу с так...

Как передать значение переменной из формы в основную процедуру
Уже голову сломал: Как передать значение переменной из формы в основную процедуру VBA? Т.е. основная процедура вызывает форму, форма запрашивает текст и должна передать его в основную процедуру в...

Перенос данных из Excel в Word (на основе Word шаблона)
Пожалуйста помогите, приведите какой-то пример как организовать этот процесс нужно из определенных ячеек Excel'a, перенести данные в Word (на основе Word шаблона). Места подстановки данных в...

Свернуть/развернуть сгруппированные столбцы
Здравствуйте! Подскажите, пожалуйста, как макросом свернуть и развернуть сгруппированные столбцы(как бы нажать +-)? Макрорекордером пробовала-ничего не записывает.

Как создать новую книгу с заданным именем?
Как создать новую книгу с заданным именем? Например Sub CreateWorkbook() Set NewWorkbook = Workbooks.Add End Subсоздает книгу с именем по умолчанию, а как изменить имя, чтобы создалась не...

Перенос данных из Excel в Word с VBA
Есть некоторые данные в excel(на слайде 1 в ячейке a1(к примеру в ней написана фамилия человека)), и есть форма, на форме есть кнопка, при нажатии нужно чтобы из ячейки а1 на слайде 1 вытащились...

Как в коде файлы .xls сохранять в .csv
у меня их много я их последовательно открываю, обрабатываю и мне нужно сохранять их в ту же папку под тем же именем, но с расширением .csv вот так пробовала book.SaveAs FileFormat:=xlCSV ...

взаимодействие "if" and "or"
Ребята посмотрите пожалуйста где ошибка, вместо того чтобы удалять ячейки в которых нет 00 или 03 или 06 и т.д. Удаляется все. Sub aero2() Dim wsh As Worksheet Dim i As Long Dim...

Автоподбор высоты строки в диапазоне
Добрый день! Необходимо сделать следующее: Если какой-либо ячейке из диапазона A1:C50 количество символов > 17, то осуществляется автоподбор высоты данной ячейки, а другие остаются без изменения. ...

Запуск модуля из другого модуля
Возможно ли запустить весь модуль целиком из события формы? Sub Кнопка_Click() Module1 End SubПри ссылке на модуль выдает ошибку: https://msdn.microsoft.com/en-us/library/office/gg251600.aspx...

фильтр (vba excel)
Делаю фильтр на табличку. В первоначальном задании было достаточно просто, т.к. все укладывалось в автофильтр (1 запись - 1 строка). Но вот тз изменилось и теперь в исходной табличке МОГУТ быть...

Выделить из строки цифры
Помогите решить задачу. На запрос вводим строку из последовательности чисел и знаков препинания, например 10,30,500,400. Разделителем может быть любой символ отличный от числа. Задача выделить...

Как выделить определенные ячейки макросом?
Добрый день! Заранее простите за глупый вопрос. Есть массив ячеек (5-7 тысяч в столбце).Нужно выделить, допустим, каждую третью. Как это сделать? хотел записать макрос. получил в тестовом...

Верхний регистр заглавной буквы строки
Кто знает есть ли какая то функция регистра для заглавной буквы предложения (не слов) что бы не химичить с UCase и LCase?

Нахождение максимального элемента массива
Помогите, пожалуйста, составить программу на языке VBA, которая выводит максимальный элемент, и если таких элементов несколько, то определяет их количество в одномерном массиве ...

Перебор значений лотереи, контроль выпавших чисел
помогите пожалуйста решить задачу Перебор значений лотереи и когда выпадает 7 на экране отображается окно: "ваш номер 7, Вы выиграли!" нужно сделать задачу с операторами do...loop while и ...

Поиск одинаковых значений в столбце и копирование всех строк, содержащих эти значения
Всем доброго утра/дня/вечера! :) Может кто поможет мне,пожалуйста..А то я теряюсь пока еще в таких вещах:( Как осуществить в листе excel поиск в указанном столбце (указывается название столбца...

Макросы в отечественном ПО Р7-Офис
Президент поручил отечественным госкомпаниям с начала 2025 г. перейти на российские операционные системы и офисные пакеты. Требование о переходе на отечественные ИТ-решения было сформулировано в...

Сканирование штрих кодов средствами Excel
Здравствуйте! У меня на роботе возник вопрос ускорения перебора товара клиентам по накладной. Ну и в первую очередь что в голову пришло так это сканирование штрих кода. Уже есть небольшой макрос...

Увеличение значений в ячейках Excel
господа, помогите решить довольно простую проблему. в екселе имею длиииииный столбец чисел. мне необходимо увеличить значения каждой из этих ячеек на 10. т.е. просто прибавить 10 к каждому числу....

Импорт из Excel в Access
У меня есть данные в Excel, но я не знаю сколько строк и сколько столбцов есть в нем, мне нужно по нажатию кнопки, создать БД в Access и импортировать все данные в БД. и второй вариант. Я знаю...

Поиск непустой ячейки в столбце
Приветствую ! Понимаю, задачка смешная, но мне, как новичку очень нужна помощь :) Нужно написать функцию, которая будет возвращать значение первой непустой ячейки сверху. т.е., например, стоим...

Макрос на поиск и замены значения
Добрый день! Только начал заниматься макросами и вот столкнулся с проблемой Есть таблица со столбцами А B и т.д. нужно найти значение в ячейке Ai и заменить его на значение Bi. Помогите пожалуйста, с...

Нужно взять данные из другой книги в рабочий лист
Здравствуйте! у меня такая задача на рабочем листе в А1 номер листа, в В1 номер столбца другой (закрытой книги) листов в этой книге до 5 столбцов до 40 В С1:С5 надо занести даннные...

Как в VBA сделать формат ячейки текстовым?
Подскажи пожалуйста, как в VBA сделать формат ячейки текстовым, а то при записи '1.' в ячейку отображается '1'?

Обсуждение учебников, справочников, самоучителей по VBA
Эта тема для обсуждения литературы по VBA, представленной в теме https://www.cyberforum.ru/vba/thread432513.html, а также для обмена опытом по обучению и самообучению Pifan, если вы с нуля...

Форма для ввода, поиска и редактирования таблицы excel
Всем хорошего настроения! Есть таблица, сделал форму для ввода данных. Необходимо чтобы при вводе данных в TextBox1 происходил поиск из первого столбца и после соответствия выводил в Textbox2 и...

Ошибка Класс не зарегистрирован
Привет! В access при запуске макроса на одном из пк появляется ошибка класс не зарегестрирован, указывает на строку currentProject.connection...как исправить?

Argument not optional
Обьявил функцию: Function searchThrowWorksheets(machineNumber As Integer) когда вызываю её: montant = searchThrowWorksheets(number) выскакивает "Argument not optional". переменная number...

Поиск одинаковых строк в 2 разных таблицах
Доброго всем вечера. Возникла такая ситуация, необходимо в большой таблице (12 тысяч записей), найти совпадения строк со 2 таблицей(100-1000 записей), и пометить одинаковые строчки каким либо цветом...

Макрос для переименования файлов
Привет, есть таблица, в 1й столбце - путь к файлу, который нужно переименовать, 2й столбец - новое имя для этого файла. Нужен макрос, который будет присваивать каждому файлу из 1го столбца новое имя...

Тест VBA
Помогите плз доделать тест 1. Каких типов данных не существует в языке VBA: variant case longint singl 2. Каких типов данных не существует в языке VBA: complex

Прочесть буфер обмена
Здрасьте! Как в VBA сделать субж? Сенк!

Как выделить диапазон строк?
нужно выделить несколько строк Rows('1').Select - ok Rows('1:24') .Select- ok Rows(Count * 70 + 10).Select - ok Rows(Count * 70 + 10):(Count*70+10+69).Select - Error

Защита книги и макрос
Добрый день уважаемые форумчане. У меня довольно интересный для меня вопрос, если допустим поставить на книгу пароль на открытие стандартным способом через "Сервис" и т.д., можно ли при включении...

Подсчитать в строке количество вхождений букв b, k, t
Помогите, пожалуйста. нужно срочно написать макрос для WORD 2003 sp3 : Дана символьная строка. Подсчитать в ней количество вхождений букв b,k,t. Нашёл подобную прогу для поиска буквы "а", но при...

Выделение цветом активной ячейки в Excel
В Excel активная ячейка выделена границей – как выделить ее цветом? Имею ввиду, что при нажатии Enter, мышки и т.д. ячейка меняет цвет на заданный, а в предыдущей востанавливается цвет фона

Открыть\закрыть текстовый файл
здравствуйте если открываю так: Dim ProcID As Long Debug.Print Папка & File ProcID = Shell("notepad.exe" & " " & Папка & File, vbMaximizedFocus) тогда открывает Блокнотом, а как открыть...

Run time error 91: Object variable or With block variable not set (не могу найти ошибку)
Уважаемые форумчане! Пожалуйста посмотрите файл. Подскажите в чем ошибка. В комбобоксе выбираю какой либо номер, делаю изменения в текстбоксах (или без изменений) пытаюсь сохранить и вылетает эта...

Перенос данных из одной таблицы в другую
Здравствуйте! Помогите пожалуйста. Задача состоит в следующем: есть 3 xl книги (ИТОГ, май ОО и ОТС), нужно перенести данные (столбцы : план 2011 (наша заявка), кз и авансы) 1го листа из таблиц ОО и...

Функция ВПР для определенного цвета ячейки
Всем привет! Пишу макрос с участием функции ВПР чего я пытаюсь добиться от него: если ячейка Cells(10, 5) закрашена в определенный цвет (255 255 153), то формула ВПР ищет в этой ячейке искомое...

Инициализация формы и Listbox
Доброго всем дня. Есть форма с listbox. При инициализации выполняется такой код: Private Sub UserForm_initialize() Call GetProcess2Listbox me.lbProcess.ListIndex = 0 MsgBox...

Внезапная ошибка Error in loading DLL
Прошу помощи! Есть (или был) длинный код, который с большим скрипом писал несколько недель. Сейчас открываю документ, а мне Excel выдает ошибку "Error in loading DLL", а лист, на котором было...

Возможно ли создать .exe файл для формы созданой в Excel с применением VBA?
Помогите пожалуйста!!! :cry: Я создала тестовую оболочку с помощью VBA в Excel, можно ли создать .exe файл таким образом, чтобы програма-тест открывалось не на фоне робочей книги, а как отдельное...

Количество уникальных значений по условию
Привет, всем! Столкнулся со следующей проблемой: требуется подсчитать кол-во уникальных значений в одном столбце, если в соседнем столбце значение удовлетворяет определенному требованию. Желательно...

Используя метод intersect добиться чтобы при изменении одной из ячеек, остальные пересчитывались автоматически
Добрый день! Никак не могу сделать следующее: Есть 3 ячейки. При вводе значения в ячейку 1, ячейки 2 и 3 пересчитываются по формуле, которая использует значение ячейки 1. При вводе значения в ячейку...

Название месяца в число
Есть строковая переменная strMonth="февраль". Есть ли какая-нибудь стандартная ф-ия vba преобразования в цифру?, в данном случае 2

Заполнить массив из 100 элементов случайными числами
Задание: Заполнить массив из 100 элементов случайными числами от 0 до 1000. Отсортировать массив, организовать поиск числа в массиве.:help: Решение: Dim x(100) As Integer For N = 1 To 1000...

Ошибка: Run-time error '5', Invalid procedure call or argument
Вообщем сделал программу всё работала пока не дописал выражение до конца и тут бах ошибочка. Вот код: Private Sub CommandButton1_Click() a = CInt(TextBox13.Text) Worksheets(1).Range("B1").Value...

Перевод из двоичной системы счисления в десятичную
помогите пожалуйста)

Макрос не сохраняется при закрытии книги
итак, у меня пару вопросов, уважаемы эксперты. Во-первых, почему когда я создаю макрос, после закрытия-открытия файла он исчезает, может куда нажаь нужно??? Во-вторых, я не знаю точно как сделать...

Как рассчитать количество дней между двумя датами
Помогите пожалуйста, как в vba рассчитать количество дней между двумя датами?

Как узнать количество строк в запросе?
Dim rst as object Set rst = docmd.currentdb.openrecordset("Select * From Клиенты") 'перехожу на последнюю запись rst.movelast 'получаю номер строки Msgbox rst.recordcount

Объединить значения ячеек
здравствуйте, у меня вопрос, как в excel сделать объединение ячеек? пример: |раз|два|три| |раз|два|три| |111|222|333| |раз|два|три| |раз|два|три| |one|two|three| |раз|два|три| надо что бы...

Как распаковать ZIP-файл в 7z?
'При помощи VBA WinRAR распаковывает архив в папку … q = Адрес_сохранения_файла 'путь к каталогу, то есть к папке, в конце пути для распаковки должен присутствовать обратный слеш b =...

Простой парсинг строки в Excel, поиск значения после символа
Здравствуйте, подскажите пожалуйста, как можно решить такую задачу: В таблице Excel есть столбец со строками вида: «ЭРТ №2 Такой-то край, Такой-то район, в/г ВоенныйГородок № 42 Кот 174...

Перенос данных с одного листа на другой в Excel
На первом листе есть данные. При активации следующих листов проверить наличие данных в этих листах. Если данных на листе нет, то скопировать их с предыдущего листа. Притом, при выполнении макроса,...

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

Вызов надстройки через VBA
Здравствуйте. Очень нужна Ваша помощь. Задача следующая: В VBA для Excel 2003 необходимо написать макрос с использованием (вызовом) уже существующей надстройки. Какой командой в VBA можно...

Перейти на другой лист и при нажатии кнопки распечатать его содержимое
Ребят, помогите пожалуйста с заданием, очень нужно! Как создать макрос в VBA??! такой,чтобы при нажатии этой кнопки (создаем кнопку в экзель) я смогла перейти с первого листа в экзеле на второй...

Окно MsgBox с закрытием через время
Добрый день форумчане. У меня вопрос, как можно реализовать MsgBox, который либо можно нажать стандартно пользователем через "Да" допустим и одновременно сам же MsgBox может автоматически нажать...

Обойти сообщение об обновлении связей?
Привет! Вопрос в заголовке, при открытии файла об обновлении связей надо ответить 'Да' без сообщения Excel-я. Спасибо

Закрытие сторонней программы средствами VBA
Доброго времени суток)) Прошу не пинать, ибо не являюсь программером на VBA Но мое искреннее любопытство взяло верх... и так, что требуется: Set WshShell = CreateObject("WScript.Shell") ...

Wrong number of arguments or invalid property assignment (Error 450)
При выполнении этой программки вылетает вот такое сообщение: Wrong number of arguments or invalid property assignment. В чём проблема? Строго не судите, изучаю VBA аж второй день)

Ошибка "Expected: =" при вызове функции
День добрый! Давно не работал с VBA уже все подзабыл. Есть такой код Function SplitTextFile(ByVal filename$, ByVal MaxRowsCount&, ByVal Delimiter$, _ Optional ByVal...

Выпадающий список, отфильтрованный по введенным буквам
Здравствуйте, нужны советы, подскажите с чего начать, чем пользоваться в таком вот деле: Каждый день создаю документ, в котором указываю фамилии людей и виды работ, которые они будут делать за...

Добавление подписи в сообщение Outlook
Доброе время суток! Прошу помощи. Есть необходимость добавить в создаваемое сообщение подпись, используемую по умолчанию в Outlook'е. Т.е. макрос создает письмо (тема, кому и т.п.). все...

Удалить дубликаты
Уважаемые знатоки VBA. Каждый из вас наверняка встречался со следующей задачей: есть столбец с данными. В этом столбце есть дубликаты т.е. повторяющиеся значения. Задача: с помощью VBA удалить...

Можно ли получить остаток от деления
Есть задача. К примеру число 12400 нужно разделить на 12000 и 400 при делении на 500 (как-то не по русски, но должно быть понятно из примера). Примеры 12400 / 500 = a=12000...

Макрос на загрузку текстового файла в таблицу Excel
Есть макрос для загрузки текста из текстового документа в таблицу эксель, изначально выполняется. Sub Main() Dim TextLine As String Dim myRow Dim myCount Open "Z:\Filename.txt"...

В выделенном фрагменте Word убрать все лишние пробелы.
Помогите решить задачу. Практически ничего не шарю в VBA. В выделенном фрагменте русскоязычного документа текстового процессора Word убрать все лишние пробелы между словами (оставить только по...

Макрос в Word, сохраняющий документ в папку
Помогите, пожалуйста, написать макрос. Ситуация следующая: есть экселевский файл, включающий в себя список фамилий и соответствующих регионов, из которого берется информация для полей в вордовском...

На New MSComm получаю ошибку ошибка 429 ACtiveX component can't create object
Здравствуйте, что-то на строке Dim MSComm1 As MSComm Set MSComm1 = New MSComm 'стал получать ошибку ошибка 429 ACtiveX component can't create object В то же время библиотека Microsoft Comm Control...

Как подсчитать количество значений в столбце?
Доброго всем времени суток. Как программно подсчитать количество значений в столбце?

Run-time error '1004'
Камрады, Постепенно схожу с ума. Пытаюсь в Excel средствами VBA скопировать лист целиком из одной книги в другую. Вот код: Option Explicit Sub Main() Dim oRptWorkBook As Workbook,...

Удалить все листы кроме первого
Sub Dell_all() Application.DisplayAlerts = 0 Dim i As Integer For i = 2 To Worksheets.Count Worksheets(i).Delete Next i Application.DisplayAlerts = 1 End Sub Удаляет все парные...

Создание теста VBA Excel
Приветствую уважаемые форумчане! У меня курсовая работа по VBA, которую нужно сдать на предстоящей неделе, в связи с чем вынужден просить помощи, так как сам мягко говоря - ничего в этом не смыслю....

Нахождение максимального из двух чисел
Подскажите, пожалуйста, как написать программу, находящую из двух чисел максимальное? Программа должна использовать функцию Abs. Заранее спасибо!

Как сохранить в csv utf8 кодировки файл из exсel?
Как сохранить в csv utf8 кодировки файл из exel?

Удалить всю строку, если определенная ячейка пустая
Добрый день! Нужен макрос, который будет удалять всю строку, если ячейка в столбце "А" пустая.

Подключение к БД access через VBA excel
Private Sub CommandButton1_Click() Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0ata Source=C:\Users\CHESTER\Desktop\2-ÀÒÏ-1...

Как изменить размер шрифта
как изменить размер шрифта в формате оси ???????.очень нужно в курсовой работе.помогите пожалуйста.дайте коды на это

Разработка для Excel (суммирование положительных и отрицательных чисел)
Всем добрый день, есть ко всем огромнейшая просьба. Есть таблица в Екселе, нужна программа для суммирования значений ячеек одного столбца. Например в столбце Е имеются значения -5, 10, -11, 12, нужно...

Отправить письмо используя Thunderbird
Добрый день! Пытаюсь сделать макрос чтобы отправить письмо через Thunderbird, нашел такой код Sub SendEMail() Dim FullStr As String FullStr = "C:\Program Files\Mozilla...

Место символа в строке
Как узнать на каком месте в строке стоит определенный символ? Ну например, дана строка "аывраводлго", как узнать на каком месте здесь стоит буква "о"

Поиск символа в строке
Здравствуйте. Мне необходимо проверить выделенный фрагмент текста на наличие в конце точки. Если эта точка есть, то ее необходимо убрать. Помогите, пожалуйста! Все что есть у меня в программном...

Копирование значения ячейки, а не формулы
Проблема в следующем, что надо сделать с ячейкой excel чтоб при копировании копировалось значение а не формула и наоборот. Специальная вставка не поможет!! Копирование происходит по нажатию кнопки из...

Определить количество отфильтрованных строк
проблема следущего характера работа с несколькотысячными строками, среди которых определенным запросом отфильтрованны необходимые значения, при помощьи автофильтра необходимо чтобы макрос работал...

Штрих код в кодировке Code 128. Расчет контрольного числа
Есть стандарт способ создания штрих-кода. 'Строка штрих-кода в кодировке Code 128 Public Function Code_128(A As String) As String Dim BCode(0 To 1023) As Integer Dim BInd As Integer ...

Как убрать расширение файла, и отображать толко имя файла?
Подскажите как убрать расширение файла? грубо говоря имеем: dim a as string a = fail.name "a" отображается как "****.txt" как сделать, чтобы отображалось только само имя файла? - "***" ??

Поиск файла в папке по тексту из ячейки книги
Добрый день форумчане. Прошу помощи у Вас. Задача следующая: Есть папка на диске С, в ней файлы xls. В ячейке L1 рабочей книги находится текст который является частью названия файлов в папке на...

Поиск картинок в документе Word
1)Как получить список всех картинок что есть в документе? 2)Как бы перетащить такой найденный объект-картинку в PowerPoint презентацию? Мне говорили что есть какой-то метод для "переприсваивания"...

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

Отображение текста в строке состояния
Подскажите, пожалуйста, как исправить макрос, чтобы текст в строке состояния изменялся при открытии рабочей книгии или листа? Sub ChangeStatusBarText() Application.StatusBar = "Как надоело...

ComboBox, как обратиться к списку по индексу
Здравствуйте, как будет пятая запись, пятая строка в ComboBox q=5 MsgBox Me.ComboBox1.ListIndex(q) MsgBox Me.ComboBox1.Item(q) Как порядочный в коде точку ставил, выбирал ... не выбирается ...

Обращение к листу по его кодовому имени
Народ помогите пожалуйста, не могу понять как обратиться к листу по его кодовому имени через переменную т.е. если написать Private Sub CommandButton1_Click() Лист3.Cells(1, 1) = "er" End Sub...

Как закрыть Excel из макроса без сохранения документа?
Надо закрыть Excel - само приложение из макроса без сохранения документа. Как это обстряпать?

Программное добавление элементов в пользовательскую форму
Доброго времени суток! Есть пользовательская форма (см. вложение). Стоит нетривиальная задача (во всяком случае для меня). :) Нужно сделать так, чтобы при изменении значения в текстовом поле...

Как макросом выполнить F2+Enter для диапазона ячеек?
Добрый ночер всем. Нужна помощь по сабжу. Excell 2013. Есть столбец, в котором каждая из 10 тысяч ячеек имеет "не введенную" формулу, то есть визуально содержимое всех ячеек (активные\не активные)...

Проверка существования каталога или файла
Какой функцией узнать существует ли файл или каталог?

Перебор листов
Добрый день. На одном из форумов нашел интересный макрос. Он из группы файлов переносит все данные, проходя по всем листам. Работает он без проблем. Но мне необходимо чтобы он начинал перебор со...

Выбор даты в календаре
Помогите кто-нибудь ! Как сделать, чтобы при нажатии кнопки выходил календарь и можно было бы выбрать нужную дату и она помещалась бы в TextBox ? ZandR

Макрос: замена текста во всем документе
На просторах интернета нашел вот такой макрос Sub FindInStories() Dim myStoryRange As Range For Each myStoryRange In ActiveDocument.StoryRanges With myStoryRange With .Find ...

Исправить ошибку "Out of memory" при многократном (цикличном) использовании массива
Программка многократно обновляет массив В результате возникает ошибка out of memory Наполняю массив командой mX = Range(Cells(1, 1), Cells(N, 15)).Value где N может быть равно 50000-100000 и...

Поиск файла в папке
В папке с:\отчеты лежат отчёты по дням: "отчёт за 16.05.2017".xls "отчёт за 15.05.2017".xls "отчёт за 14.05.2017".xls И т.д. Пишу макрос, который будет искать по маске: "отчёт за " & Date -...

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

Всплывающие подсказки
Как сделать всплывающие подсказки к элементам управления на форме?

TextBox VB Word 2007
Доброго времени суток! Подскажите пожалуйста я создала пользовательскую форму в которой есть TextBox и присвоила переменной текстовое значение из него: strFIOText = TextBox1.Text А вот как...

Как сделать скоростное многостраничное сканирование (twain или wia)
word: макрос: как сделать скоростное многостраничное сканирование (twain или wia) Макрос многостраничного сканирования простой. Надо чтобы диалог сканера twain или wia не закрывался после каждого...

Как убрать крестик на UserForm?
Есть UserForm, есть кнопка выхода из формы, но надо убрать крестик в правом верхнем углу....чтобы выход из формы осуществлялся только по кнопке........возможно ли это в VBA?

Суммирование по условию
Доброго дня, уважаемые. Подскажите, не могу сообразить, как просуммировать изменяющийся диапазон по условию. Что вроде суммесли. Условие подразумевается вводить через InputBox, а результат выводить...

Фильтрация в Excel с несколькими критериям
В одном из листов книги Excel содержатся данные, третий столбец которых содержит значения дат. Необходимо через VBA задать фильтрацию данных таким образом, чтобы были выбраны все строки, в которых...

Excel 2007. Перенос ячейки на одну вправо/влево
Добрый день. Делаю очень большой древовидный список в Excel. Часто приходится перетаскивать ячейку на 1 вправо. A1 -> A2, B3->B4 и т.д. Можно ли как-то делать это действие горячими клавишами?...

Соединение нескольких файлов в один
Всем привет. Прошу помощи. Имеем 30 файлов эксель одинаковой структуры (разное только количество строк) их нужно собрать в 1 эксель фаил. Помогите пожалуйста. Заранее огромное человеческое спасибо....

Печать указанных страниц в Excel
Необходимо написать макрос, который бы позволил выводить на печать не диапазон страниц с ... по ..., а конкретно указанные страницы, например - 1,5,6,8 ... и т.д. Делаю разметку страниц, номера...

Записать содержимое ячеек в масив
На форме задается диапазон ячеек в экселе, например А2-А7. Как записать все содержимое этих ячеек в массив?

Макрос сортировки по возрастанию построчно в области
Ребята выручайте - нужно составить макрос EXCEL для построчной сортировки - к примеру есть некая матрица(область) данных из 3 строк и 5 столбцов .............. 0 12 4 8 9 3 6 2 14 7 18 5 9 0 4...

Как в word-е перейти в начало определенной строки, если положение курсора не известно?
Как в word-е перейти в начало определенной строки, если положение курсора не известно?

Надо закрыть через VBA Excel ,без сохранения и без выскакивания запросов на сохранеие
Помогите чайнику.Надо закрыть через VBA Excel ,без сохранения и без выскакивания запросов на сохранеие

При запуске макроса выпадает сообщение "Compile error in hidden module: Module1".
При запуске выпадает сообщение "Compile error in hidden module: Module1". Что делать, догадываюст что нужно подключить какую то библиотеку, но как? Проект защищен паролем и вообще его нужно как то...

Динамическое создание кнопок на форме
Всем привет! Для начала хочу сказать, что давно читаю ваш форум - очень многие темы сильно помогли. Но сейчас хотел бы попросить совета: В этой теме описано как создавать динамические кнопки и...

Определить номер столбца
Добрый день! Подскажите, как определить номер столбца в выбранном диапазоне (диапазон выбран через InputBox) VBA Выбранный диапазон в моем случае это 1 строка и несколько столбцов от 2 до 5. Мне...

Макрос, который фиксирует дату и время запуска и создания каждого нового документа в MS Word в отдельном txt файле
Доброго времени суток. Столкнулся с проблемой создания макроса для Word`a на MS visual basic for applications. Суть макроса должна быть в том, что при запуске непосредственно Word`a, а так же при...

Как копировать диапазон ячеек из одной книги в другую
Добрый день! Подскажите как копировать столбец одной таблицы в другую таблицу расположенную в другой книге? Проблема в том, что порядок столбцов и размеры таблиц всегда разные. Пробовал сделать это...

Макрос для подстановки символов в словах
Здравствуйте, всем. Подскажите как написать макрос для Word, который будет в каждом слове текста вставлять символ, определенного кегля. Символ вставляется в любом месте слова после первой буквы и...

Закрытие формы
Создаём форму. Закрыть её можно, просто кликнув по крестику в правом верхнем углу. Но правила хорошего тона требуют предусмотреть кнопку закрытия, при этом надо прицепить к кнопке Обработчик Клика....

Макрос автофильтра "содержит"
Здравствуйте. Экселевский макрос автофильтра "равно" с подстановкой значения фильтра из ячейки А1 имеет вид: Sheets("Лист1").Select Selection.AutoFilter Field:=1, Criteria1:= _ Range("A1").Value,...

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

Организация быстрого поиска данных на листе Excel
Привет, ребята! У меня возникло затруднение при решении следующей задачи. Для быстрой обработки данных мне необходимо в макросе (Excel) задействовать встроенный механизм поиска - тот, что...

Как создать нумерованный список?
Добрый вечер. Обыскал все что можно. Почитал инфу о работе с вордом, но не нашел как создать список. Прошу помощи) Пример: 1) пункт 1 2) пункт 2 3) пункт 3

Как выделить столбцы в Excel VBA
Существует способ выделить строки Rows("1:1").Select хотелось бы таким же путем выделять столбцы. Что-то типа Columns(кол_начальное& ":" &кол_конечное).Select где кол_начальное и...

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

Макрос "нажатие кнопки" на веб странице
Здравствуйте. Есть код со страницы <A href="?pool=0">0</TD> <td>st3333</td> <td></td> <td>1FjPnC ... f3wkr6</td> <td>Alive</td> <td>494 / 5</td> <td>1.00%</td> <td><form name='pselect'...

Как строку преобразовать в массив посимвольно?
Как строку преобразовать в массив посимвольно?

Как скопировать лист Excel из одной книги в другую
Подскажите, пожалуйста, как скопировать целиком лист из одной книги в другую со всеми разделителями страниц, существующим форматом полей и т.д.?

Изменение настроек выбранного принтера Excel из VBA
Задача: Изменение настроек выбранного принтера Excel из VBA. Определимся с условными названиями: Принтер Windows - Принтера из Пуск -> Панель управления -> Принтеры Примнет Excel - Excel ->...

Вставка gif-файлов, изображающих анимацию
Тихвинский В.И. ВСТАВКА В WORD GIF ФАЙЛОВ ИЗОБРАЖАЮЩИХ АНИМАЦИЮ В документ Word возможно вставить интерактивные файлы Gif. Недостаток в том, что работать они на ранних версиях программы будут в...

Удаление строки с определенным порядковым номером по всей книге excel
Уважаемые программисты, помогите пожалуйста! Как удалить строку с определенным порядковым номером по всей книге excel?

Как определить тип данных в ячейке
Есть объект Range (фактически столбец листа Excel), как определить тип данных в каждой из ячеек?

Макрос вместо функции ЕСЛИ
Здравствуйте! Помогите пожалуйста написать макрос вместо функции ЕСЛИ. Нужен именно макрос, для программы обработки прайсов. Нужно сложить значения двух ячеек (из разных колонок), и если результат...

Форма ввода данных в таблицу
Доброго времени суток! Но форуме в первый раз, так что извините, если что не так. Мне нужно быстро заполнять таблицу в экселе, через гуглпоиск нашла, что это надо сделать форму ввода и через...

Добавление CheckBox на форму Excel
Здравствуйте! Необходима помощь с реализацией процедуры, которая позволяла бы при инициализации формы добавлять на нее элементы управления CheckBox'ы по следующей схеме: Наличие CheckBox'a...

Как разделить столбец по первому пробелу?
Добрый день! Есть таблица в Excel. Нужно каким-то образом разделить данные по первому пробелу, чтобы в первом столбце осталось то, что было до первого пробела, а во втором - все остальное. Сейчас...

Замена точки на запятую в столбце
записывался макрос, который во всём столбце заменяет точку на запятую: Columns("J:J").Select Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _ SearchOrder:=xlByRows,...

Номер строки последней заполненной ячейки в заданном диапазоне
Всем доброго времени суток. Помогите наладить код по определению номера строки последней заполненной ячейки в заданном диапазоне. При пустом списке и при наличии нескольких записей - ОК, а при...

Как прибавить к дате месяц?
VBA Есть какое-то ComboBox2.Value - дата в формате dd.mm.yyyy как получить значение на месяц больше, т.е. dd.mm+1.yyyy Помогите, кто знает!

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

Проверить, содержит ли строка символы, отличные от цифр и точки
Помогите плиз!!! Заранее благодарен!:)

Ограничение ввода в TextBox: только цифры, точки и запятые
В TextBox нужно чтобы вводились только цифры, точки и запятые. И чтобы если ввели неправильно можно было повторить ввод.... Помогите пожалуйста

Как разбить огромный csv файл
Добрый день, помогите решить задачу: есть ексель файл на 5000 строк и есть огромный csv файл на 1,16 Гбайт, нужно найти совпадающие значения в этих файлах пробовал через функцию ВПР находится все до...

Перебор открытых книг
Просьба помочь с задачкой. Имеется несколько открытых, но не сохраненных книг Excel (открыты они в разных окнах), которые генерируются некой системой. Требуется всех их сохранить и закрыть. Для этого...

Макрос для сохранения слияния
Всем привет! всю историю описывать не буду... но на текущем этапе у меня есть файл в экселе (ДБ) к нему методом слияния подключено 3 файла word (Договор, Акт, Накладная). Есть макрос в word,...

Есть ли встроенная константа Пи
Ребят, подскажите неужели в вба нет встроенной константы Пи? пробовал и Pi и Math.Pi - нифига... Может как-то по-другому?

Как внести данные в книгу Excel, не открывая окно с книгой?
как в приложении VBA открыть для записи и чтения файл Excel, чтобы окно с этим файлом не появлялось на экране?

Повернуть все изображения в word
Подскажите, пожалуйста, как решить следующую задачу. В документе word много рисунков, необходимо повернуть каждый рисунок на разный градус, но не более чем на 90. При достижении, например, 85...

Перенос данных из одной книги в другую по условию
Здравствуйте! Пытаюсь решить задачу. Пока не очень получается. Есть две книги. Допустим их имена 1.xlsx и 2.xlsx Задачка: в обоих таблицах есть по одному столбцу(столбец "A"), в котором...

Определить день недели определенной даты
Товарищи! подскажите пжлст как определить день недели случайной даты, например 01.01.2016? VBA

Надстройка: Macro Tools VBA – инструменты разработки макросов VBATools
Добрый день! Представляю надстройку: Macro Tools VBA – инструменты разработки макросов VBATools Цели данного блога: 1. распространение надстройки MacroToolsVBA 2. улучшение функционала...

Обращение к определённому листу и чтение из него ячеек
Подскажите, как обратиться к определённому листу и прочитать из него нужный массив ячеек и потом это всё перенести на активный лист ?

Рисование в VBA
Подскажите пожалуйста можно ли в VBA на UserForm рисовать линии, круги...Если да можно хоть пару примеров рисования линии.....Буду благодарен за помощь.....

Закрыть документ
Коллеги, добрый день. К сожалению, не знаю VBA, потому с простой задачей вынужден обратиться к Вам. Есть статичный документ. Требуется макрос, закрывающий Word (целиком, а не только документ),...

Ошибка в VBA object doesn't support this property or method
Всем добрый день подскажите в чем ошибка object doesn't support this property or method error 438 вот скрин подскажите что не правильно

Решение системы уравнений
Доброго времени суток всем. Дана система уравнений и некоторые указания в методичке, по образцу надо построить решение. Но на определенном этапе у меня просто вылазит ошибка и почему - я просто не...

Как суммировать данные с разных книг Excel в одну таблицу
Уважаемы гуру VBA помогите новичку не провалить задание.:cry: Дело в том, что с разных отделов ( около 40) мне шлют заполненную таблицу Excel, универсальную для всех. Разница лишь в цифрах, которые...

Открытие двух книг одновременно. Workbooks
У меня 2 книги, нужно из одной ячейки первой книги перенести содержимое во вторую книгу в опр. ячейки. Как я себе это представляю. Открываю 1ю книгу, ищу инфу, пихаю это все в переменные, открываю...

Если количество символов в ячейке меньше чем нужно, выделить ее цветом
Подскажите, как с помощью VBA-макроса (excel) выделить цветом ячейку, если количество символов в ней меньше, чем нужно? Для примера - имеем столбец A: 08:57-18:11 08:59-18:08 08:58-18:09...

Работающие часы в ячейке листа Excel
Подксажите как сделать самостоятельно обновляющиеся часы в ячейче при условии, что никаких событий не происходит. Т.е. просто в открытом окне Excel в ячейке идут часы.

И опять работа только с видимыми ячейками
Доброго времени суток всем) Хочу после применения автофильтра занести в массив только видимые ячейки otfil = Range(Cells(10, 1), Cells(last, 1)).SpecialCells(xlCellTypeVisible) Но,проблема...

Вопрос.Почему иногда вместо слов появляются знаки вопроса??
Здравствуйте ребята! Может кто знает, из-за чего в комбинированных полях, зачастую (не всегда), вместо внесенной туда информации вылазит строка, состоящая из одних знаков вопроса?после перезагрузки...

Копирование макросом из одного файла эксель в другой
Здравствуйте, подскажите что в моем коде не так? Написал макрос который: копирует данные из одной книги и вставляет в другую. Sub копия() Application.ScreenUpdating = False ...

Модификация колонтитула в VBA Word?
Добрый день! Подскажите, пожалуйста - как вставить нужный текст в колонтитул документа Word. Т.е., есть готовый документ Word с одинаковыми верхним и нижним колонтитулами на всех страницах -...

Метод Delete из класса Range завершен неверно
Доброго времени суток! Имеется следующий код: If NewWb.Sheets(j).Name = "Прайс-лист" Then NewWb.Sheets(j).Range("A10:I12").Select Selection.Delete ...

Как отключить перерасчёт и вычисления формул книги, перед её сохранением
Здравствуйте форумчане! Подскажите пожалуйста как отключить перерасчёт и вычисления формул книги, перед её сохранением. Книг много, а когда начинаешь сохранять, то просиходит перерасчёт формул. В...

Не работает ActiveSheet.Paste: "Метод завершен неверно"
Добрый день. сгенерировал код при помощи записи макроса: Range("Таблица_Запрос_ec_sql0101").Select Selection.Copy Application.CutCopyMode = False Sheets("Лист2").Select ...

Error 9: Subscript out of range
Здравствуйте, прошу помочь -- при запуске программы возникает ошибка "Subscript out of range " на строке f(i) = Mid(alf, i, 1). В чём причина? Sub z11() Dim f(), alf, sl As String Dim i, l...

Создать копию листа и переименовать его
нужна помощь. у меня есть таблица 10 строк. столбцы - ФИО, дата рождения, гражданство. я сделал так, что первая запись переносится на другой лист с названием "Анкета 1". но мне нужно 10 анкет....

Маска ввода полю в форме в Excel
Для обработки данных я использую форму с кнопочками, полями со списком, просто полями и т.д. и т.п. Через эту форму у меня заводятся новые данные и идет корректировка. Проблемма: в одну из ячеек...

Перевод макроса из VBA в OpenOffice \ LibreOffice Basic
Доброго времени суток, глубокоуважаемые участники форума! Возникла проблема с переводом простого макроса, написанного при помощи товарища Busine2012 (за что ему невероятная благодарность) в VBA для...

Сделать все латинские символы в вордовском документе курсивом
Добрый день. Задача. собственно, в сабже. Есть вордовский документ (формат doc либо docx, если это важно). Необходимо все латинские символы сделать курсивом. Например было так: A и B сидели на...

Как работать со ссылками, длина которых превышает 255 символов
Есть прайс в формате Excel, сгенерированный с помощью PHP. В нем - ссылка "Купить" на определенный сайт на страницу заказа в формате: ...

Из TextBox вставить данные в пустую ячейку
Здравствуйте. Помогите решить задачу. Есть форма на ней TextBox, как вводя данные сделать так, чтобы эти данные попали в пустую ячейку в определённый столбец книги. Заранее благодарен.

LongPtr и Long: не игнорируется модуль
*LongPtr и Long: игнорируется модуль Здравствуйте. Есть модуль. На моём компьютере x64. Он работает только если везде стоит Long. В функции никаких ошибок нет. На другом компьютере. Тоже x64. Через...

Как узнать последний символ строки?
Как узнать последний символ строки? Т.е. то что на паскале я написал бы так: ch:=s;

Как вставить картинку в Excel
Всем добрый день. Очень нужна помощь. Подскажите, как вставить картинку в ячейку Excel? В 1-ом случае, чтобы картинка полностью вписалась в ячейку Во 2-м - чтобы ячейка увеличилась до размера...

Нужно связать SpinButton и TextBox
Надо связать SpinButton и TextBox чтобы при нажатии на верхнюю стрелку в SpinButton он в TextBox плюсовал на 2, а на нижнюю что бы вычитал на 2.

Скрытие и отображение столбцов в Excel
Уважаемые форумисты, у нас есть такая задача: Существуют столбцы 'План' и 'факт' на нескольких листах, как сделать чтобы отображались либо 'План', либо 'Факт', записывать макросы на каждом листе...

Сбор данных из разных файлов в один
Добрый день. Стоит задача собирать данные из нескольких файлов с одинаковой структурой в один, имеющий аналогичную структуру. Имена файлов имеют одинаковое правило - 2016_07_ОП_*наименование*, то...

Как сделать маску в TextBox для ввода номера телефон
Подскажите,как в VBA можно на поле TextBox(именно это) написать обработчик,что бы он проверял на ввод обычного номера сотового телефона.

Как узнать размер листа в Excel?
есть таблица на листе.. как узнать сколько столбцов до первого пустого столбца.. и соответственно строк - до первой пустой строки но например в первой строке заполнено 6 столбцов, а во второй -...

Переход на лист
как мне при нажатие кнопки перейти на другой лист?

Транслитерация кириллицы в латиницу
Добрый вечер. Есть процедура которая транслитерирует текст с кириллицы на латиницу, по заданному мной алфавиту. Также происходит замена символов. Все отрабатывается отлично, но нужна некая...

При создании нового листа произвести проверку на существование вводимого имени листа в текущей книге EXCEL
При создании нового листа, произвести проверку на существование вводимого имени листа в текущей книге EXCEL и если такой лист существует то уведомить об этом.

Как экспортировать данные из блокнота(.txt) в Excel, периодически.
Добрый день. Вопрос в следующем: Данные находятся в файле.txt в виде столбцов цифр,разделенных "," их надо экспортировать в Excel. Т.е. VBA должен дать команду "взять данные из файла.txt с такими-то...

Изменить размер JPG (разрешение)
Всем привет! Ситуация следующая. Вставляю на лист MS Excel картинки (файлы JPG) разного размера - есть и 3264х2448, есть и 1600х1200... Мне нужно их все привести к одному размеру, например, к...

Вычислить, чему равна сумма цифр числа
Дано натуральное число n (n ≤ 100).Чему равна сумма его цифр?

Подсчет количества непустых ячеек диапазона
Есть диапазон rang1=range(cells(a,b), cells(c,d))' где a,b,c,d заранее определенные переменные. Как получить количество непустых ячеек rang1. Может существует какая-либо встроенная функция?

Создание презентации PowerPoint из Excel
Здравствуйте, решив предыдущую задачу(отдельное спасибо форумчанину Скрипт) Поставил перед собой более амбициозную(по крайней мере для себя) задачу. Сейчас есть книга Excel с примерно 6 листами(на...

Calculate - пересчет листа
Тема пока не исследована. Пока заметил лишь разницу в работе Calculate. Calculate вызванный с функции прописанной на листе - лист пересчитывает. Calculate, вызванный с функции какого-нибудь...

Как сделать чтобы колонтитул был только на последней странице в листе в ворде?
Подскажите пожалуйста как сделать чтобы колонтитул был только на последней странице в листе в ворде это разрыв раздела, а в excele как?

Объединение текста из нескольких ячеек в одну ячейке, по всей таблице
Есть большая таблица с которой требуется проводить разные манипуляции такие как сортировка и объединение, но для этого ее надо привести к нормальному виду. В таблице есть столбцы разбитые на 1-9...

Ошибка Method Range of Object Global failed
Помогите найти ошибку. Пишет Method Range of Object Global failed и указывает на первую строчку. Если убрать это сегмент из кода, то все ок работает. ...

Запуск/продолжение выполнения макроса по изменению ячейки
Доброго времени суток! Изучаю VBA самостоятельно ввиду необходимости использования его на работе. Подскажите пожалуйста есть ли возможность запуска макроса или продолжение исполнение макроса по...

Создание пользовательской функции в Excel, VBA
Добрый день. Столкнулся с проблемой создания пользовательской функции в MS Excel, используя VBA. Если я правильно понял, это и есть создание макроса. В моем случае рассматривается линейная рента...

Объединение ячеек таблицы
С помощью макроса добавляю таблицу в TextBox на страницу. Дальше пытаюсь объединить ячейки. В столбцах отличных от первого ячейки объединяются. В первом столбце появляется ошибка "Запрашиваемый...

Как из Excel открывать HTML страницы, расположенные в интернете?
Подскажите, пожалуйста: как посредством VBA из Excel открывать html страницы, расположенные в интернете ? нужно, чтобы программа просматривала текст интернет-страницы и искала там определенный...

Из Access открыть файл Word, развернув окно на полный экран. Путь к файлу указать относительно файла Access
Здравствуйте, подскажите как сделать, или в каком направлении гуглить. Мне нужно запусть макрос в access, который открывает файл word. На просторах интернета нашел код. Dim WD Set WD =...

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

Редактирование надстройки EXCEL
Ситуация: есть файл start.xla (при запуске сам не показывается, а формирует и запускает временный файл _start.xls с главным меню программы). Мне потребовалось немного подкорректировать меню...

Нужно выбрать все строки содержащие слово, например "ПТО" и скопировать на втрой лист книги
Задача состоит в следующем: есть книга в экселе, на 1 листе книге много заполненых строк. Нужно выбрать все строки содержащие слово , например "ПТО" и скопировать на втрой лист книги, на следующий...

Как сделать окантовку ячейки
Здравствуйте! Стандартная процедура в Excel: выделить ячейку, затем поместить ее в рамку. В макрорекордере это все выглядит слишком громоздко. ActiveCell.Select ...

Макрос на создание копии файла
Добрый день всем. Помогите с макросом. Есть файл Excel. При сохранении файла, необходимо чтобы создавалась копия данного файла по определённому пути, но уже без макроса внутри. Я написал макрос,...

Фильтр в сводной таблице
Приветствую! Подскажите как сделать фильтр по определенному значению в сводной таблице, например в строках "Подразделение" sub test() Set rngStart = Worksheets("TDSheet").Range("A1") ...

Событие колесика мыши
Доброй ночи! У меня такая проблема ,не как не могу добиться выполнения кода после события колесика мыши на форме в listbox.(excel).Может кто то сталкивался с такой задачей?

Не учитывать регистр в макросе
Подскажите, пожалуйста, как исправить код, чтобы при вводе имени howard не учитывался регистр букв. Sub GoToDemo() UserName = InputBox("Enter Your Name:") If UserName <> "Howard" Then GoTo...

Выделить несмежные ячейки с помощью Union()
С помощью Union(Range(Cells(r1,c1),RangeCells(r2,c2)),.........).Select выделил несмежные диапазоны. А теперь, когда мне надо выделить несколько несмежных ячеек, как быть? ...

Кнопка выхода из формы
Всем привет. Может кто поможет) Я только начинаю осваивать VBA, очень плохо пока все понимаю. Есть форма, она появляется при запуске excel файла. ОТменил закрытие формы крестиком и добавил msgbox...

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

Как определить, есть ли рисунок в ячейке EXCEL
Проблема такая. Программа (макрос) в EXCEL генерирует несколько документов, в которые автоматически вставляет подпись (ФИО выбирается в форме, в зависимости от этого на листе с образцами подписей в...

Как сделать поиск по ListBox слова введеного в textBox
Нужно сделать поиск чтоб искал во всех столбцах и строках Вот код заполнение ListBox Private Sub UserForm_Initialize() With ListBox1 .ColumnHeads = True .ColumnCount = 6 ...

Как определить номер текущей страницы документа
Всем доброго времени суток. Подскажите, как определить номер текущей страницы в документе MSWord 2003

Решение определенного интеграла средствами VBA Excel
Добрый день! Прошу у Вас помощи. Мне нужно сделать приложение в Excel, которое могло бы считать определенный интеграл. На форме в VBA создать поля, куда можно было бы вводить верхний и нижний...

Как подсчитать количество не пустых ячеек определенного листа и записать в переменную
Подскажите, как подсчитать количество не пустых ячеек определенного листа и записать в переменную? Т.е макрос выполняется в "Лист1", при этом мне нужно знать количество не пустых ячеек столбца "А"...

Связанный выпадающий список через ActiveX
Доброго дня! Имеются два связанных списка, выбирая значения в одном предлагаются варианты в другом. Обязательное требование что используем элементы ActiveX выпадающий список. В первом списке...

Перебор файлов в каталоге - групповое редактирование
Есть файлы такого типа Расположены они к примеру с:\temp 1 файл.xls 2 файл.xls 3 файл.xls 4 файл.xls 5 файл.xls Как мне их открыть по очереди сделать необходимые изменения и закрыть сохранив...

Определить адрес последней заполненной ячейки
Range("A1").SpecialCells(xlLastCell).Address возвращает тупо последнюю ячейку Cells(Rows.Count, 1).End(xlUp).Row возвращает НОМЕР последней строки а мне надо адрес последней ЗАПОЛНЕННОЙ...

Как просуммировать часы в Excel, если их больше, чем 24 ?
Есть несколько ячеек с форматом 'время' в таком виде: 8:15 8:15 8:15 8:15 7:00 Ну, рабочая неделя короче. В идеале в строке ИТОГО хочется получить 40:00

Макрос открытия файлов
Помогите написать цикл, так как в программировании не силен. Задача состоит в слудующем: -имеется каталог с несколькими деятками .htm файлов. Имена файлов-фамилии. Нужно открыть каждый файл, сделать...

Курсор в тексбоксе TextBox
Подскажите как программировать нахождение курсора в тексбоксе TextBox 1 Если курсор стоит в начале текстбокса??? 2 Поставить курсор перед, после последнего знака текстбокса?? 3 Выделить n знак в...

Запуск макроса при клике на определенную ячейку
Всем доброго вечера. Не могу никак сообразить макрос. Задача: На листе в разных строках может встречаться слово "Итог". При клике на соседнюю с ним ячейку должен происходить автоматический запуск...

Добавление библиотеки MSCOMCT2.OCX
Доброй ночи! Хотел воспользоваться элементом управления Microsoft MonthView Control 6.0(SP6). Скачал файл mscomct2.ocx, установил в папку C:\Windows\SysWOW64, зарегистрировал библиотеку в системе...

Загрузка кода страницы с сайта в эксель
Добрый день. Есть задача: извлечь информацию с некоторых страниц из интернета. Пользуюсь таким скриптом для передачи кода страницы в string: sURL = "http://instagram.com/Ballantines_Russia"...

Создать таблицу в Word с определенным количеством строк и столбцов
Здравствуйте, как сделать?? ответ очевидный ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=1, NumColumns:=1 ActiveDocument.Tables(1).Columns(1).PreferredWidth =...

Как программно снять объединение ячеек?
надо на выделенном диапазоне ячеек,если стоит галка на фОРМАТ ЯЧЕЕК -> ОБЪЕДИНЕНИЕ ЯЧЕЕК ... убрать ее т.е. снять объединение ячеек программно не знаю как написать условие if .MergeCells = True...

Суммирование одинаковых значений таблицы
Имеется таблица 7 столбцов № Наименование Ед.измерения Норма Кол-во Цена Сумма 1 Пропан кг 0,19 0,038 12,72 0,48 .. 45 Пропан кг ...

Определить высоту и ширину ячейки Excel
1) Доброе время суток! Кто-нибудь знает, как получить значение о высоте и ширине выбранной ячейки? (чтобы подобные ячейки впоследствии найти). Пытался выполнить при помощи ColumnWidht и RowHeight ....

Как сделать расчет разницы времени в Excel?
Поврос такой кто нибуть знает как сделать так что бы можно было вводить дату к примеру : 18.09.04 11:30 20.09.04 21:00 Нужно расчитать раздницу по времени т.е. сколько прошло часов от 18.09.04 с...

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

Сохранение входящих писем из Outlook
Прошу помощи у более опытных товарищей. Может кто то решал задачу сохранения писем из определенной папки созданой в Outlook в папку на жестком диске. Нужен макрос на VBA сохраняющий письма вместе с...

Не нажимаются кнопки в экселе
По какой-то непонятной причине у меня на домашнем компе перестали нажиматься кнопки во время работы макроса. DoEvents позволяет мне выделять ячейки, сворачивать и разворачивать приложение, но...

Макрос для Word 2007: удаление строки с символом
Помогите мне написать макрос для редактирования текста Задача: найти строку с определенным словом и удалить ее

Запуск внешнего приложения из макроса
Поиском не нашел. Как из макроса запустить внешнее приложение? Или, может в .OnAction как-то можно открыть With .Add(Type:=msoControlButton) .BeginGroup = True ...

Копирование данных из одной ячейки в другую
Добрый вечер. С данным заданием, как и с Visual Basic сталкиваюсь впервые, но мне очень важно решить это задание. Помогите, пжлста! Заранее спасибо;) Программу надо написать на Visual Basic в...

Найти максимальный из отрицательных элементов среди произвольных 20 чисел
Товарищи программисты, доброго дня! прошу содействия в решении следующей задачи: Найти максимальный из отрицательных элементов среди произвольных 20 чисел, вводимых с клавиатуры мой ход...

Посчитать количество слов в строке
Ввести строку и посчитать количество слов, БЕЗ встроенных функций. Вот, что получилось у меня, только не слова считает, а пробелы. Подскажите ) Sub main() Dim s As String Dim i As Integer ...

Расположение UserForm в пределах окна Excel
Здравствуйте! на листе имеется Кнопка, по нажатию на которую вызывается форма Кнопка: Option Explicit Sub Кнопка1_Щелчок() UserForm1.Show End Sub

Запуск процедуры SQL Server через VBA
Уважаемые форумчане, кто подскажет можно ли при помощи VBA запустить процедуру SQL Server?

Вызов диалогового окна выбора цвета (Excel)
Как вызвать диалоговое окно выбора цвета и как получить из него значение для закраски ячейки? Или оно и так возвращает 8 битное значение в границах 0-56? Я ведь, как оказалось, не могу покрасить...

Как программно задать горячие клавиши на макрос?
Существует собственная книга макросов. Необходимо подвесить на один из макросов "Hot Key" Вот есть строка Application.OnKey "^%{BACKSPACE}", "V1" Не могу понять где разместить эту строку, что...

Как быстро очистить коллекцию?
Для быстрой очистки массива есть команда Erase массив Есть ли нечто подобное для коллекции?

Удаление/добавление строки из/в двумерного массива
Люди добрые, помогите, поискав на форуме, не нашел способа, как удалить или же добавить строку из двумерного массива. Нужно удалить строку с заданным номером. к примеру вот массив Sub www() Dim...

While c несколькими условиями
Добрый день! Подскажите, пожалуйста, мне нужно найти строку в которой ячейки в 2 определенных столбцах единовременно принимают некоторые значения. Делаю что-то вроде Do While Cells(i,...

Консолидация данных из разных книг макрос
Уважаемые, Форумчане!доброго времени суток! очень нужна Ваша помощь (с VBA даже не на Вы). Есть несколько абсолютно однотипных книг только с разными названиями (количество и названия листов в...

Как получить строку-родитель для текущей строки в файле Excel с группировками
Привет всем. Обхожу экселевский файл в цикле, в файле иерархическая структура многоуровневая с "плюсиками", нужно узнать какая строка является строкой-родителем для текущей и получить из нее...

Определить диапазон печати, если "Область печати не задана"
Здравствуйте, уважаемые форумчане! Прошу у вас помощь. Мне необходимо для листов определять диапазон (прямоугольную область), который пойдет на печать вне зависимости от того, задана или не задана...

Открыть файл Excel-я макросом и взять его на редактирование
Реально ли такое? Например пользователь открыл файл с названием Тест.xls, расположенный на общем сетевом ресурсе. Включаю процедуру и по ходу её выполнения необходимо записать данные в этот файл....

Подгонка картинки под размер ячейки при "drag and drop"
Добрый вечер, уважаемые профессионалы! Облазил кучу ресурсов, но безуспешно. Я работаю с excel 2010, подготавливаю каталоги, выдергиваю изображения методом "Drag and drop", т.е. просто...

Макрос поиска совпадений в тексте
Всем доброго времени суток! Пишу с просьбой помочь написать макрос для поиска совпадений в ячейках из списка. Пример во вложении. Нужно, чтобы макрос проверял ячейку А1 на литсе 1, искал...

Выполнение макроса по клику на ячейке
Добрый вечер, уважаемые форумчане! Приложенный к данному посту файл-пример найден в интернете, работает он хорошо. Подскажите, пожалуйста, можно ли из макроса, расположенного в объектах "Лист 1":...

Вывести значение полученной ячейки
Получил переменную Q и её значения.Как мне в msgBox'е вывести её координаты ,raw и collum ,если координаты меняются каждый раз при вычислении,ну там таблица генерируется и он выбирает,а имя...

Как заполнить форму на сайте pp.ua данными с Excel и получить ответ
Здравствуйте. Как заполнить форму на сайте pp.ua данными с Excel и получить ответ (успешно зарегистрирован или ошибка)? Помогите пожалуйста - а то руками уже устал это делать, и сам не могу...

Изменить дату и время создания файла
Можно ли средствами VBA изменить дату создания текстового файла?

Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объем этого куба
Всем привет! срочно нужно сдать задачи !помогите пожалуйста!! 1.Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объем этого куба. 2.Составить алгоритм решения задачи:...

Как записать в переменную текст из буфера обмена?
Добрый день! Как сделать так, что бы в iLink записывалось содержимое буфера обмена? (макрос делает гиперссылку) iText = Selection.Text iLink = Selection.Paste ...

VBA управление IE.....
Сильно нужна помощь. Помогите кто шарит в VBA. нашел в интернете статью как получить интерфейс объекта Document вот код который я пытался адаптировать для Access Option Compare Database Private...

Вставка формулы в ячейку через макрос
Надо было сделать массовую вставку формулы корреляции, которые просто так не протянуть, поэтому написал код: Sub find_corr() For i = 2 To 240 For j = 2 To 240 'Cells(i, j + 15) =...

Заполнение ListBox через RowSource в Excel и в Word
Доброго времени суток! Пересмотрел все похожие темы, но ответа на свой вопрос не нашел, помогите пожалуйста, если кто знает. Заполняю ListBox на форме в Excel через RowSource, открывая для этого...

Возможные центры круга по двум точкам и радиусу
Доброго времени суток! Как с помощью VBA найти координаты возможных центров круга (xc1, yc1, xc2, yc2) имея координаты 2 точек, лежащих на круге (x1, y1, x2, y2) и зная радиус круга (r)? Пусть даже...

Пустые ячейки и условие If Not IsEmpty(.Cells(i, 1)) Then
не могу понять в чем дело в программе стоит условие If Not IsEmpty(.Cells(i, 1)) Then в первом столбце визуально все ячейкм пустые, но почему-то происходит попадание в это условие Как поступить ?...

Создание и удаление папки
требуется создать папку Fold в активной директории CurDir, а если папка с таким именем Уже существует - удалить ее, а затем создать снова Function createMainDir() As String Dim path As...

PowerPoint VBA: переход к другому слайду по кнопке
Всем привет! Подскажите пожалуйста, как можно сделать в презентации, что при нажатие на кнопку и переходе на другой слайд єта кнопка по возвращению на слайд пропадала Благодарю за ответи!

Поиск и пометка повторяющихся значений
Доброго дня, Господа ! Помогите мне, пожалуйста, определится с правильным подходом для реализации следующей задачи: Есть столбец с данными в ячейках, например: Столбец 1 Столбец 2 Иванов...

Вывод данных в Textbox
Задать фамилии, имена и возраст с помощью функциями функции InputBox. Вывести их на форму в столбик:по возрастанию числа согласных букв в фамилии.

Получение данных AD (active directory)
Всем привет. В общем есть инфа в AD ФИО, почта, тел должность. можно как то её с помощью Access и VBA отображать для тел справочника фирмы?

Нахождение обратной матрицы
Здравствуйте уважаемые форумчане и программисты у кого то имеется код для нахождения обратной матрицы в Visual Basic Applecetion, при помощь которого можно будет считать матрицы в Excel?

Удаление в массиве
Друзья как можно удалить строку в массиве? в примере третью строку массива нужно убрать, четвертую соответственно поднять к второй и выгрузить на страницу. Спасибо ребята Sub q() Dim a As...

Снятие значение с других CheckBox
На форме есть 4 "флажка". Надо чтобы через 1 макрос, поставленный на все 4 флажка выполнялось следующее действие: если кликнули на флажок1, то снять флажки с флажок2,3,4 , если кликнули на флажок2,...

Для заданного массива А, состоящего не более чем из 50 элементов, найти наименьший элемент
1) Для заданного массива А, состоящего не более чем из 50 элементов, найти наименьший элемент и переставить его со вторым по порядку отрицательным элементом массива. 2) Задан двухмерный массив...

Открытие csv-файла с помощью макроса
Hi! Такая проблема: надо открыть csv-файл. Если просто в экзеле открывать такой файл (через кнопку open), то он нормально открывается, т.е. разделители ';' учитываются и данные раскидываются по...

Как сделать запросы на озоне?
Добрый день всем! Наверняка тема обсуждалась, поискал, не нашел. Ткните куда-то или подскажите. У Озона есть API, описано на cb-api.ozonru.me/apiref/ru/ Искал и пробовал адаптировать примеры, но...

Заполнение массива из ячеек циклом с шагом
Здравствуйте! Нужно заполнить массив из ячеек с шагом из определённого листа. Просто ячейки заполняются, а вот массиву тем же образом значения не присваиваются. Вообще на нашёл описания, чтобы...

Макрос копирования заданного диапазона значений на другой лист
Добрый день, форумчане. Вводная информация по задачке, которая поступила недавно в мой адрес: Имеется цифровой массив данных на листе 1, начиная со столбца AA по AL. На листе 2 имеется место...

Таймер!!!! Ексель
Очень надо для работы! Вкратце: представим 100 номерков пришел человек взял один номерок и ушел на како-ето время потом пришел и отдал мне его мне нуно узнать время каторое номерок был у него...

Макрос Outlook для прочтения и сохранения писем
Помогите пожалуйста! У меня в Outlook был макрос, который прочитывал все письма входящие и сохранял их в определенную папку. Потом произошел какой то сбой и макрос слетел. Мне написали новый, но...

Открыть файлы в Word VBA с помощью макроса
Всем привет!Окажите содействие плиз: имеется папка с файлами .тхт необходим макрос который открывает все файлы из этой папки в Ворде(если возможно была признательна если можно было реализовать вывод...

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

Перенос данных из текстовых файлов в excel
Доброго всем дня! Помогите, пожалуйста с решением проблемы! Есть множество txt файлов, нужно при помощи макроса перенести данные из этих файлов в Ексель с разбивкой по столбцам. Если подробней, то...

Узнать расстояние от курсора до нижнего поля листа word
Добрый день. Оформляю письмо. После основного текста идет подпись, а внизу страницы должны быть исполнитель и номер телефона. Хочу написать макрос, который бы определял расстояние Х от текущего...

Авто коррекция ввода даты в TextBox
Доброго Помогите реализовать. В UserForm есть TextBox в который пользователь должен ввести дату. Идея заключается в том, когда человек ввел число, например 12 то сразу автоматом ставится точка,...

График на форме
Доброго времени! Кто знает, подскажите: можно ли на форму VBA (Word, Excel не суть) Вытянуть график подобный Excel-им Если да то как? Что подключить, как сделать (если есть пример, хватит с...

Вставка текущей даты
Добрый день. Хотела бы уточнить, может у кого-нить есть макрос,который позволяет вставлять текущую дату с учетом ширины столбца (автободпор ширины), то есть макрос аналогичный сочетанию клавиш CTRL+;...

Сортировка списка литературы в Word
Есть документ Word с текстом и множеством ссылок в нем. Например: ............ В конце текста огромный список литературы. 1. .... 2. .... 3. .... .... В процессе редактирования очень часто возникает...

Границы Таблицы
Как оптимизировать код. Задача: если ячейка имеет границы (ну в смысле при распечатки распечатываются границы), то изменить эту границу на другую. Проблема: загрузка процессора на 100% (Celeron 2...

Удаление из строки ненужных символов
Доброй ночи всем! Мне нужно удалить из строки знак " и знак = Я решил это так: strW= (="КОРОТЕЕВ ДМИТРИЙ ВЛАДИМИРОВИЧ") strB=Replace(Replace(strW, Chr(61), ""), Chr(34), "") может есть еще...

Макрос фильтра по дате
Всех с праздником ! всего наилучшего ... подскажите в чём может быть проблема - в екселе написал макрос Application.CutCopyMode = False Selection.Copy Sheets("лист").Select ...

Как показать UserForm при открытии файла?
Всем привет! Как сделать так, чтобы UzerForm появлялась при открытии файла? Без переключателя? Есть ли такая возможность?

При выборе значения в ComboBox автозаполняются ТекстБоксы значениями из таблицы
ComboBox должен заполниться фамилиями из 3 столбика. При выборе значения в ComboBox должны заполниться ТекстБоксы значениями из таблицы соответсвующие значению комбоБокса. Не могу разобраться как это...

Макрос создания нового листа в Эксель с названием от 1 и далее нарастающим итогом
Добрый вечер! Очень нужна помощь, уважаемые программисты!!! Необходим макрос для кнопки, при нажатии которой, создается новый лист в Экселе с номером нарастающим итогом. То есть макрос проверяет,...

Можно ли один массив присвоить другому?
Подскажите пожалуста как енто сделать не перебирая их в цикле, а то уже совсем запарился искать. Думаю над этим уже неделю.

Копировать содержимое листа одной книги, на лист в новую книгу с присвоением ей имени листа из которого копировали
Всем доброго дня! Помогите пожалуйста написать код, сам не могу написать по причине отсутствия знаний. Есть книга с именем "Заказы на производства". В ней имеются 3 листа, в каждом листе...

Поменять выделенные слова в одной строке местами
в word нужно поменять местами слова! пример: есть строка: яблоко-1 + тыква2 + м-малина + вишня* нужно чтоб получилось следующее: вишня* + м-малина + тыква2 + яблоко-1 есть...

Как показать в ячейках Excel все делители заданного числа?
Всем доброй ночи! Прошу помощи. Как правильно показать в ячейках Excel все делители заданного числа? Именно в ячейках Excel! Пусть число 34, тогда его делители: 1; 2; 17; 34. Прошу не...

Поиск текста в таблице
Можно ли как-то организовать поиск текста в таблице? Или для этого достаточно обычного поиска текста?

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

Замена строк в текстовом файле
Привет всем! Помогите пожалуйста: на диске с:\test.txt В файле написано к примеру: #1 "" #2 "" #3 "" #4 "" #5 "" Надо в позиции #4 "" и #5 "" между кавычек написать Hello!!! Выполнить через...

Создайте макрос, который поместит из таблицы 1 общую стоимость по позициям по которым количество больше 50
Добрый день! Прошу помощи, всю работу сделала за 3 часа, но вот с макросом заморочка:wall:. Прикладываю работу, на первом листе задание, на втором выполненная работа. Пожалуйста помогите.:sorry:

Как переместить курсор в нужную строку документа?
Пишу макрос, который будет шерстить текстовый документ и из разных мест вытаскивать нужные данные (текстовые). При этом положение данных заранее неизвестно. Для данной процедуры решил использовать...

Есть ли событие, которое отслеживает, было ли в ячейке изменение данных
Здравствуйте. Будьте добры подскажите, есть ли событие, которое отслеживает, если в ячейке произошло изменение данных.

Копирование таблицы из экселя в ворд
Добрый день, помогите реализовать. такую фишку. Созданную таблицу в экселе нужно скопировать в ворд. пробовал написать код не вышло. Sub ЭкспортВВОРД() Dim adr As String Dim copyTABL As...

Как из текстовых файлов прочитать нужные строки
Всем привет! Вопрос по VBA - EXCEL На C:\ имею *.txt файлы (прикреплены) Из этих файлов необходимо вытащить строки, начинающиеся с "6. Стеллажи", сохранить эти строки где-либо в каком-либо...

Определение Range через Cells
Такая проблема появилась. Пытаюсь определить диапазон Set tmpO = ThisWorkbook.Sheets("Данные").Range(Cells(1, 1), Cells(x, 1))где х вычисляется при работе программы Выдает ошибку 1004. Вроде должно...

Замена кавычек "" на « » макросом
Суть в том что в большом документе нужно поменять все кавычки такого формата "" на такие « ». То есть предложение вида : "Времена года": тематическая программа в рамках проекта "Летние читальни"...

Выделить отфильтрованный диапазон
Надо выделить отфильтрованный диапазон, что бы затем скопировать или удалить. Проблема в том, что не могу догаться как получить номер первой строки. Скажите есть какие нибудь решения?

Как записать в массив диапазон ячеек, а затем скопировать его
Добрый день, вопрос следующего плана: Мне нужно скопировать диапазон ячеек с Лист1 на Лист2 при определенном условии (условие проверяется c помощью if-then). Я знаю такую конструкцию: arrTest(1)...

Нужно определить последнюю непустую ячейку
Здраствуйте! Проблема такая. Есть диапазон. Большой. Есть "поддиапазоны". Определить "общий" последний столбец - не проблема. Нужно определить последнюю непустую ячейку (вот она может быть (на 90%)...

Как вставить пробел в ячейку из цифр и букв
Существуют ячейки с буквами и цифрами (Маша = 1000000) нужно для красоты вставить символ пробел в определенную позицию чтобы получилось (Маша = 1 000 000)

Найти гипотенузу и площадь треугольника
15. Даны катеты прямоугольного треугольника. Найти его гипотенузу и площадь. 16. Даны действительные числа А и В. Если они оба неотрицательные, то заменить каждое из них его кубом, иначе...

Создание листа с именем из ячейки
Доброго времени суток форумчане, ниже приведенный код создает новые листы с именами которые перечислены в колонке D, в каждый при этом вставляет информацию из листа "шаблон". Вроде все хорошо, и...

Формула эксель через макрос
toiai, ребята знающие, подскажите пожалуйста.....как такую формулу сделать програмно...в макрос. =(СУММЕСЛИ(D6:AH6;">0";D6:AH6)-СУММЕСЛИ(D6:AH6;"<0";D6:AH6))-$CR$5 вот что...

Как узнать номер ячейки, после поиска
Запустил макрос Cells.Find(What:="2018", After:=ActiveCell, LookIn:=xlFormulas, _ LookAt :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:= False,...

References и автоматическое подключение библиотек на поздних версиях MS Office
Уважаемые программисты. Хотел бы разобраться что к чему. Есть программка (то есть макрос) на VBA, формирующая отчетики в Word из Excel. Я ее делаю на 2003 версии офиса. Программка будет стоять и...

Объединить два массива
Нужно обьединить. Использовать временный лист не желательно. Массивы двухмерные, полученные из разных областей листа (Ubound(arr,2) заранее не известно. Вот я и написал, но потом ужаснулся. Может...

Удалить строку, если ячейка в третьем столбце пустая
Всем привет! Ребята, подскажите, помогите написать макрос: в Excel есть 3 столбца, макрос ссылаясь на 3 столбец, где если в ячейке пусто, то должен удалять всю строку. Помогите написать такой...

Ошибка "Требуемый класс отсутствует в ClassFactory"
Всем Здравствуйте! столкнулся с такой проблемой, скачал макрос, там была папка SYSTEM с 6 файлами один из них regdll.bat в котором содержится @echo off copy *.dll %SYSTEMROOT%\system32 copy...

Автоматическое проставление даты и времени при изменении ячейки
В ячейке забита формула "=ЕСЛИ(RC="";"";ТДАТА())" соответственно как только ячейка RC1 перестает быть пустой в ячейке с формулой появляется текущие дата и время. Формула забита в насколько строчек...

Microsoft Text ODBC Driver, ошибка "Не удается найти указанный поставщик"
Скажите, пожалуйста, какая ошибка в макросе. Ошибка возникает в строке 20. Полный текст ошибки: Run-time Error '3706' Не удается найти указанный поставщик. Возможно, он установлен неправильно. Sub...

Возможно ли написанный в Excel макрос создать как отдельный файл *.exe
Добрый день! Такой вопрос, подскажите пожалуйста, возможно ли написанный в Excel макрос создать как отдельный файл *.exe? Чтобы, например, при запуске этого файла, происходила как бы "установка" его...

Требуется макрос, добавляющий строки в таблицу снизу
У меня проблема, два дня до конца сессии, и мне нужно написать такой макрос, времени изучать вопрос уже нет, сейчас нужен рабочий код. Я подозреваю, что код должен быть простым. Однако просто не знаю...

Поиск в папках и подпапках
Здравствуйте! Делаю курсовую на VBA и к сожалению только на нём. По моей задумке мне надо вывести в файл все файлы и папки, а так же все файлы в подпапках и подпапки. Смог вывести только то что в...

Цикл по ячейкам, поиск информации и запись на другой лист
Добрый день! Помогите пожалуйста написать правильно цикл. Private Sub CommandButton1_Click() For i = 2 To 11384 обработка_строки (i) Next End Sub Sub обработка_строки(iRow As...

Программно определить номер строки в Word2003
Прошу подсказать: как программно определить номер строки в Word 2003 (там, где находится курсор)?

Копирование диапазона ячеек со смещением вниз
Добрый день! Помогите пожалуйста. Нужно назначить макрос на клавишу который бы копировал диапазон ячеек (A1:P1) и вставлял в ячейку например - А25 если она пустая, если нет то опускался ниже (А26)...

Замер времени работы макроса на каждом шаге - как сделать?
Возможно ли отследить какой блок кода сколько времени исполняется? Было бы, конечно, супер, если бы это все выводилось в "отладочный" файл в удобном виде (может просто у кого есть заготовка, задача...

Запись данных в ячейку из другой книги
Есть файл VB.xlsm,в нём я создаю макрос,который должен брать данные из другого файла и записывать в ячейку VB.xlsm. Взять получается,но записать в ячейку фала VB.xlsm ну никак. Не понимаю,что не так....

Формирование печатной формы в excel
всем привет, вообщем нужен хелп по следующему вопросу - есть список сотрудников в excele и нужно сделать так что бы в этом списке появилась возможность формирования печатной формы (...

Как получить индекс элемента в ListBox
Как получить индекс элемента списка : 1.по его значению (текст), 2.по его позициии (List, Column) ? Спасибо.

Выделить несколько отдельных столбцов по условию (с помощью Union)
Помогите, пожалуйста. Требуется удалить колонки названию заголовка. таблица небольшая, где-то 1000 строк, но удаление по Columns(i).Delete долго даже при всех отключенных скрин апдейтин,...

Снова про точку и запятую
Здравствуйте, Userform загружает дробные числа в TexBox из ячеек с точкой, в то время как в таблице excel они находятся с запятыми. Обратно выгружаются по такой же логике, меня устраивает. НО, VBA...

Сохранение файла по гиперссылке без диалогов
Ребята! Такой вопрос: есть гиперссылка на фаил *.doc, кликаешь на нее и начинается загрузка файла, проблема в том что я сделал через VBA обращение к ой ссылке, но потом всплывает окно загрузки,...

ВЫХОД по нажатию "Cancel" или закрытию InputBox ИЗ ПРОЦЕДУРЫ
Требуется , чтобы после нажатия кнопки "Cancel" или если пользователь нажмет правый верхний крестик произошел выход из программы (exit Sub). КАК ЭТО СДЕЛАТЬ? По факту же , после закрытия диалога...