vba — вопросы с ответами

У меня есть большой лист, который должен удалить все содержимое. Когда я пытаюсь просто очистить его без VBA, он переходит в не отвечающий режим. При использовании макроса, например: Sub ClearContents () Application.Calculation = XlManual Application.ScreenUpdating = False Sheets("Zeroes").Cell...

В VBA, какой самый прямой способ проверить, начинается ли строка с подстроки? Java имеет startsWith. Существует ли эквивалент VBA?

Не могли бы вы сообщить мне, каковы параметры формата .NumberFormat в Excel VBA? Поскольку вы полностью уверены, что Excel 2010 поддерживает следующие типы: [IMG_OUR_ID=266.png] Я знаю, что мы можем указать, например, Тип текста как: .NumberFormat ="@" или для числа: .NumberFormat = "0.00000" Не ...

В этом разделе кода Excel ALWAYS предлагает: "Файл уже существует, вы хотите перезаписать?" Application.DisplayAlerts = False Set xls = CreateObject("Excel.Application") Set wb = xls.Workbooks.Add fullFilePath = importFolderPath & "\" & "A.xlsx" wb.SaveAs fullFilePath, AccessMode:=xlExclus...

Может ли String.Format() быть реализован в VB6, по крайней мере, достаточно близкой версии, которая может быть полезна при программировании в хорошем ol VB6? Хороший ресурс по вопросу производительности работы с строкой VB6: http://www.aivosto.com/vbtips/stringopt2.html На связанном нет, я также ...

Я пытаюсь разобрать текстовый документ с помощью VBA и вернуть путь, указанный в текстовом файле. Например, текстовый файл будет выглядеть так: *Blah blah instructions *Blah blah instructions on line 2 G:\\Folder\...\data.xls D:\\AnotherFolder\...\moredata.xls Я хочу, чтобы VBA загружал по 1 строк...

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

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

Мне нужно преобразовать строку, полученную из excel, в VBA в interger. Для этого я использую CInt(), который работает хорошо. Однако есть вероятность, что строка может быть чем-то иным, чем числом, в этом случае мне нужно установить целое число в 0. В настоящее время у меня есть: If oXLSheet2.Cells(...

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

У меня есть лист Excel с данными, которые я хочу получить между ними. Я уже пытался экспортировать как текст, читать из script (php), запустить Levenshtein (рассчитать расстояние Левенштейна), сохранить его, чтобы снова преуспеть. Но я ищу способ программно рассчитать расстояние Левенштейна в VBA. К...

Скажем, у меня есть следующий код: Sub TestRangeLoop() Dim rng As Range Set rng = Range("A1:A6") ''//Insert code to loop through rng here End Sub Я хочу иметь возможность выполнять итерацию через набор объектов Range для каждой ячейки, указанной в rng. Концептуально, я хотел бы сделать...

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

Я использую ключевое слово Call при вызове subs в VB/VBA. Я знаю, что это необязательно, но лучше ли использовать его или оставить его? Я всегда думал, что это было более явным, но, возможно, это просто шум. Кроме того, я читаю это на другом форуме: использование ключевого слова Call выполняется быс...

Я хочу проверить пустые массивы. Google дал мне разнообразные решения, но ничего не получилось. Возможно, я не применяю их правильно. Function GetBoiler(ByVal sFile As String) As String 'Email Signature Dim fso As Object Dim ts As Object Set fso = CreateObject("Scripting.FileSystemObject...