2. Language

    Сейчас выбран русский

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

Visual Basic для приложений; подмножество Visual Basic, используемое во всех приложениях Microsoft Office. Попробуйте использовать этот тег вместе с тегом для конкретного приложения. Хорошие вопросы по VBA, как правило, содержат некоторый код и требуют решения конкретных вопросов. Вопросы, требующие полного решения (пожалуйста, дайте мне код / как это сделать и это с VBA), не относятся к теме и будут закрыты как слишком широкие.

2672 вопроса
АктивныеНовыеПопулярные
0
голосов
1ответ
37 показов

Не могу рассчитать по десятичному числу

Пожалуйста, нажмите на ссылку, чтобы увидеть мое изображение Вот мой код Я не понимаю, почему всегда ложно только десятичное число. Что я должен делать? Sub calcu() Dim a As Integer Dim b As Integer ...
0
голосов
1ответ
99 показов

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

У меня есть следующий макрос, который повторяет каждую ячейку в указанном столбце. Если ячейка содержит значение строки #VALUE! , он заменяется в среднем на 2 ячейки над и под ним (которые содержат ...
0
голосов
1ответ
3k показов

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

Я изучал код VBA, но это застряло. Я использую Excel-2013. У меня есть 4 ячейки в листе «Счет-фактура» (ячейки E3, C3, E36 и E34), которые я хочу перенести на лист "Способ оплаты" в следующей ...
0
голосов
4ответа
8k показов

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

У меня есть следующий код, который не работает, как ожидалось: If Sheets("a") "" Then MsgBox ("sheet a exists") Как я могу определить, существует ли лист а в книге?
0
голосов
1ответ
117 показов

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

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

Ошибка: макрос может быть недоступен в этой книге или все макросы могут быть отключены

Я пытаюсь принять решение из этого поста, и я немного изменил макрос (мне нужно только добавить по нажатию кнопки), чтобы он теперь Sub AdjustValue() Dim btnName As String Dim targetCell As String ...
0
голосов
1ответ
336 показов

выделенная ячейка в именованном столбце

Я думал, что это будут простые ответы, но не могу найти его где-либо У меня есть макрос на основе выбранной ячейки, который запускается в контекстном меню правой кнопкой мыши. Мне нужно получить ...
0
голосов
1ответ
1k показов

«При ошибке возобновить следующее» не работает

У меня есть одна процедура в Excel VBA кода. В этом я использую синтаксис «ON ERROR ....». Процедура начинается с ON ERROR RESUME NEXT чтобы пропустить все ошибки. Но в какой-то момент я хочу ...
0
голосов
1ответ
639 показов

Данные XML из одной ячейки Excel в новый файл XML

В А1, А2, А3 ... A16000 У меня есть весь контекст XML в одной ячейке. Пример: весь XML для одного счета находится в A1, следующий счет в A2 и так далее. Как я могу сохранить контекст каждой ячейки в ...
0
голосов
2ответа
6k показов

Скопируйте несколько книг Excel в одну книгу

Я пытаюсь скопировать несколько книг Excel в одну рабочую книгу, каждая из которых должна иметь собственную вкладку. Я не знаю, как использовать VB, поэтому я пробовал много скриптов VB, которые я ...
0
голосов
1ответ
947 показов

Формула Excel исчезает при сохранении в формате .xls

У меня есть длинная формула в одной из моих клеток. Это: ...
0
голосов
1ответ
2k показов

Excel Macro для рисования сюжета xyscatter из VBA

Я пытаюсь создать график xy, где значения x - это ось времени (столбец A), а значения y - в других столбцах. (в примере только C и D) Когда я пробую свой код снизу, я получаю график с временной осью ...
0
голосов
1ответ
2k показов

Оформить заказ / в Excel книги из SharePoint с VBA

Я нашел несколько статей и прошлых вопросов в SO, которые помогают с этим, но я добавил поворот. Я нашел способ сопоставить сетевой диск на моем компьютере с папками SharePoint. Если я открою рабочую ...
0
голосов
1ответ
114 показов

Предупреждение VBA, когда выбранные ячейки не равны 5 и смежны

Мой макрос Vb выполняет следующие действия: я выбираю 5 смежных ячеек, запускаю свой макрос и получаю 5 статических случайных чисел от 1 до 50; Работает отлично; Мне нужно предупреждение, когда ...
0
голосов
2ответа
3k показов

Почему моя IFNA (или ISNA) не работает в модуле VBA?

у меня есть следующий код: Sub TestNA2() IsThisNA = Sheets("sheet1").Range("D:D").Select 'Sheets("sheet1").Range("E:E").Select Range("E2").Formula = "=IF(ISNA(D1),""Delete"","""")" ...
0
голосов
2ответа
571 показов

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

У нас есть книга с макросами (версия 2010), которую используют многие люди. У некоторых из этих людей есть макросы в их книге Personal.xlsb. У нас есть ситуация, когда макрос в общей рабочей книге ...
0
голосов
2ответа
62 показов

Авторазмер ячейки после возврата функции

У меня есть xla с кучей функций. В основном каждая из этих функций выполняет вертикальный поиск на другом листе. Вот основной пример одного из них: Function ax2Project_Address(projectnumber) If ...
0
голосов
2ответа
1k показов

EXCEL VBA работает с F5 - но не будет работать автоматически при изменении значений ячеек

Формула VBA отлично работает с F5 Ячейки столбца E E3:E5 имеют функции, которые рассчитывают до суммы в долларах или 0,00 долларов США. Это формула, извлекаемая из = SUM(«Предложение MEDENT - ...
0
голосов
1ответ
69 показов

как преобразовать таблицу в один столбец (показать ТОЛЬКО то, что я упомянул в списке покупок таблицы)

У меня есть таблица списка покупок, которая выглядит как этот пример: (a1) овощи (b1) количество (c1) фрукты (d1) количество (e1) напитки (f1) количество и в строке 2 и так далее есть список. поэтому ...
0
голосов
2ответа
243 показов

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

Я хочу заменить текст только до конца строки (справа), не заменяя другой текст, начинающийся с того же имени, слева. Рассмотрим эту строку:Replace1 в тексте Replace1. Я хочу заменить ...
0
голосов
0ответов
343 показов

Соответствие между двумя ячейками, если значения находятся в диапазоне VBA

Я борюсь в VBA, потому что я хочу сравнить две ячейки, чтобы проверить, есть ли частичное совпадение между ними. Но я хочу удалить объекты, которые не являются общими для обеих ячеек, через список в ...
0
голосов
0ответов
4k показов

Excel VBA - ошибка выполнения 13 - несоответствие типов

Я продолжаю получать сообщение об ошибке 13 - несоответствие типов в следующей строке: MonthsWithValues = Application.WorksheetFunction.CountIfs(Worksheets("Analysis Worksheet").Range(.Cells(i, 13), ...
0
голосов
0ответов
3k показов

Открытие Google Chrome с макросом вместо IE

У меня есть вопрос относительно макроса VB, который автоматически открывает файл в IE 11. Проблема в том, что я не могу получить запрос на загрузку, чтобы исчезнуть (поверьте мне, я пробовал все от ...
0
голосов
2ответа
47 показов

Как я могу изменить каталог в этом коде VBA? VBA "Excel для TXT или CSV"

Я действительно хочу изменить каталог этого кода в Application.ActiveWorkbook.Path но я не знаю, где его поставить. Public Sub CharacterSV() Const DELIMITER As String = "|" Dim myRecord As Range Dim ...
0
голосов
1ответ
66 показов

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

Я строю индекс в документе Word, который будет определений. Мой индекс будет выглядеть так: Супергерой - тот, кто супер существо ..... 17 Автобус - это длинный автомобиль, похожий на сосиску ..... 28 ...
0
голосов
1ответ
166 показов

Подсветка ячеек, где IFERROR = TRUE; Не правда". Предложения?

Пример: Формула: IFERROR(H12,1) Таблица: Я пытаюсь выделить каждую ячейку в таблице, которая возвращает 1, только если оператор IFERROR равен TRUE (не "TRUE"), и не сравнивая возвращенное значение ...
0
голосов
1ответ
1k показов

Запись нескольких результатов расчета при каждом изменении одной входной ячейки

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

Автоматически (VBA) удалять цвет страницы при ответе или пересылке электронной почты

Я ищу создание макроса для удаления цвета страницы из электронного письма при ответе на него или пересылке, либо автоматически по одному нажатию кнопки, вместо того, чтобы перейти к настройке на ...
0
голосов
2ответа
932 показов

Excel VBA Runtime ошибка 9 субкрита вне диапазона

При закрытии книги я получаю: Run-time error 9 subscript out of range Это код VBA: Set wbk = Workbooks.Open(path & filename) wbk.Sheets(sheetname).Range("b6").Resize(row_count, col_count).Copy ...
0
голосов
1ответ
627 показов

Форматировать столбец телефонных номеров несколькими способами в Excel 2016

Хорошо, вот моя ситуация. У меня есть таблица Excel со списком плохо отформатированных телефонных номеров из CRM моей компании. Большинство из них являются внутренними, номера США с кодом страны +1, ...
0
голосов
1ответ
116 показов

Потеря символов при копировании и вставке в командный файл через VBA

В настоящее время я использую следующий код VBA для копирования и вставки диапазона данных в файл Excel для создания пакетного файла. Я сталкиваюсь со следующими проблемами: Котировки размещаются ...
0
голосов
1ответ
98 показов

Как остановить Excel от создания "фантомных" нулей при копировании / вставке

Я использую Excel для Mac, 2011 и имею дело с довольно большим набором данных (~ 500 строк, 75 столбцов), и многие данные были введены с неправильными знаками (+/-) для целых столбцов. Существует ...
0
голосов
1ответ
947 показов

Как создать несколько макросов sendkeys для линейного порядка операций

Range ("D5").Select ActiveCell.Resize(1, 25).Select SendKeys ("%y1"), True 'Alt+Y1 SendKeys ("%y2"), True 'Alt+Y2, Activates third part add-in SendKeys ("~"), True 'Enter, initiates the merge add-in ...
0
голосов
1ответ
5k показов

Powerpoint VBA объединяет pptx файлы в один

Я видел такой пост раньше, но не смог добавить больше комментариев и не смог реализовать решение. Поэтому, пожалуйста, не критикуйте :) Мне в основном нужно открыть пустой файл pptx и указать ...
0
голосов
1ответ
2k показов

Эквивалент VBA для "Обновить это подключение Обновить все"

В Excel по умолчанию включен параметр "Обновить это подключение для всех обновлений". Могу ли я программно выключить и включить соединения? Мне нужно что-то реальное вместо RefreshOnAll в следующем ...
0
голосов
1ответ
1k показов

Ошибка VBA 1004 метод пересечения объекта _global не удалось

ОБНОВЛЕНИЕ (вопрос перефразирован) У меня есть 2 разных Private Sub (в ThisWorkbook). Каждый работает нормально "в одиночку". Тем не менее, когда они оба активированы, я получаю vba error 1004 method ...
0
голосов
0ответов
419 показов

мой код работает как макрос, но не работает, когда я запускаю его в кнопке

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

Индекс слов не в 100% алфавитном порядке

Windows 7, Word 2010 и 2016 У меня есть макрос, который ищет в моем документе какой-то текст, и когда он найден, добавьте этот текст в индекс. Идея состоит в том, что у меня есть много определений ...
0
голосов
1ответ
134 показов

EXCEL VBA получить исходную папку в Const

У меня есть код "copyMultFiles" Переместить много значений из многих файлов в один файл Моя проблема не может использовать параметр в "Const" Ошибка этой строки "Const csMyPath As String = vaFiles1" ...
0
голосов
1ответ
4k показов

Установить принтер Excel vba macro

Я пытаюсь распечатать макрос на общий принтер на компьютере коллеги. Я пробовал следующее, но безрезультатно Sub Tag() ActiveCell.Resize(1, 1).Copy Worksheets("Sheet1").Range("A1") ...
0
голосов
0ответов
76 показов

Автоматическое обновление функций Excel при изменении родительской функции

У меня есть несколько столбцов данных различной длины, прилегающих к каждой ячейке в каждом столбце. Я хочу выполнить одну и ту же формулу для соответствующей соседней ячейки. Формула идентична для ...
0
голосов
1ответ
58 показов

Контрольные имена, вызывающие мой макрос к сбою

У меня есть ряд макросов в форме, которую я создал для использования на местах. Когда они завершили документ и хотят отправить его соответствующим людям, я создал макрос FINISH. Это в основном ...
0
голосов
1ответ
602 показов

как добавить цвет фона в мой оператор IF

если есть следующее утверждение IF: =IF(R1=R3,"GreenBG","RedBG") Как я могу добавить цвет фона, используя оператор IF (это вообще возможно)?
0
голосов
1ответ
4k показов

нажмите на ячейку изменить значение другой ячейки

Я не могу добиться, чтобы сделать то, что выглядит как легкий процесс ... Я хотел бы присвоить значение ("Hello") ячейке (с именем "ClInfo") на листе с именем "Hardware", щелкнув ячейку (C47) на ...
0
голосов
2ответа
34 показов

Заполнение столбца на основе значений столбца

У меня есть набор значений в столбце следующим образом: 1 1 3 3 12 12 43 43 94 94 88 88 Интервал произвольный, но всегда есть два каждого значения. Что я хотел бы сделать, это заполнить пробелы с ...
0
голосов
1ответ
233 показов

Отображение строки с помощью макроса на основе значения ячейки (для 10000 строк)

Я очень плохо знаком с макросом. Тем не менее, я нашел макрос на этом сайте, чтобы скрыть строки со значением False. Я отредактировал макрос, чтобы снова отобразить строку, и он работал нормально. ...
0
голосов
1ответ
656 показов

Разделение одной строки с несколькими столбцами на несколько строк

Так что я взял этот код VBA ... Sub NewLayout() For i = 2 To Cells.Find("*", [A1], , , xlByRows, xlPrevious).Row For j = 0 To 2 If Cells(i, 3 + j) vbNullString Then intCount = intCount + 1 Cells(i, ...
0
голосов
1ответ
228 показов

Отправить массовую почту с помощью Excel VBA

Работал над проектом, который будет отправлять рассылку разным людям, если условия будут выполнены. Условия: Столбец U содержит окончательный статус (открыто или WIP) (не будет отправлено, если ...
0
голосов
0ответов
159 показов

Формула EXCEL - Ошибка выполнения 28

У меня есть VBA, который работает - но приводит к ошибке времени выполнения 28 через некоторое время. В столбце B3:B11 есть функция Hide или Show из функции = IF(E3 = 0, "Hide", "Show"). E3:E11 имеет ...
0
голосов
0ответов
19 показов

скопируйте все файлы, которые не являются zip, сохраняя структуру папок

Sub Copy_Folder() Dim FSO As Object Dim FromPath As String Dim ToPath As String Dim objFSO As Object Dim objFolder As Object Dim objSubFolder As Object Dim fil As File Dim destfolder As Object Dim ...

1 … 43 44 45 46 47 … 54