Spis treści
W tym artykule pokażemy kilka pomysłów na wykorzystanie Excela VBA ustawić zmienna zakresowa Na wybranych komórkach możemy wykonać kilka typowych operacji przy użyciu VBA W poniższym zestawie danych Excela pokazujemy kilka zachodnich nazwy zespołów i odpowiadające im wokaliści .
Pobierz Zeszyt ćwiczeń
VBA aby ustawić zakres na wybór.xlsm5 sposobów użycia VBA do ustawienia zmiennej zakresu do wyboru w Excelu
1) Ustawianie zmiennej zakresu, aby wybrać zakres przez Excel VBA
Możemy wybrać zakres poprzez zakres ustawień w VBA Załóżmy, że chcemy wybrać komórki B5:C8 . Przejdźmy do poniższej procedury.
Kroki:
- Aby napisać kod w VBA, najpierw otworzyć Zakładka Deweloper a następnie wybierz Visual Basic .
Następnie otworzy nowe okno Microsoft Visual Basic for Applications .
- Teraz, otwórz Wkładka >> wybierz Moduł
.
- Wpisz następujący kod w Moduł VBA .
Sub RangeSelect() Dim Rng1 As Range Worksheets("selectRange").Activate Set Rng1 = Range("B5:C8") Rng1.Select End Sub
Tutaj, my ustawiony the zakres B5:C8 jako Rng1 . We select it by Zakres Metoda z VBA . Keep that in mind that we need to aktywować nasz excel arkusz więc aktywowaliśmy selectRange arkusz.
- Teraz wróć do arkusz i uruchomić Makro .
- Po tym, zobaczysz zakres B5:C8 wybrany automatycznie.
W ten sposób można ustawić żądany zmienna zakresowa do wyboru za pomocą VBA .
Read More: Excel VBA: Pobierz zakres komórek z wartościami (7 przykładów)
2) Używanie VBA do formatowania komórek przez ustawienie zmiennej zakresu
Załóżmy, że nasz zbiór danych wygląda jak poniższy obrazek.
Chcemy, aby pozycja odważny i AutoFit the kolumny Możemy to zrobić poprzez VBA Zobaczmy, jak możemy to zrobić.
Kroki:
- Najpierw należy otworzyć Visual Basic i wpisz następujący kod w Moduł VBA (aby zobaczyć jak otworzyć Visual Basic oraz Moduł VBA , proszę udać się do Sekcja 1 ).
Sub SetRange() Dim xyz As Range Set xyz = Range("B4:C4") xyz.Font.Bold = True xyz.Select Worksheets("autofit").Columns("B:C").AutoFit End Sub
Tutaj ustawiamy zakres B4:C4 jako xyz . Then we used the Pogrubiona metoda, aby czcionki w komórce B4 oraz Pogrubienie C4 Zamontowaliśmy również kolumny B oraz C używając AutoFit metoda.
- Teraz wróć do arkusz i uruchomić Makro który jest nazwany jako SetRange .
Po tym, zobaczysz nazwy wyraźnie w kolumny i nagłówki stać się pogrubiona i wybrany.
Podążając tą drogą, możesz format komórki i AutoFit ustawienie kolumn zmienne zakresu w VBA .
Podobne lektury
- Jak używać VBA dla każdego wiersza w zakresie w Excelu
- Jak używać VBA, aby wybrać zakres z aktywnej komórki w programie Excel (3 metody)
- Makro Excel: Sortuj wiele kolumn z dynamicznym zakresem (4 metody)
3. kopiowanie zakresu przez ustawienie zmiennej wyboru zakresu w VBA
Załóżmy, że chcemy skopiować B6:C9 poprzez ustawienie zmienna zakresowa do wybierz Omówmy poniższą procedurę.
Kroki:
- Najpierw należy otworzyć Visual Basic i wpisz następujący kod w Moduł VBA (aby zobaczyć jak otworzyć Visual Basic oraz Moduł VBA , proszę udać się do Sekcja 1 ).
Sub CopyRange() Dim cpy As Range Set cpy = Range("B6:C9") cpy.Copy End Sub
Tutaj po prostu skopiowaliśmy zakres B6:C9 poprzez użycie Kopia sposób VBA . We set the zakres B6:C9 jako cpy .
- Teraz wróć do swojego arkusz i uruchomić Makra Wybierz CopyRange ponieważ jest to nazwa twojego obecnego Makro .
Zobaczysz zakres B6:C9 jest skopiowany.
Możesz wkleić to zakres w dowolnym miejscu w Excelu arkusz poprzez naciśnięcie CTRL + V . wkleiłem zakres poprzez B12 do C15 .
Postępując zgodnie z tą metodą, możesz kopia a zakres poprzez ustawienie zmienna zakresowa do wyboru w Excelu VBA .
Read More: Excel VBA: Kopiowanie dynamicznego zakresu do innego skoroszytu
4. formatowanie komórek kolorem poprzez ustawienie zmiennej zakresu na zaznaczenie
Załóżmy, że chcemy pokolorować 8. oraz 10. wiersze zbioru danych z zielony Prześledźmy poniższy opis.
Kroki:
- Najpierw należy otworzyć Visual Basic i wpisz następujący kod w Moduł VBA (aby zobaczyć jak otworzyć Visual Basic oraz Moduł VBA , proszę udać się do Sekcja 1 ).
Sub ColorRange() Dim color As Worksheet Dim x1 As Range Dim x2 As Range Set color = ActiveSheet Set x1 = Range("B8:C8") Set x2 = Range("B10:C10") x1.Cells.Interior.ColorIndex = 4 x2.Cells.Interior.ColorIndex = 4 End Sub
Tutaj definiujemy nasz zakres B8:C8 oraz B10:C10 jako x1 oraz x2 odpowiednio. Zrobiliśmy nasze kolor Excel Arkusz jako ActiveSheet i pokolorowaliśmy nasze pożądane zakresy przez Właściwość ColorIndex .
- Teraz wróć do swojego arkusz i uruchomić Makra Wybierz ColorRange ponieważ jest to nazwa aktualnego Makro .
Po tym, zobaczysz pożądany zakresy wypełniony zielony kolor.
W ten sposób można sformatować komórki za pomocą kolor poprzez ustawienie zmienna zakresowa do wyboru.
Read More: Jak używać zakresu ze zmiennym wierszem i kolumną w Excelu VBA
Podobne lektury
- VBA do pętli przez wiersze i kolumny w zakresie w Excelu (5 przykładów)
- Excel VBA do pętli przez zakres aż do pustej komórki (4 przykłady)
- Jak przekonwertować zakres na tablicę w Excelu VBA (3 sposoby)
5. usuwanie wierszy przez ustawienie zmiennej zakresu w VBA
Załóżmy, że chcemy usunąć 8. oraz 10. wiersze zbioru danych z zielony Prześledźmy poniższy opis.
Kroki:
- Najpierw należy otworzyć Visual Basic i wpisz następujący kod w Moduł VBA (aby zobaczyć jak otworzyć Visual Basic oraz Moduł VBA , proszę udać się do Sekcja 1 ).
Sub ColorRange() Dim color As Worksheet Dim x1 As Range Dim x2 As Range Set color = ActiveSheet Set x1 = Range("B8:C8") Set x2 = Range("B10:C10") x1.Cells.Interior.ColorIndex = 4 x2.Cells.Interior.ColorIndex = 4 End Sub
Na stronie zakresy które chcemy usunąć to. B8:C8 oraz B10:C10 . We named them as x1 oraz x2 Następnie usuwamy je przez Usuń metoda.
- Teraz wróć do swojego arkusz i uruchomić Makra . Wybierz DeleteRange ponieważ jest to nazwa twojego obecnego Makro .
Po tym, zobaczysz zakresy B8:C8 oraz B10:C10 zniknęły.
Postępując w ten sposób, można usunąć wiersze poprzez ustawienie zmienne zakresu do wyboru.
Część ćwiczeniowa
Na poniższym obrazku znajdziesz zestaw danych, na którym pracowaliśmy w tym artykule, abyś mógł poćwiczyć na własną rękę.
Wniosek
W skrócie, artykuł w pełni skupia się na niektórych aplikacjach do ustawiania zmienna zakresowa do wyboru przez Excela VBA Jeśli masz jakieś inne pomysły lub uwagi, uprzejmie zostaw je w polu komentarza. To pomoże mi wzbogacić moje nadchodzące artykuły.