Вопросы с меткой [vba]

Visual Basic for Applications (VBA, Visual Basic для приложений) — немного упрощённая реализация языка программирования Visual Basic, встроенная в линейку продуктов Microsoft Office (включая версии для Mac OS), а также во многие другие программные пакеты, такие как AutoCAD, SolidWorks, CorelDRAW, WordPerfect и ESRI ArcGIS.

Фильтрация
Сортировка
Метки
0 голосов
1 ответ
28 показов

VBA 1 лишний байт при записи в бинарный файл

При использовании оператора Put возникает странная ситуация - размер записываемого в файл массива 10 байт, однако в конец файла всегда добавляется 1 нулевой байт. Как это исправить? Dim arr(10) As ...
rock8's user avatar
  • 122
0 голосов
0 ответов
9 показов

Автоматизация обновления данных из подключения для Эксель: ошибка обновления

я столкнулся со следующей проблемой: В рамках автоматизации обновления данных из подключения для Эксель я написал макрос, который сначала обновляет подключения, а затем сразу обновляет сводные ...
Victor's user avatar
  • 1
0 голосов
0 ответов
18 показов

выпавшие значения спинера копировать в другую область

посмотрел в Ютубе у "цифровая академия" как сделать несколько спинеров, открыл повер поинт и сделал в нем три спинера, все крутятся/останавливаются по триггеру, теперь для полного счастья не ...
A3POCUneg's user avatar
0 голосов
0 ответов
30 показов

Подсчет количества значений в столбце

Нужно подсчитать количество значений в столбцах с разных листов книги, использовал следующий код Sub аа() Dim a As String Dim b, c As Double a = Worksheets("январь 2023 фактический рк")....
Виталий's user avatar
0 голосов
0 ответов
36 показов

Создание новой таблицы с помощью кнопки VBA [закрыт]

Есть два листа с данными(буквы это название строки, чему соответствует значение левый столбец первый лист, правый столбец второй лист), необходимо написать программу с помощью кнопки, чтобы таблички с ...
Виталий's user avatar
0 голосов
0 ответов
39 показов

Закрывается excel при запуске макроса

После запуска макроса открывается первый документ на обновление связей. В процессе работы закрываются и макрос, и документ, который нужно обновить. При этом в Debug'е при последовательном выполнении ...
ophys's user avatar
  • 1
0 голосов
1 ответ
20 показов

как с помощью VBA подсчитать сумму цифр размерных линий AutoCad

Как с помощью VBA подсчитать сумму цифр размерных линий AutoCad выделив их в чертеже?
suvorov.mo's user avatar
0 голосов
1 ответ
46 показов

Если ячейка пуста, взять значение из соседней ячейки Excel VBA

Цикл проходит, а значение не берется :( Подскажите, как можно обратиться к соседней ячейкe(из колонки J) Dim i As Long, n As Long With Columns("I") n = .Cells.Count For i = 1 To ...
SemKop's user avatar
  • 3
0 голосов
2 ответа
26 показов

Как сделать сдвиг по столбцу в формуле Excel с помощью VBA

Пример: в ячейке "A1" содержится формула "=A2+A4+A6" Мне необходимо, с помощью VBA, в ячейку B1 поместить эту формулу но с литерой "B". Есть ли способ? Единственное что-...
Dmitry's user avatar
  • 137
0 голосов
1 ответ
32 показа

Почему происходит ошибка "Type: mismatch" при компиляции функции в массив?

Всем привет! Подскажите пожалуйста как "запустить" формулу массива для vba. Сейчас выдает ошибку 13: Type: mismatch Sub Match_Example1() Dim TTBank As Long Dim Value1 As Integer Dim ...
Мария's user avatar
0 голосов
1 ответ
55 показов

Не выполняется функция VBA в Excel

Excel при первом вводе функции выдает ошибку: "Приложению Microsoft Excel не удается вычислить формулу. В открытой книге обнаружена циклическая ссылка, однако не получается отобразить источник ...
Александр's user avatar
0 голосов
1 ответ
20 показов

Каким образом можно узнать о существовании объекта на форме

необходимо программным способом узнать о существовании объекта на Форме n=0 name = "TextBox_" While Not (Me.Controls(name & CInt(n)) Is Nothing) msgbox "форма с номером&...
Александр's user avatar
0 голосов
0 ответов
21 показ

Поиск выбранных значений в колонке и запись значения из соседней колонки

нашел вот такой макрос на просторах интернета Sub Find_Matches() Dim CompareRange As Variant, x As Variant, y As Variant ' Установка переменной CompareRangeравной сравниваемому диапазону Set ...
user540768's user avatar
0 голосов
1 ответ
68 показов

Как в excel VBA добавить свой пункт в контекстное меню

Хотел добавить пункт в меню по вызову через правую кнопку мышки, который бы вставлял сегодняшнюю дату, в ячейку. Вот такой код Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal ...
Edvard's user avatar
  • 55
0 голосов
0 ответов
26 показов

Как удалить начальные и конечные пробелы в Word?

После переноса данных из Excel в отчет Word мне надо выстроить их столбцом для удобства восприятия. После вставки значения гуляют как лесенка. Все дело в начальных пробелах. Для решения этой проблемы ...
HMMWV's user avatar
  • 36
1 голос
1 ответ
35 показов

Vba При копировании файлов из ZIP Нужно не копировать файлы расширения SIG

В zip файле есть файлы Расширения SIG и их копировать не нужно но как это сделать не понимаю Sub Unzip() Dim FSO As Object Dim oApp As Object Dim Fname Dim FileNameFolder As Variant ...
Алексей Абрамов's user avatar
0 голосов
1 ответ
35 показов

Выделение несмежные диапазоны в VBA

Добрый день! Есть таблица нужно Выделить фрукты и получить выделение диапазонов "A1:C4" "A11:C13". И так же аналогично с овощями и ягодами. я написал такое но он выделять только ...
user527448's user avatar
1 голос
2 ответа
71 показ

Перестроение диаграммы в Excel при изменении названия в шапке

Как можно сделать так, что при изменении названия в шапке диаграммы, она перестраивалась? Например у меня есть таблица с результатами за год, мне нужно чтобы при изменении года в названии диаграммы, ...
Egor1996's user avatar
0 голосов
0 ответов
37 показов

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

Мне нужно чтобы переменная doctype сбрасывалась до 0 когда цикл переходит к обработке следующего значения,поиск значений ведется в диапазоне ART, задача в том что если данные параллельно от исходного ...
Алексей Абрамов's user avatar
0 голосов
0 ответов
23 показа

VBA Проверка всех значений коллекции в диапазоне ART

Мне нужно проверить все значения коллекции в определенной области (ART). Но вылезает ошибка , Невозможно получить свойство FindNExt Класса RANGE For Each d In collection With art Set nextcell = ....
Алексей Абрамов's user avatar
1 голос
1 ответ
272 показа

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

Есть некоторое число x. Оно находится в ячейке B1. Оно может принимать любые целочисленные значения. Количество случайных чисел равно y. Оно задается вручную и находится в ячейке B2. Задача в том, ...
HMMWV's user avatar
  • 36
0 голосов
2 ответа
57 показов

Как в VBA Excel выделить цветом n-случайных ячеек

Нужно в Excel на листе в выделенном диапазоне залить желтым цветом случайным образом 5 ячеек.
Alexey's user avatar
  • 1
0 голосов
1 ответ
55 показов

MC-ACCESS Отключить обновленние данных на форме при открытии

На форме есть текстовое поле, кнопка, подчиненная форма. В текстовом поле пишу критерий (например город), жму кнопку и ожидаю в подчиненной форме отображения результатов запроса. ИсточникЗаписей ...
Aleksandr H.'s user avatar
0 голосов
1 ответ
132 показа

Вывод одномерного массива VBA Excel

Мне необходимо вывести одномерный массив в Excel'е в строку. Как это можно реализовать? Function FUN3(Aa As Integer, Bb As Integer) Dim masA() As Double Dim masB() As Double ReDim masA(Aa To Bb) ReDim ...
RabbiQQQ's user avatar
0 голосов
1 ответ
61 показ

Макрос в vba(excel) не работает. Когда нажимаю удалить выдаётся ошибка Type mismatch

Private Sub CommandButton2_Click() Dim sh As Worksheet Set sh = ThisWorkbook.Sheets("Лист1") Dim selected_row As Long selected_row = Application.WorksheetFunction.Match(CLng(Me.TextBox8....
Максим's user avatar
0 голосов
0 ответов
46 показов

С помощью vba(word) Реализовать поиск факториала числа Число должно задаваться в строковом виде как числительное (максимальное значение 100)

Реализовать поиск факториала числа – Число должно задаваться в строковом виде как числительное (максимальное значение 100). Числительное может быть на русском или английском(на своё усмотрение). ...
Максим's user avatar
0 голосов
1 ответ
39 показов

Плагин для MS Access 2016 при помощи VSTO C#

Необходимо создать плагин MS Access 2016 при помощи VSTO C#. В шаблонах проектов студии есть разные типы проектов для Office Excel; Word; Outlook. Но Access отсутствует. Судя по скудной информации, ...
Sergej Loos's user avatar
0 голосов
0 ответов
20 показов

Ран-тайм ошибка с методом Add объекта ListRows, VBA

Всем доброго времени суток. Надеюсь на помощь знающих. Ситуация простецкая, буду сильно благодарен за ваше уделенное внимание. Чтобы сэкономить ваше время я убрал всё лишнее и упростил свою программу ...
user471929's user avatar
0 голосов
0 ответов
13 показов

Миграция элемента управления из VB6 в VBA (MS Access)

Я не специалист в MS Access и VBA и что-то самому разобраться не совсем получается: Итак, есть одно приложение MS Access, которое использует UserControl (ocx) созданный в VB6. Исходники элемента ...
Sergej Loos's user avatar
0 голосов
2 ответа
60 показов

С помощью vba(ворд) реализовать программу для решения квадратичного уравнения, записанного на листе документа в виде a*x2+b*x+c=d

Реализовать программу для решения квадратичного уравнения, записанного на листе документа в виде ax2+bx+c=d Вывод результата – строкой после уравнения на активном листе документа: Шрифт Arial Размер ...
Максим's user avatar
1 голос
1 ответ
105 показов

На vba(word) выводиться весь текст из документа, а нужно лишь строки которые содержат как минимум 2 вхождения «нн»

Sub f() Dim regex As Object Dim res As Object Dim s As Object Set regex = CreateObject("VBScript.RegExp") With regex .Global = True .IgnoreCase = ...
Максим's user avatar
0 голосов
0 ответов
57 показов

Не очень понимаю как написать правильно код для задания. Помогите

Дан одномерный массив А размерности N. В нем есть нулевые элементы. Создать массив В из номеров этих элементов. Sub CommandButton1_Click() Dim myar() As Integer Dim n As Integer, s As Integer n = ...
Саня Низков's user avatar
0 голосов
1 ответ
62 показа

Как создать макрос на Vba(в word) который выводит все целые числа(с помощью регулярных выражений) из текущего документа?

Допустим такой текст Dsad Л test 213 4 54.2 и должно вывести в MsgBox: 213 и 4 Я написал вот этот код, но ничего не работает(m ставил и String и Integer, все равно не работает). Нужно обязательно ...
Максим's user avatar
0 голосов
2 ответа
56 показов

Excel скопировать столбец и приписать значения в скопированный

Всем привет. В таблице Excel есть столбец, в котором значения идут парами: AAA AAA SSS SSS ZZZ ZZZ Мне необходимо сделать копию этого столбца и приписать справа цифры 1 и 2 через тире, чтобы ...
chasesilvers's user avatar
0 голосов
0 ответов
41 показ

Как в VBA Word перенести якорь фигуры на другую страницу?

Камрады помогайте, всю голову уже сломал. На странице в WORD есть один Shape с содержимым. В скрипте я его дублирую и размещаю вновь созданный на своем месте, относительно страницы. При заполнении ...
VaXoID's user avatar
  • 1
0 голосов
0 ответов
73 показа

Как добавить макрос в Excel, с помощью c#

я использую библиотеку "Microsoft.Office.Interop.Excel". С помощью неё я пытаюсь реализовать добавление макроса в документ Excel. Однако никакой внятной информации не нахожу. Программа в ...
Максим's user avatar
0 голосов
0 ответов
220 показов

VBA. Python. Запуск скрипта Python из файла Excel

Скрипт берет переменные из первого листа, далее обрабатывает файл с данными и выводит итоговую сводную таблицу, которая должна сохраниться на новом листе исходного Excel файла. Из Jupyter все работает,...
Yaroslav's user avatar
1 голос
0 ответов
60 показов

VBA скрипт отправляет сообщение если в любой из папок outlook есть непрочитанные сообщения

Подскажите может кто такое делал. Есть робот который автоматически формирует пропуска на ТС. У робота есть собственный почтовый ящик в MS Outlook, на который ему по шаблону присылают данные на ТС. ...
ShinigamiTenchi's user avatar
0 голосов
1 ответ
39 показов

Как убрать gzip Компрессию при получении ответа с GET запроса?

Делаю запрос на api через VBA Exel чтобы записать данные, но долго не понимал почему выходит странный ответ Потом лазия на разных форумах понял что это gzip компресия, так как в header`e увидел этот ...
Igor Ostapenko's user avatar
0 голосов
1 ответ
31 показ

Получаю непонятный ответ в VBA ResponseText

Делаю запрос на JSON API, чтобы получить ответ в виде json. Получаю старнный набор символов пытался Спарсить через JSON Parse Master, он выдаёт ошибку. Кто может помочь? Вот код: Dim objHTTP2 As ...
Igor Ostapenko's user avatar
0 голосов
0 ответов
25 показов

Как мне добавить куки в VBA?

Я делал запрос через PowerShell и добавлял в него куки вот пример> $auth.Cookies.Add((New-Object System.Net.Cookie("CSRF-TOKEN", $token_temp, "/", "site.com"))) $auth....
Igor Ostapenko's user avatar
0 голосов
1 ответ
84 показа

VBA, найти и скопировать

Необходима из столбца (например B) найти все ячейки с определенным текстом (например <name> или <desc>) и скопировать их в другой столбец (например С) в том же ряду.
Archi's user avatar
  • 1
0 голосов
1 ответ
44 показа

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

Мне нужно открывать макросом существующие на жёстком диске файлы по их точным именам, которые состоят из одной постоянной и двух переменных частей. Например, "25-й файл. Срок до 2022.09.25", ...
Василий Балин's user avatar
0 голосов
1 ответ
25 показов

Excel vba как выполнить запрос с параметром

подскажите пожалуйста как в VBA выполнить sql запрос с параметром? Мой код: Dim dbPath As String dbPath = "C:\Users\User\Desktop\База.xlsx" Dim ConnectionString As String ...
Jasur1177's user avatar
0 голосов
1 ответ
34 показа

Не получается вставить формула массива во все строки конкретного столбца, при условии что кол-во строк в таблице волатильно (Vba Excel)

Sub AAAAA() Dim строка As Long For строка = 6 To Cells(Rows.Count, "C").End(xlUp).Row Cells(строка, "N").Select Selection.FormulaArray = _ &...
yusupSpn's user avatar
1 голос
0 ответов
50 показов

Защита ячеек от внесения данных без защиты листа VBA Ecxel

Подскажите пожалуйста, как можно защитить определенные ячейки без защиты листа, например при ручной вставке строки, 4 ячейки из этой строки должны быть защищены от форматирования, но при этом должен ...
Evgeny Ushakov's user avatar
1 голос
1 ответ
171 показ

Как Excel "понимает", какой в пределах какого диапазона сортировать?

Мне нужно сортировать таблицу по четырём столбцам. Часто. Поэтому пишу макрос. Тот, что написал я (не буду приводить тут его код, потому что: 1. вопрос его не касается; 2. не хочу "раздувать"...
Василий Балин's user avatar
0 голосов
0 ответов
17 показов

Application.Visible влияет на результат выгрузки данных из Axapta

При выгрузке данных с sql server в word через axapta application.visible влияет на то, будут работать макросы для форматирования итоговой таблицы или нет. Если ставлю visible=true, то все правильно, ...
Владислав Красник's user avatar
0 голосов
0 ответов
36 показов

VBA Excel Не срабатывает Call

Есть вот такой участок кода. Здесь по идее каждую итерацию цикла должен вызываться Sub writeStats, но этого не происходит. Проверяя через F8, увидел, что цикл просто вхолостую прогоняется. Параметры ...
Илья's user avatar
0 голосов
1 ответ
157 показов

Как загрузить рисунок в ячейку excel и сохранить его в докумете

Есть задача. Нужно загрузить изображение в ячейку excel. При этом его нужно сохранить в документе. С этим справляется Shapes.AddPicture(Paths, msoFlase). Но как его засунуть в нужную ячейку? Код ниже ...
yava43DEVELOPER's user avatar