Mündəricat
Bu məqalədə mən sizə Excel-də VBA -də hüceyrə istinadına necə daxil ola biləcəyinizi göstərəcəyəm. Siz tək xanaya, eləcə də çoxlu xanalara birlikdə daxil olmağı öyrənəcəksiniz.
Təcrübə İş Kitabını endirin
Oxuyarkən tapşırığı yerinə yetirmək üçün bu təcrübə kitabını endirin. bu məqalə.
VBA Cell Reference.xlsm
Excel VBA-da Hüceyrə Referansına müraciət etməyin 8 yolu
Burada Martin Kitab Dükanı adlı kitab mağazasının bəzi kitablarının Kitab Adı , Kitab Növləri, və Qiyməti ilə data dəsti var.
Məlumat dəsti iş vərəqinin B4:D13 diapazonunda yerləşir.
Bu gün bizim məqsədimiz hüceyrə istinadlarına istinad etməyi öyrənməkdir. VBA ilə bu məlumat dəsti.
Budur, Excel-də VBA ilə hüceyrə istinadına müraciət etməyin ən yaxşı 8 yolu.
1. Excel-də VBA-da Aralıq Obyektindən istifadə etməklə Hüceyrə İstinadına müraciət edin
İlk növbədə, siz VBA-nın Range obyektindən istifadə edərək xana istinadına müraciət edə bilərsiniz. .
Siz Range obyekti ilə həm tək xanaya, həm də bir sıra xanalara istinad edə bilərsiniz.
Məsələn, tək xanalı B4 , kod xəttini istifadə edin:
Dim Cell_Reference As Range
Set Cell_Reference = Range("B4")
Aşağıdakı kod B4 xanasını seçir.
O, aktiv iş vərəqində B4 xanasını seçəcək.
Eyni şəkildə, siz burada bir sıra xanalara daxil ola bilərsinizyol.
Dim Cell_Reference As Range
Set Cell_Reference = Range("B4:D13")
Aşağıdakı kod diapazonu seçir B4 :D13 .
O, B4:D13 xanalarının diapazonunu seçəcək.
Qeyd : Siz Range obyektini ilk elan etmədən birbaşa istifadə edə bilərsiniz, məsələn:
Range("B4:D13").Select Həmçinin, aktiv olmayan iş vərəqinin hər hansı xanasına daxil olmaq istəyirsinizsə, Range obyektindən əvvəl iş vərəqinin adından istifadə edin.
Məsələn, xanaya daxil olmaq üçün < Cədvəl2 -dən 1>B4 , istifadə edin:
Worksheets("Sheet2").Range("B4:D13")
2. Excel-də VBA-da İndeks Nömrələrindən İstifadə etməklə Hüceyrə İstinadına baxın
Siz həmçinin İndeks nömrələrindən istifadə edərək xana istinadına müraciət edə bilərsiniz. Lakin bu üsulda siz yalnız bir xanaya müraciət edə bilərsiniz.
Məsələn, sətir nömrəsi 4 və sütun nömrəsi 2 (<) olan xanaya daxil olmaq üçün 1>B4 ), istifadə edin:
Cells(4, 2)) Aşağıdakı kod yenidən aktiv iş vərəqinin B4 xanasını seçir.
O, B4 xanasını seçəcək.
Qeyd: Aktiv olmayan iş vərəqinin istənilən xanasına daxil olmaq üçün xana istinadından əvvəl iş vərəqinin adından istifadə edin.
Məsələn:
Worksheets("Sheet2").Cells(4, 2) [ 1-ci üsulla eyni ] .
3. Excel-də VBA-da Başqa Hüceyrə ilə Münasibətdə Hüceyrə İstinadına baxın
Siz həmçinin VBA -də başqa xanaya nisbətən xana istinadına müraciət edə bilərsiniz. Üçün VBA -nin Ofset funksiyasından istifadə etməlisinizbu.
B4 (D5) xanasının 1 sətir aşağı və 2 sağ sütununa daxil olmaq üçün:
istifadə edin. Range("B4").Offset(1, 2) Aşağıdakı kod aktiv iş vərəqinin D5 xanasını seçir.
Bu' D5 xanasını seçin.
Qeyd: İş vərəqinin qeyri-aktiv olan hər hansı xanasına istinad etmək üçün xananın adından istifadə edin xana istinadından əvvəl iş vərəqi.
Məsələn:
Worksheets("Sheet2").Range("B4").Offset(1, 2) [ Metod 1 və 2 ilə eyni ] .
4. Excel-də VBA-da Qısayol Qeydindən İstifadə etməklə Hüceyrə İstinadına baxın
VBA -da istənilən xana istinadına daxil olmaq üçün qısayol qeydi mövcuddur. Bu şəkildə həm tək xanaya, həm də bir sıra xanalara istinad edə bilərsiniz.
B4 xanasına daxil olmaq üçün istifadə edin:
[B4] Və ya B4:D13 diapazonuna daxil olmaq üçün istifadə edin:
[B4:D13]
Aşağıdakı kodu B4:D13 diapazonunu seçir.
O, B4:D13 diapazonunu seçəcək.
Qeyd: Qeyri-aktiv iş vərəqinin hər hansı xanasına istinad etmək üçün xana istinadından əvvəl iş vərəqinin adından istifadə edin.
Məsələn:
Worksheets("Sheet2").[B4:D13] [ Metod 1, 2 və 3 ] ilə eynidir.
Oxşar Oxumalar:
- Excel Formulasında hüceyrəni necə kilidləmək olar (2 üsul)
- Excel-də Mütləq Hüceyrə İstinad Qısayolu (4 Faydalı) Nümunələr)
- Excel Formulasında Hüceyrənin Sabit Saxlanması (4 Asan Yol)
- Hüceyrə İstinadlarından İstifadə EdinExcel Formulasında (3 Yol)
5. Excel-də VBA-da Adlandırılmış Aralığa baxın
Siz Excel-də VBA ilə Adlı Aralığa müraciət edə bilərsiniz.
Gəlin ad verək aktiv iş vərəqinin B4:D13 diapazonu Kitab_Siyahısı kimi.
İndi biz müraciət edə bilərik bu Adlı Aralıq kod xətti ilə:
Range("Book_List") Aşağıdakı kod Kitab_Siyahısı (<1) diapazonunu seçir>B4:D13 ).
O, Kitab_Siyahısı diapazonunu seçəcək.
Qeyd: Qeyri-aktiv iş vərəqinin istənilən xanasına daxil olmaq üçün xana istinadından əvvəl iş vərəqinin adından istifadə edin.
Məsələn:
Worksheets("Sheet2").Range("Book_List") [ Metod 1, 2, 3 və 4 ] ilə eynidir.
6. Excel-də VBA-da Çoxlu diapazona baxın
Siz həmçinin Excel-də VBA -də çoxsaylı diapazonlara müraciət edə bilərsiniz.
B4 diapazonuna daxil olmaq üçün: D5 , B7:D8 və B10:D11 istifadə edin:
Range("B4:D5,B7:D8,B10:D11") 
Birdən çox diapazonu birlikdə seçəcək.
Həmçinin, siz Union xassəsindən istifadə edə bilərsiniz. birdən çox diapazona birlikdə daxil olmaq üçün VBA .
Union(Range("B4:D5"), Range("B7:D8"), Range("B10:D11")) Və ya çoxlu Adlı Aralıqlara birlikdə daxil ola bilərsiniz.
Range("Named_Range_1,Named_Range_2") Həmçinin, iş vərəqinin adını qeyri-aktiv iş vərəqlərinin qarşısına qoyun.
Məsələn:
Worksheets("Sheet2").Range("B4:D5,B7:D8,B10:D11") [ 1, 2, 3, 4 və 5 üsulları ilə eynidir ]
7. Excel-də VBA-da Satır və Sütunlara baxın
Siz həmçinin birinə müraciət edə bilərsinizExcel-də VBA-da və ya daha çox sətir və ya sütun.
4-cü sıraya daxil olmaq üçün istifadə edin:
Rows (4) 
O, bütün 4-cü cərgəni seçəcək.
Eyni şəkildə, Sütunlar (4) bütün 4-cü sütununa daxil olacaq.
Və birlikdə bir neçə sətir və ya sütuna daxil olmaq üçün VBA<-nın Union xassəsindən istifadə edin. 2>.
4, 6, 8, və 10 sətirlərinə birlikdə daxil olmaq üçün istifadə edin:
Union(Rows(4), Rows(6), Rows(8), Rows(10)) 
Bütün sətirləri seçəcək 4, 6, 8 və 10 .
Qeyd: İş vərəqi qeyri-aktivdirsə, onun adını qabağa əlavə edin.
Məsələn:
Worksheets("Sheet2").Rows (4) [ Metod 1, 2, 3, 4, 5 və 6 ilə eynidir ]
8. Excel-də VBA-da Bütün İş Vərəqinə baxın
Nəhayət, bütün iş vərəqinə müraciət etməyi sizə göstərəcəyəm. VBA -də bütün iş vərəqinə daxil olmaq üçün istifadə edin:
Cells Və ya qeyri-aktiv iş vərəqinə müraciət etmək üçün (Məsələn, Cədvəl2) ), istifadə edin:
Worksheet("Sheet2").Cells 
Bütün iş vərəqini Cədvəl2 seçəcək.
Əlaqədar Məzmun: Cədvəldəki Nisbi və Mütləq Hüceyrə Ünvanı
Yadda saxlanmalı olanlar
- Aktiv iş vərəqinin bir və ya bir neçə xanasına daxil olmaq üçün siz iş səhifəsinin adını qarşısında qeyd edə və ya qeyd edə bilməzsiniz, lakin qeyri-aktiv iş vərəqinin xanalarına daxil olmaq üçün iş vərəqinin adını qeyd etməlisiniz. xana istinadının önü.
- Hətta edə bilərsiniz VBA -də qeyri-aktiv iş kitabının xanalarına daxil olmaq üçün, bu halda, xana istinadının qarşısında həm iş kitabının adını, həm də iş səhifəsinin adını qeyd etməlisiniz.
Nəticə
Bu üsullardan istifadə edərək Excel-də VBA ilə istənilən xana istinadına müraciət edə bilərsiniz. Hər hansı bir sualınız var? Bizdən soruşmaqdan çekinmeyin.
