Как ссылаться на таблицы в VBA

Я помещаю кнопку на листе, чтобы разрешить прописку всех элементов в двух столбцах в таблице.

Вот код, который я нашел в другом месте и приспособлен для работы:

Private Sub CommandButton1_Click() With Range("B10", Cells(Rows.Count, "B").End(xlUp)) .Value = Evaluate("INDEX(UPPER(" & .Address(External:=True) & "),)") End With With Range("C10", Cells(Rows.Count, "C").End(xlUp)) .Value = Evaluate("INDEX(UPPER(" & .Address(External:=True) & "),)") End With End Sub 

Я хочу, чтобы Range ссылался на таблицу 2, столбцы 1 и 2 вместо B & C.

Предложения?

Для доступа ко всем видам табличных диапазонов и ссылок вам необходимо использовать ListObject . Вот пример:

 Option Explicit Sub test() Dim ws As Worksheet Dim t2 As ListObject Set ws = ActiveSheet Set t2 = ws.ListObjects("Table2") Debug.Print t2.ListColumns(1).Name Dim refRange As Range Set refRange = Union(t2.ListColumns(1).Range, t2.ListColumns(2).Range) Debug.Print refRange.Address End Sub 
  • VBScipt to Excel - Синтаксис функции диапазона
  • Создайте именованный диапазон в листе excel, используя oledb и C #
  • VBA Excel: копировать столбец с начальной позицией и местом назначения
  • Количество строк в excel
  • Excel Ошибка 1004 при использовании диапазонов с VBA
  • VBA для поиска значений и изменения формата для Row + 2
  • Создание диаграммы из данных массива, а не диапазона
  • Ошибка диапазона установки в VBA 2
  • windows.visible = false, предотвращающий использование именованного диапазона
  • ошибка 1001 времени выполнения появляется в копии файла, но не оригинала
  • Запись 2-го измерения в Range из 2D-варианта без зацикливания в VBA
  • Interesting Posts

    Форматирование HTML в Excel: валюта формата mso-number без десятичного знака?

    Excel VBA Delete Row на основе значения столбца

    Скопируйте 3 строки данных из одной книги в другие книги с помощью макроса excel

    Сводная таблица добавляет значение «2» в значение «Фильтр отчетов»

    Как найти стандартное отклонение в Excel быстрее?

    Не удается открыть файлы .msg

    Преобразовать CMD cURL в код Excel VBA, чтобы получать данные JSON на сайте HTTPS?

    Можно ли создать новую книгу из строк, найденных в поиске «Найти все»?

    Совокупные строки Excel на основе полей – конкатенации значений

    Код VBA, фильтрующий столбец, затем заполняющий формулу для видимых ячеек в другом столбце

    Excel CurrentProject.Path, ошибка во время выполнения 424

    Использование VBA в Excel для сортировки таблицы без имени таблицы

    Как отформатировать различные форматы DOB в Excel?

    Excel: выбор самого низкого статуса в списке

    Подсчитайте количество раз, когда строка возникает в месяц

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