Одна вещь, которую вы должны иметь в виду, пока написание кода VBAНаписание кода VBAКод VBA относится к набору инструкций, написанных пользователем на языке программирования приложений Visual Basic в редакторе Visual Basic (VBE) для выполнения определенной задачи.читать далее это то, что вы делаете с обычным рабочим листом, и вы можете воспроизвести то же самое в VBA. Одним из таких ключевых слов в кодировании VBA в этой статье является «XLUP». Мы покажем вам, что это за ключевое слово в кодировании VBA и как его использовать в кодировании.
Вы можете использовать это изображение на своем веб-сайте, в шаблонах и т. д. Пожалуйста, предоставьте нам ссылку на авторствоКак предоставить атрибуцию?Ссылка на статью должна быть гиперссылкой Например: Источник: VBA XLUP (wallstreetmojo.com)
Пример №1 – Переехать Клетки к Удалено Положение Клетки
Например, посмотрите на сценарий приведенных ниже данных, где вам нужно удалить эти данные цветных ячеек и больше данных строк ниже к приведенным выше данным.
Один из способов удалить это на листе — выбрать те ячейки, в которых мы можем просто удалить всю строку. Но здесь ситуации немного сложны, потому что я закрашиваю ячейки в таблице 1, когда мы удаляем всю строку, даже строки таблицы 2 также удаляются, но мы не хотим, чтобы это произошло; вместо этого нам нужно только удалить цветные строки, а нижние ячейки должны переместиться вверх по позиции удаленных ячеек.
Сначала выберите цветные ячейки и нажмите Ctrl + символ минус (-) чтобы открыть опцию «Удалить».
Горячая клавиша для открытия опции «Удалить»
В окне параметров «удалить» у нас есть четыре параметра. Мы можем выбрать действие согласно нашему требованию. Поскольку нам нужно переместить наши ячейки вверх для этих удаленных ячеек, выберите «Shift Cell Up».
Что ж имеют без изменений Таблица 2 ряды.
Это действие в VBA требует использования свойства «XLUP» для выполнения аналогичного набора действий в VBA. Теперь подойдите к окну редактор VBAРедактор VBAРедактор Visual Basic для приложений — это интерфейс сценариев. Эти сценарии в первую очередь отвечают за создание и выполнение макросов в программном обеспечении Microsoft.читать далее и начните имя вашего макроса.
Код:
Sub XLUP_Example()
End Sub
Во-первых, укажите диапазон ячеек, который будет включен в эту операцию. В этом действии первые ячейки, которые будут удалены и перемещены вверх, — это ячейки «A5: B5».
Код:
Sub XLUP_Example()
Range ("A5:B5")
End Sub
Для этого диапазона ячеек выберите метод «Удалить».
Код:
Sub XLUP_Example()
Range("A5:B5").Delete
End Sub
Как видите, для метода «Удалить» у нас есть один необязательный аргумент: [Shift]. За этот аргумент, нам нужно ввести аргумент как «XLUP».
Код:
Sub XLUP_Example()
Range("A5:B5").Delete shift:=xlUp
End Sub
Теперь вы можете запустить этот код вручную или через горячая клавиша эксельКлавиша быстрого доступа ExcelЯрлык Excel — это способ более быстрого выполнения ручного задания.читать далее F5, чтобы увидеть результат.
Как вы можете видеть в таблице 1, у нас есть строка с номером 6, перемещенная до 5.й строка, а с другой стороны таблица, строка 2 (цветная) не изменяется, поэтому, используя опцию «VBA XLUP», мы можем выполнить эту операцию.
Пример № 2. Поиск последней использованной строки с помощью XLUP
Представьте ситуацию, когда вы находитесь в ячейке A20 (посмотрите на изображение ниже), а ваша последняя использованная ячейка — A14.
Теперь, если вы хотите выбрать последнюю использованную ячейку (A14), как вы это сделаете, используя горячую клавишу???
мы бы использовали Ctrl + стрелка вверх клавиша для перехода к последней использованной ячейке из текущей позиции.
Горячая клавиша для перехода к последней использованной ячейке
Итак, из текущей ячейки Ctrl+Стрелка вверх выбрала последнюю использовавшуюся ячейку. Точно так же в кодировании VBA мы используем КОНЕЦ (XLUP) выполнить то же самое.
Теперь вернитесь в окно кодирования VBA.
В этом окне мы выполним задачу поиска последней использованной строки на листе. Создать новый подпроцедура в VBAПодпроцедура в VBASUB в VBA — это процедура, которая содержит весь код, который автоматически дает оператор end sub, а средняя часть используется для кодирования. Оператор Sub может быть как общедоступным, так и частным, а имя подпроцедуры является обязательным в VBA.читать далее окно.
Код:
Sub XLUP_Example1()
End Sub
Для хранения номера последней использованной строки. определить переменную как ДЛИННЫЙ тип данных VBAДЛИННЫЙ тип данных VBALong — это тип данных в VBA, который используется для хранения числовых значений. Мы знаем, что целые числа также хранят числовые значения, но тип Long отличается от целых тем, что диапазон для хранения данных намного больше в случае типа данных long.читать далее.
Код:
Sub XLUP_Example1()
Dim Last_Row_Number As LongEnd Sub
Теперь для этой переменной мы назначим последний использованный номер строки.
Код:
Sub XLUP_Example1()
Dim Last_Row_Number As Long
Last_Row_Number =
End Sub
В настоящее время использовать объект RANGEИспользуйте объект RANGEДиапазон — это свойство в VBA, которое помогает указать конкретную ячейку, диапазон ячеек, строку, столбец или трехмерный диапазон. В контексте рабочего листа Excel объект диапазона VBA включает одну или несколько ячеек, распределенных по различным строкам и столбцам.читать далее и откройте этот объект.
Код:
Sub XLUP_Example1()
Dim Last_Row_Number As Long
Last_Row_Number = Range(
End Sub
Теперь укажите активную ячейку (A20) для ДИАПАЗОН объект.
Код:
Sub XLUP_Example1()
Dim Last_Row_Number As Long
Range("A14").Select
Last_Row_Number = Range("A20")
End Sub
Теперь откройте свойство END для предоставленной ячейки диапазона.
Код:
Sub XLUP_Example1()
Dim Last_Row_Number As Long
Range("A14").Select
Last_Row_Number = Range("A20").End(
End Sub
Как вы можете видеть выше, мы должны использовать клавиши со стрелками, такие как «xlDown», «xlToLeft», «xlToRight», «xlUp». Поскольку мы движемся вверх от ячейки A14, выберите опцию «VBA XLUP».
Код:
Sub XLUP_Example1()
Dim Last_Row_Number As Long
Range("A14").Select
Last_Row_Number = Range("A20").End(xlUp)
End Sub
После перехода вверх из ячейки A14 нам нужно указать, что нам нужно сделать, поскольку нам нужен номер последней использованной строки, я буду использовать свойство ROW.
Код:
Sub XLUP_Example1()
Dim Last_Row_Number As Long
Range("A14").Select
Last_Row_Number = Range("A20").End(xlUp).Row
End Sub
Теперь для окна сообщения присвойте значение переменной «Последний_ряд_номер».
Код:
Sub XLUP_Example1()
Dim Last_Row_Number As Long
Range("A14").Select
Last_Row_Number = Range("A20").End(xlUp).Row
MsgBox Last_Row_Number
End Sub
Теперь вы можете запустить этот код вручную или с помощью сочетания клавиш F5, чтобы увидеть результат.
Таким образом, окно сообщения, показывающее номер последней использованной строки как 14, поэтому номер последней использованной строки данных — ячейка A14.
В этом случае, поскольку данных очень мало, мы начали с ячейки комнаты, но когда данных много, мы не можем сказать, какую ячейку учитывать в первую очередь. В таких случаях нам нужно использовать другую технику.
Нам нужно использовать свойство CELLS. Ниже приведен пример того же самого.
Код:
Sub XLUP_Example2()
Dim Last_Row_Number As Long
Last_Row_Number = Cells(Rows.Count, 1).End(xlUp).Row
MsgBox Last_Row_Number
End Sub
Теперь вы можете запустить этот код вручную или с помощью сочетания клавиш F5, чтобы увидеть результат.
Вместо объекта RANGE я использовал свойство CELLS. Позвольте мне объяснить вам это подробно.
ROW.COUNT это будет подсчитывать, сколько строк в столбце 1. Что это сделает, так это будет учитывать последнюю ячейку на листе вместо случайного адреса ячейки. В приведенном выше случае мы использовали A14 в качестве случайного адреса ячейки.
Что следует помнить о VBA XLUP
XLUP — это слово, используемое в коде VBA для воспроизведения действия клавиши «Стрелка вверх» в Excel.
VBA XLUP используется для перехода от активных ячеек к указанной выше ячейке или к последней использованной ячейке.
XLUP обычно используется вместе со свойством END в VBA.