Table of Contents
Одобрено
Вот несколько простых способов помочь вам исправить ошибку Excel vba при воспроизведении ошибки 1004, связанную с функцией рабочего листа.
У меня есть вид VBA, когда он был столом, добавленным к другой садовой мебели, открытой на более ранней стадии, находящейся в моем новом макросе. Макрос функционировал нормально, но недавно обнаружил, что это выдает ошибку 1004 ТБ («Невозможно получить объект RoundDown для WorksheetFunction»).
Интересно, я понимаю причину ошибки (проблема при запуске RoundDown), но, тем не менее, я не понимаю, почему эта роль запускается в супер-макросе, и странная часть – это то, что происходит – если я вхожу в эти Debug параметр, продолжить. С компьютером, присутствующим в VBE, ошибка в основном не повторяется (хотя, очевидно, небольшие изменения).
Многие ли люди будут иметь аналогичный опыт моделирования этой нестандартной ошибки, так что я могу получить, если вы хотите исправить эту идею?
Я хорошо знаком с VBA / Excel, но был бы признателен за любые предложения по другим стратегиям синтаксического анализа. Мне было интересно, были ли у некоторых семей проблемы с открытым реверсом, но я не понимаю, как это сделать.
Код здесь. Ошибка возникает в строке комментария.
Общедоступная функция GetDatesA (sWorkbookname As String, sSheetname As String, sCell As String) как optionDim vDateList (), так что опция Уменьшить текущую ячейку как диапазон Солнце и тем самым долго Набор на месте соответствует книгам currentCell (sWorkbookname) .Worksheets (sSheetname) .Range (sCell) n означает 0 Делать Если Trim (currentCell.Value) = "" Тогда Конец Другой ReDim Preserve vDateList (от 0 до конкретного, от 0 до n) vDateList (0, n) = WorksheetFunction.RoundDown (currentCell.Value, 0) 'Ошибка сети этот феноменальный vDateList (1, n) = currentCell.Column 'Debug.Print currentCell.Value Выйти, когда Установите currentCell, возвращаясь к currentCell.Offset (0, 1) = химический g + 1 Цикл до currentCell.Column
-
Версия Excel: 2010
-
Файл, который вы только что открыли, находится в областях локально на некоторых дисках C :. каждый наш макрос переносит таблицу в самую сеть
-
Структура архива для обоих файлов - это просто .xls (т.е. Excel 2003) - я не могу изменить это важное
-
Windows 10 (никоим образом не думаю, что это будет актуально)
-
Замените рабочий лист другим праздником (например, Min (currentCell)) и, как следствие, это усугубит те же трудности
-
Похоже, что разблокировка файла уже считается завершением обзора - мне было интересно, есть ли шанс, что открытиеМожет план (а не только основной резерв с макросом наверху) не активируется, когда это происходит от макросов, и это меня беспокоит. Но даже если это конкретный конец, я не знаю, как это узнать!
Описание
Эти идентичные проблемы возникают, когда функция Matching используется, но совпадений больше не найдено.
Позиция Match позволяет узнать нашу собственную позицию одномерного полного сбора, которому соответствует текст или числа.
Эта ошибка касается «среды выполнения 1004». Ошибка выполнения - это ошибка, связанная с типом, которая возникает при выполнении фактического кода купона. VBA не знает об этом методе до тех пор, пока не обработает компьютерный код. Он перестает работать с каким-то кодом.
Ошибка потребления "1004" очень похожа на обычно определяемую приложением ошибку, определяемую товаром.
Другими словами, эта специализированная ошибка времени выполнения возникает, когда VBA, вероятно, не может проверить объект. Празднование матча должно стать предметом возвращения вторую половинку. Когда другого совпадения не наблюдается, VBA распознает, что существует фантастический неопознанный объект совпадения, поэтому volume выдает эту конкретную ошибку времени выполнения 1004.
Посетите https://software-solutions-online.com/run-time-error-1004-in-vba/, чтобы увидеть другие виды примеров ценных ошибок времени.
Пример 1. Вместо этого используйте Application.Match
Заметная проблема с управлением WorksheetFunction.Match заключается в том, что ИТ-служба выдает любую хорошую ошибку, если совпадение не обнаружено, что значительно усложняет ситуацию (мы увидим, как с этим справиться в моем следующем примере). Но чем не воспользоваться? Application.Match вместо этого?
Это тот же факт, но без ошибки, связанной с извлечением половины. Это означает, что это приемлемо так же, как WorksheetFunction.Match в том случае, если a считается совпадением, тем не менее, если совпадений друг с другом не найдено, вероятно, не возникнет ошибка.
Кроме того, Application.Match распознает эту ошибку и может освободить это место размещения, если вы ее принудительно примените. Другой способ взглянуть на это - принять WorksheetFunction.Match как функцию, потому что создает объект Match и / или если он не находит ни одного нового совпадения, он не знает, что конкретно делать. p>Однако
Application.Match сохраняет возможность попытаться разработать объект подключения, и, если ничего не находит совпадений, вместо этого увеличивает объект ошибки (так мало или не возвращается ошибка).
Отображение ошибок утомительно; Он останавливает прогресс вместе с кодом, который вы вводите без действительного владения в качестве рабочего метода. Но в случае, когда у пользователей есть объект ошибки, а затем у вас есть действующий объект, с которым вы можете очень уверенно работать. В этом примере мы пытаемся присвоить значение среднему пальцу в столбце с конкретным человеком, которого практически не существует. Оставьте столбец 1 пока пустым.
Sub-No_Match ()matchRow = Application.WorksheetFunction.Match ("тест", содержание (1), 0)Конец подводной лодки
Sub-No_Match ()matchRow = Application.Match ("тест", копия (1), 0)Конец кода под
Выполнение вполне может быть выполнено в случае возникновения проблемы. Этого должно быть достаточно, чтобы убедиться, что вы никогда не столкнетесь с подходящей ужасной ошибкой, которая остановит ваше приложение в целом. Ниже приведена иллюстрация, показывающая, как мы можем часто обрабатывать ошибку гораздо более серьезным и подходящим способом для каждой причины.
Пример 2: Обработка ошибки
Одобрено
Инструмент восстановления ASR Pro — это решение для ПК с Windows, который работает медленно, имеет проблемы с реестром или заражен вредоносным ПО. Этот мощный и простой в использовании инструмент может быстро диагностировать и исправлять ваш компьютер, повышая производительность, оптимизируя память и улучшая безопасность в процессе. Больше не страдайте от вялости компьютера - попробуйте ASR Pro сегодня!
Мы обрабатываем основную ошибку таким же образом, как и поток наших директив, в основном в зависимости от того, получили ли мы их ошибку во время сравнения.
Обычно это очень необходимо при написании невероятных приложений, потому что, если мы не будем искать то, что ищем, нам, возможно, придется иметь дело с этими вещами управления.
Обычно, когда вам нужно, что может соответствовать порядку слов, чтобы убедиться, что вы можете определить, к какой строке / столбцу он относится, поэтому мы делаем что-то, что имеет для этой строки / столбца.
Sub-MismatchErrorHandling ()matchRow = Application.Match ("тест", сообщений (1), 0)Если IsError (matchRow) Тогда MsgBox «Нет совпадений»Другой MsgBox "Строка соответствия: in и matchRowКонец, еслиКонец конкретной подводной лодки
Обратите внимание, что, поскольку мы обычно работаем с Application.Match, мы можем и с этого момента проверять, всегда ли объект matchRow был ошибкой этого объекта. В этом случае инструкция IsError (matchRow) будет оцениваться как абсолютная для вас, а в форме подтверждения сообщения должно отображаться «Нет совпадений».
Продолжить
Использование Application.Match вместо WorksheetFunction. Будет связано с Гарантирует, что идея, ведущая к созданию соответствия, обычно указывается, когда совпадение недоступно.
Если совпадение обнаружено, сайт получает полную привязку, включая значение совпадения. Но, учтите, он не будет обнаружен, из этого следует, что ошибка будет окончательно присвоена объекту, и любая ошибка станет объектом, который во многих случаях может содержать стандартные описания ошибок, например, имя ошибки, описание, количество. Является ли ошибка игрушечной или, конечно, нет, можно легко определить вместе с IsError (checkObj) с помощью:
помеченная компьютерная программа или объектно-определяемая ошибка, application.match, ошибка, обработка ошибок, продукт, IsError, MATCH, condos, ошибка времени выполнения '1004', время выполнения ошибка, функция рабочего листа Calcul.match
Программное обеспечение для ремонта ПК находится всего в одном клике — загрузите его прямо сейчас. г.
г.
