Когда вы редактируете макрос или функцию Microsoft Office VBA, вы часто перемещаете курсор с незавершенной строки. Например, чтобы скопировать что-то, что вы хотите вставить в эту строку. Но если эта неполная строка синтаксически неверна, редактор VBA прерывает вашу работу, выскакивая сообщение...
Я написал следующий код: Function find_results_idle() Public iRaw As Integer Public iColumn As Integer iRaw = 1 iColumn = 1 И я получаю сообщение об ошибке: "недопустимый атрибут в подпрограмме или функции" Вы знаете, что я сделал не так? Я пытался использовать Globalвместо Public, но возникла та...
Это должно работать в соответствии с другим сообщением о переполнении стека, но это не так: Dim arrWsNames As String() = {"Value1", "Value2"} Может ли кто-нибудь сообщить мне, что не...
Я пытаюсь отобразить миллисекунды в макросе Excel. У меня есть столбец целых чисел, который представляет собой временные метки в миллисекундах (например, 28095200 - 7:48:15 200 am), и я хочу создать рядом с ним новый столбец, в котором хранится текущее среднее значение и отображается время в...
Я не пытаюсь начинать здесь спор, но по какой-то причине обычно утверждается, что Visual Basic нечувствителен к регистру, а языки C - нет (и почему-то это хорошо). Но вот мой вопрос: где именно Visual Basic нечувствителен к регистру? Когда я печатаю ... Dim ss As String Dim SS As String ... в...
Используя VBA, как я могу: проверить, существует ли файл, и если да, удали это?
У меня есть файл, который добавляется или изменяется вручную на основе введенных данных. Поскольку большая часть содержимого в этом файле повторяется, меняются только шестнадцатеричные значения, я хочу сделать его файлом, созданным инструментом. Я хочу написать коды c, которые будут напечатаны в...
Это одна из тех вещей, для которых, я уверен, есть встроенная функция (и, возможно, мне уже говорили об этом в прошлом), но я ломаю голову, чтобы вспомнить об этом. Как пройти через каждую строку многоколоночного диапазона с помощью Excel VBA? Все учебники, которые я искал, похоже, упоминают только...
Я хочу вставить оператор if в ячейку через vba, который включает двойные кавычки. Вот мой код: Worksheets("Sheet1").Range("A1").Value = "=IF(Sheet1!B1=0,"",Sheet1!B1)" Из-за двойных кавычек у меня возникают проблемы со вставкой строки. Как мне обрабатывать двойные...
Dim wkbkdestination As Workbook Dim destsheet As Worksheet For Each ThisWorkSheet In wkbkorigin.Worksheets 'this throws subscript out of range if there is not a sheet in the destination 'workbook that has the same name as the current sheet in the origin workbook. Set destsheet =
У меня есть несколько листов Excel, в которых используются флажки ActiveX для контроля определенных действий. Они работали недавно, но сегодня начали выдавать ошибки. Меня предупредил об этом коллега, но он все еще работал на моем компьютере. Я сравнил его версию Excel со своей, и его версия была...
Есть ли что-то, на что мне нужно сослаться? Как мне это использовать: Dim fso As New FileSystemObject Dim fld As Folder Dim ts As TextStream Я получаю сообщение об ошибке, потому что он не распознает эти...
Я пытаюсь написать сценарий, который открывает много файлов Excel. Я получаю подсказку: This workbook contains links to other data sources. Я хочу, чтобы это сообщение не появлялось, чтобы мой сценарий мог просто автоматически проходить через все книги, и мне не приходилось нажимать Don't Updateдля...
Я использую цикл While ... Wend в VBA. Dim count as Integer While True count=count+1 If count = 10 Then ''What should be the statement to break the While...Wend loop? ''Break or Exit While not working EndIf Wend Я не хочу использовать такие условия, как `Пока счет <= 10 ......
У меня есть лист Excel со следующим макросом. Я бы хотел зацикливать это каждую секунду, но, черт возьми, я могу найти функцию для этого. Разве это невозможно? Sub Macro1() ' ' Macro1 Macro ' Do Calculate 'Here I want to wait for one second Loop End...
У меня есть цикл for по массиву. Я хочу проверить наличие определенного условия в цикле и перейти к следующей итерации, если это правда: For i = LBound(Schedule, 1) To UBound(Schedule, 1) If (Schedule(i, 1) < ReferenceDate) Then PrevCouponIndex = i Continue '*** THIS LINE DOESN'T COMPILE, nor...
Я ищу способ добавить настраиваемую вкладку на ленту Excel, на которой было бы несколько кнопок. Я случайно наткнулся на некоторые ресурсы, посвященные этой проблеме через Google, но все они выглядят хитроумно и невероятно сложно. Как это сделать быстро и просто? Я бы хотел, чтобы новая вкладка...
Используя Microsoft Excel 2010, я заметил два типа элементов управления, которые можно вставить в документ: элементы управления формы и элементы управления ActiveX . В чем разница между ними?...
Есть ли в VBA код, которым я могу обернуть функцию, которая сообщит мне, сколько времени потребовалось для запуска, чтобы я мог сравнить разное время работы функций?...
Проблема в том, что !=не работает функция в excel vba. Я хочу иметь возможность использовать If strTest != "" Then вместо того If strTest = "" Then Есть ли другой подход к этому !=? Моя функция мимических !=IS Sub test() Dim intTest As Integer Dim strTest As String intTest = 5 strTest =...