Tag: vba

Ping IP-адрес с кодом VBA и результаты возврата в Excel

У меня есть некоторый визуальный базовый код (см. Ниже), который проверяет IP-соединение в столбце B (таблицы Excel) и ставит вопрос о том, подключен или не подключен или нет в столбце c, мне просто интересно, можете ли вы мне помочь? хотелось бы, чтобы он был зеленым, если «подключен», и любой другой результат будет красным. Кроме того, […]

Как я зацикливаю таблицу excel 2010, используя его имя и колонку?

Начиная с Excel 2010, я использую много таблиц в Excel. Например, у меня есть таблица «tabWorkers» с тремя столбцами: «ID», «Имя», «Фамилия». Я уже выяснил, что я могу ссылаться на таблицу в VBA, используя []. Например: Dim row As Range For Each row In [tabWorkers].Rows MsgBox (row.Columns(2).Value) Next Это даст мне первое имя каждой строки, […]

Эквивалентная cURL в VBA?

У меня есть API для моего приложения, которое позволяет мне делать запросы cURL. Мне нужно реализовать это в VBA, поэтому моя настольная firebase database может запускать запросы CURL в мое веб-приложение. curl -i –user [email protected]:password -X PUT -d “test=testing” https://mywebsite.com/api Как я могу реализовать это в Access VBA? Могу ли я использовать WinHttp.WinHttpRequest.5.1? Любые примеры? […]

Диапазон сортировки VBA Excel по определенному столбцу

У меня есть таблица, которая может содержать любое количество строк: Как я уже сказал, он может содержать 1 или ∞ строк. Я хочу сортировать диапазон A3: D∞ по ячейке Date, которая находится в столбце B. Как я могу это сделать? Проблема в том, что я не знаю, как выбрать из A3 в последнюю строку. Я […]

VBA – как условно пропустить итерацию цикла for

У меня есть цикл for над массивом. То, что я хочу сделать, – это тест для определенного условия в цикле и переход к следующей итерации, если true: For i = LBound(Schedule, 1) To UBound(Schedule, 1) If (Schedule(i, 1) < ReferenceDate) Then PrevCouponIndex = i Continue '*** THIS LINE DOESN'T COMPILE, nor does "Next" End If […]

Как я могу получить HTTP GET из Excel VBA для Mac 2011

Мне нужно выдать HTTP Get с строкой запроса в веб-службу из Excel для Mac 2011. Я видел ответы на использование QueryTables ( как я могу отправить HTTP POST-запрос на сервер из Excel с помощью VBA? ), Но они используйте метод POST, а не метод GET. Я также вижу, что это легко с Windows-машины, но я […]

Скопировать код VBA с листа в одной книге на другую?

Я использовал строки ниже, чтобы скомпилировать модули VBA из одной книги в другую, и я не знаю, есть ли более простой способ, но они отлично работают: Set srcVba = srcWbk.VBProject Set srcModule = srcVba.VBComponents(moduleName) srcModule.Export (path) ‘Export from source trgtVba.VBComponents.Remove VBComponent:=trgtVba.VBComponents.Item(moduleName) ‘Remove from target trgtVba.VBComponents.Import (path) ‘Import to target Однако теперь мне нужно скопировать код […]

Excel, из которой вызывается функция

Как я могу получить ячейку, из которой вызывается моя функция VBA? Другими словами, каков эквивалент VBA для INDIRECT (ROW (), COLUMN ())? Я не ищу ActiveCell . То, что я хочу сделать, это простая функция ThisRow_Col(rColumn As String) возвращает столбец X строки, из которой она ThisRow_Col(rColumn As String) . Скажем в B2, я вызываю = […]

Макрос для экспорта таблиц MS Word в листы Excel

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

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

Есть ли более быстрый способ сделать это? Set data = ws.UsedRange Set unique = CreateObject(“Scripting.Dictionary”) On Error Resume Next For x = 1 To data.Rows.Count unique.Add data(x, some_column_number).Value, 1 Next x On Error GoTo 0 В этот момент unique.keys получает то, что мне нужно, но сам цикл кажется очень медленным для файлов с десятками тысяч […]

Interesting Posts
Давайте будем гением компьютера.