Перейти до основного матеріалу

Як вибрати діапазон на основі значення комірки в іншому стовпці в Excel?

У цій статті я розповім про те, як вибрати діапазони на основі значення комірки в іншому стовпці. Візьмемо приклад, якщо клітинки відображають FALSE у стовпці C, відносні клітинки в стовпці A та стовпці B будуть вибрані, як показано нижче. Немає вбудованої функції, яка допоможе вам вирішити це завдання, але в цій статті я можу впоратися з цим за допомогою коду VBA.
doc виберіть за іншим стовпцем 1

Виберіть діапазон на основі значення комірки в іншому стовпці за кодом VBA


стрілка синя права міхур Виберіть діапазон на основі значення комірки в іншому стовпці за кодом VBA

Виберіть діапазон на основі значення комірки в іншому стовпці за кодом VBA

1. Увімкніть аркуш, який потрібно використовувати, і натисніть Alt + F11 клавіші, щоб увімкнути Microsoft Visual Basic для додатків вікна.

2. клацання Insert > Модулі, а потім вставте код нижче в новий Модулі вікна.

VBA: Виберіть діапазон на основі значення комірки

Sub SelectByCellValue()
'UpdatebyExtendoffice20161128
    Dim lastrow As Long
    Dim xRg As Range, yRg As Range
    'change Sheet1 to suit
    With ThisWorkbook.Worksheets("Sheet2")
        lastrow = .Cells(.Rows.Count, "C").End(xlUp).Row
        Application.ScreenUpdating = False
        For Each xRg In .Range("C1:C" & lastrow)
            If UCase(xRg.Text) = "FALSE" Then
                If yRg Is Nothing Then
                    Set yRg = .Range("A" & xRg.Row).Resize(, 2)
                Else
                    Set yRg = Union(yRg, .Range("A" & xRg.Row).Resize(, 2))
                End If
            End If
        Next xRg
        Application.ScreenUpdating = True
    End With

    If Not yRg Is Nothing Then yRg.Select
End Sub

doc виберіть за іншим стовпцем 2

3. прес F5 для запуску VBA, а потім діапазони були обрані на основі значень у стовпці C.

примітки: у сценарії VBA Аркуш2 - це назва активного аркуша, C вказує стовпець, який потрібно вибрати на основі, A та 2 in ("A" & xRg.Row). Змінити розмір (, 2) вказує, що для вибору двох стовпців зі стовпця А. Ви можете змінювати посилання, як вам потрібно.

Порада. Якщо ви хочете швидко вибрати клітинки, які дорівнюють певному значенню, спробуйте скористатися Kutools для Excel Виберіть певні клітини утиліта, як показано на наступному скріншоті. Повна функція без обмежень за 30 днів, будь ласка, завантажте та отримайте безкоштовну пробну версію зараз.

doc виділити конкретні комірки

Найкращі інструменти продуктивності офісу

Популярні функції: Знайдіть, виділіть або визначте дублікати   |  Видалити порожні рядки   |  Об’єднайте стовпці або клітинки без втрати даних   |   Раунд без Формули ...
Супер пошук: VLookup за кількома критеріями    Багатозначний VLookup  |   VLookup на кількох аркушах   |   Нечіткий пошук ....
Розширений розкривний список: Швидке створення випадаючого списку   |  Залежний спадний список   |  Виберіть розкривний список, що вибирається ....
Менеджер колонок: Додайте конкретну кількість стовпців  |  Перемістити стовпці  |  Перемкнути статус видимості прихованих стовпців  |  Порівняйте діапазони та стовпці ...
Особливості: Фокус сітки   |  Перегляд дизайну   |   Велика панель формул    Диспетчер робочих книг і аркушів   |  Бібліотека ресурсів (автотекст)   |  Вибір дати   |  Об’єднайте робочі аркуші   |  Шифрування/розшифрування клітинок    Надсилайте листи за списком   |  Супер фільтр   |   Спеціальний фільтр (фільтр жирний/курсив/закреслений...) ...
Топ-15 наборів інструментів12 текст Tools (додати текст, Видалити символи, ...)   |   50 + Графік типи (діаграма Ганта, ...)   |   40+ Практичний Формули (Розрахуйте вік на основі дня народження, ...)   |   19 вставка Tools (Вставте QR-код, Вставити зображення зі шляху, ...)   |   12 Перетворення Tools (Числа до слів, Валютна конверсія, ...)   |   7 Злиття та розділення Tools (Розширені комбіновані ряди, Розділені клітини, ...)   |   ... і більше

Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу.  Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...

вкладка kte 201905


Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations