Описание тега vba6
2
ответа
Сортировка имен файлов по условиям
Я хочу создать небольшой фрагмент кода, который сохраняет файл в папку (PDF / DWG) и перемещает все мои файлы с меньшей версией #5, чем текущий файл, сохраняемый в замененную папку. Я не могу понять, как установить условие для номера ревизии: я не м…
15 мар '18 в 15:25
1
ответ
Можно ли глобально добавить ссылку на проект ко всему, что открывается в Microsoft Office 2016?
У меня есть приложение Microsoft Access (.mdb), который является старым и закрытым и должен быть запущен в Windows 10 в Microsoft Office 2016. Интерфейс (.mde) для этого нужен какой-то старый .ocx управления, и я сузил его до необходимости библиотек…
11 авг '16 в 16:08
0
ответов
Как получить средства разработки Office в VS Community на Windows 10 64bit?
2 Тесно связанные вопросы, объяснение, которое может помочь найти частичное решение для других пациентов, если эта проблема широко распространена, и возможность для кого-то сделать это лучше: Есть ли лучшая функциональность в инструментах разработчи…
16 дек '16 в 22:22
2
ответа
Что лучше для использования памяти: определить константы в подпрограммах или в модуле
Я понимаю, что это некоторые из основ VB, но не могу понять, как спросить Google: Как VBA управляет константами? В некоторых языках компилятор заменяет их значениями. Но как это работает в VBA? Будет ли иметь значение, если я объявлю их в sub/functi…
25 мар '19 в 09:30
0
ответов
Является ли этот тип указателя водонепроницаемым?
Я пытаюсь разработать собственный тип, который можно использовать в API, для которых нужны дескрипторы окон или другие указатели, и который будет работать для всех систем, на которых может работать VBA. Вот что у меня есть: #If (Win64 = 1) And (VBA7…
30 июн '19 в 22:20
0
ответов
VBA - Как перебрать пару датпикеров в определенном кадре
Dim ctl As MSComCtl2.DTPicker ' InformationFrame - это объект кадра размера. Для каждого ctl в InformationFrame.Controls ' Он выдает ошибку в этой строке Если TypeOf ctl Is MSComCtl2.DTPicker Then If ctl.Value = "" Then EverythingFilledIn = False En…
29 июл '20 в 18:43
0
ответов
Приложение пользовательской формы VBA
У меня есть базовое приложение в формате Excel. Я хочу работать с ним как с программой. Скрытие книги неэффективно. Ниже приведены пункты, которые могут сделать его профессиональным: 1) Можно ли изменить значок Excel, который будет отображаться на п…
12 окт '19 в 14:28
1
ответ
Проблема с разницей в версиях VBA: версия 6 и версия 7
Я новичок в VBA и использую 64-битную версию Excel 2010, совместимую с VBA v6.0. Я вставил код, пытаясь скачать файлы через VBA. Option Explicit 'Tutorial link: https://youtu.be/H4-w6ULc_qs #If VBA7 Then Private Declare Function URLDownloadToFile Li…
10 июл '20 в 16:12
2
ответа
Есть ли способ сохранить состояние флажка в программе, созданной в Visual Basic 6.0?
Я создал (спроектировал) программу на Visual Basic 6.0, она состоит из около 100 флажков, программа не требует никакого кода, просто программа типа флажка да / нет, но я хочу сохранить состояние флажка, чтобы, если находится в состоянии "да", то пос…
16 дек '19 в 10:50
1
ответ
VBA, как пройти через ответ JSON от WinHttp.WinHttpRequest
Я не могу понять, как правильно выполнить цикл через ответ JSON(Object) от WinHttp.WinHttpRequest что я получаю. Ниже приведены используемые ссылки. Я предпочитаю оставить все как есть и использоватьWinHttpRequest Dim response As Object ' global Fun…
23 авг '20 в 19:54
1
ответ
Сценарий Outlook VBA для сохранения всех вложений во вложенной папке "Входящие"
Я пытаюсь изменить этот код VBA, чтобы сохранить все вложения из писем в папке "Входящие". subfolder. Items заполняется всеми сообщениями в этой папке, но остальной код не работает. Я пытаюсь распечатать объект элемента для отладки, но это тоже не р…
07 авг '20 в 18:30
1
ответ
Индикатор выполнения с использованием VBA
Я работаю над таблицей Excel с помощью VBA: я пытаюсь проверить индикатор выполнения. Я уже закончил дизайн, как показано ниже: Ниже userForm код: 'PLACE IN YOUR USERFORM CODE Private Sub UserForm_Initialize() #If IsMac = False Then 'hide the title …
18 авг '20 в 10:56
2
ответа
Как изменить внешний вид меток пользовательских форм с помощью модуля класса?
У меня есть эта пользовательская форма (изображение 1), и я пытаюсь применить некоторые настройки через модуль класса. Итак, моей первой целью было изменить формат метки при нажатии (Изображение 2). Пока все хорошо, я сделал это с помощью модуля кла…
23 июл '20 в 17:40
2
ответа
Совет по арабским символам с использованием VBA
Я работаю над отправкой писем каждому студенту, содержащему (имя студента и его оценки) из таблицы Excel, как показано ниже. Все работает нормально, но когда имя студента арабскими буквами. имя отображается как (????), как вы можете видеть ниже Я из…
15 авг '20 в 18:34
2
ответа
Как завершить цикл, если переменная пуста
Sub max() Sheets(1).Select Sheets(1).Name = "Sheet1" Dim rng As Range Dim celladdress As String Dim celling As Variant Do Until IsEmpty(celling) If celling > "G4" Then Set rng = Range("G3:G1000").Find(what:="Des…
13 сен '20 в 23:06
2
ответа
Соответствует любому символу, кроме "
Я хочу сопоставить любой символ (без учета регистра), за исключением случаев, когда ему предшествует одинарная кавычка, за которой следует текст On Error Goto: Соответствие: on error goto err_handler if aap = 0 then on error goto Myerrorhandler on e…
10 окт '20 в 23:09
1
ответ
как установить значения между листами после оператора IF, используя 2 последних строки
Я пытаюсь скопировать и вставить все значения столбцов из листа с именем Hey в другие столбцы на листе с именем final. Я не хочу использовать опцию копирования, вставки или выбора, но мой код копирует только первую строку. IntLastRow = Sheets("…
17 сен '20 в 15:41
2
ответа
Scripting.Dictionary для заполнения столбца строкой с учетом более 3 критериев
Я пытаюсь заполнить столбец C строкой, учитывающей, соответствует ли потребитель в строке одному из критериев: Если потребитель соответствует одному из этих правил, значение должно быть установлено на Рассмотрение: • Потребитель имеет только 1 транз…
26 сен '20 в 04:09
0
ответов
Как зациклить массив одновременно в VBA
Моя проблема после того, как j в петле сделано, i будет просто двигаться. Я хочу запустить массив из двух циклов одновременно. ReDim ArrayItems(Download_frm.ListBox1.ListCount) ReDim ArrayItems1(Download_frm.accountb.ListCount) For i = 1 To Download…
14 окт '20 в 06:48
3
ответа
Каков синтаксис sumproduct в vba?
Каков правильный синтаксис для произведения суммы? Вот мой код: mFormula = "=SUMPRODUCT(--((1.Insert_Data!F:F)=2.Counting_sheet!A8)),(--((1.Insert_Data!E:E)))" Range("C8") = Evaluate(mFormula)
02 ноя '20 в 00:06