Kazalo
Če iščete nekaj najlažjih načinov uporabe VBA Range Offset, potem se vam bo ta članek zdel vreden ogleda. Začnimo z načini uporabe VBA Odmik območja.
Prenos delovnega zvezka
VBA Range Offset.xlsm11 načinov uporabe zamika obsega VBA
Imam naslednjo podatkovno tabelo, ki vsebuje informacije o nekaterih študentih neke visoke šole. Na podlagi tega nabora podatkov bom razložil načine uporabe VBA Odmik območja.
V ta namen sem uporabil Microsoft Excel 365 različico, lahko pa uporabite katero koli drugo različico glede na svoje potrebe.
Metoda-1: Izbira celice z uporabo območja VBA
Tu bomo izbrali celico z imenom Daniel Defoe. V ta namen bomo uporabili Funkcija RANGE na spletnem mestu VBA .
Korak-01 :
➤Najdi na Razvijalec Tab>> Visual Basic Možnost
Nato se Urejevalnik Visual Basic se bo odprlo.
➤Idi na Vstavite Tab>> Modul Možnost
Po tem je treba Modul bo ustvarjen.
Korak-02 :
➤Napišite naslednjo kodo
Sub SelectCell() Razpon("B8").Select End Sub
Izbral bo celico B8 .
➤Press F5
Rezultat :
Tako boste dobili celico, ki vsebuje Daniel Defoe izbrani.
Preberite več: Kako uporabiti predmet Range v programu VBA v Excelu
Metoda-2: Izbira skupine sosednjih celic z uporabo območja VBA
Izberete lahko območje sosednjih celic, kot je Ime in priimek učenca stolpec in Rezultat stolpec v naslednji preglednici po tej metodi.
Korak-01 :
➤Sledovati Korak-01 na spletnem mestu Metoda-1
Pod ContiguousCells() Razpon("B5:C10").Select End Sub
Izbral bo celice iz B5 na . C10 .
➤Press F5
Rezultat :
Po tem boste dobili celice v Stolpec B in . Stolpec C izbrani.
Metoda 3: Izbira skupine nesorodnih celic z uporabo območja VBA
Recimo, da želite izbrati učence z imenom William David in . Michael Anthony vključno z njihovimi ustreznimi Id e-pošte Za izbiro teh neskladnih celic lahko uporabite to metodo.
Korak-01 :
➤Sledovati Korak-01 na spletnem mestu Metoda-1
Sub nonContiguous() Range("B6,D6,B9,D9").Select End Sub
Izbral bo celice B6 , D6 , B9, in . D9 .
➤Press F5
Rezultat :
Nato boste dobili celice z imenom učenca. William David , Michael Anthony, in njuna ustrezna Id e-pošte izbrani.
Metoda-4: Izbira skupine nesorodnih celic in območja z uporabo območja VBA
S to metodo lahko hkrati izberete območje celic in nekatere nesorodne celice.
Korak-01 :
➤Sledovati Korak-01 na spletnem mestu . Metoda-1
Sub nonContiguouswithrange() Range("B5:B10,D6,D10").Select End Sub
Izbral bo obseg celic v območju B5:B10 in drugi dve celici D6 , D10 .
➤Press F5
Rezultat :
Nato boste dobili celice v stolpcu Ime in priimek učenca in dva E-poštne identitete za William David in . Donald Paul izbrani.
Metoda-5: Izbira območja z uporabo VBA Range Offset
Izberete lahko območje celic v Stolpec z imenom učenca z uporabo Funkcija OFFSET .
Korak-01 :
➤Sledovati Korak-01 na spletnem mestu Metoda-1
Sub selectrangeoffset() Range("A1:A6").Offset(4, 1).Select End Sub
Najprej, Razpon ("A1: A6") izbere območje A1:A6 in nato Odmik (4, 1) bo premaknil 4 vrstice navzdol iz celice A1 in 1 stolpec na desni strani. Nato se enako število celic v območju A1:A6 se izbere tukaj.
➤Press F5
Rezultat :
Tako boste izbrali stolpec Ime in priimek učenca .
Metoda-6: Negativni odmik obsega VBA
Izberete lahko Stolpec z e-poštno identiteto po tej metodi.
Korak-01 :
➤Sledovati Korak-01 na spletnem mestu . Metoda-1
Sub negativerangeoffset() Razpon("F11:F16").Offset(-6, -2).Select End Sub
Najprej, Razpon ("F11: F16") izbere območje F11:F16 in nato Odmik (-6, -2) se bo premaknilo 6 vrstic navzgor iz celice F11 in 2 stolpca na levi strani. Nato se enako število celic v območju F11:F16 se izbere tukaj.
➤Press F5
Rezultat :
Nato boste lahko izbrali stolpec Id e-pošte .
Podobna branja:
- VBA za vsako celico v območju v Excelu (3 metode)
- Kako šteti besedilo v Excelu (7 enostavnih trikov)
Metoda-7: Izbira območja glede na aktivno celico
Tu imamo aktivno celico (celica A1 ) in glede na to celico izberemo podatkovno območje v tej metodi.
Korak-01 :
➤Sledovati Korak-01 na spletnem mestu . Metoda-1
Sub actvcell() Range(activecell.Offset(4, 1), activecell.Offset(9, 3)).Select End Sub
Tukaj, activecell je . A1
Prvi del activecell.Offset(4, 1) bo izbral celico 4 vrstice navzdol in 1 stolpec desno od celice A1 in drugi del activecell.Offset(9, 3) bo izbral celico 9 vrstic navzdol in 3 stolpce desno od celice A1 .
Na koncu bodo izbrane vse celice med tema dvema celicama.
➤Press F5
Rezultat :
Nato boste lahko izbrali celotno območje podatkov.
Metoda-8: Kopiranje območja
Če želite kopirati območje celic, lahko uporabite to metodo.
Korak-01 :
➤Sledovati Korak-01 na spletnem mestu Metoda-1
Sub copyrangeoffset() Razpon("A1:A6").Offset(4, 1).Copy End Sub
Najprej, Razpon ("A1: A6") izbere območje A1:A6 in nato Odmik (4, 1) bo premaknil 4 vrstice navzdol iz celice A1 in 1 stolpec na desni strani. Nato se enako število celic v območju A1:A6 se izbere tukaj.
Na koncu bo kopiral vrednosti v območju B5:B10 .
➤Press F5
Rezultat :
Po tem boste lahko kopirali podatkovno območje v Stolpec z imenom učenca .
Metoda-9: Brisanje območja
Tukaj bomo prikazali način brisanja obsega podatkov z uporabo VBA koda.
Korak-01 :
➤Sledovati Korak-01 na spletnem mestu Metoda-1
Pod dltrangeoffset() Razpon("F11:F17").Offset(-7, -2).Delete End Sub
Prvič, Razpon ("F11: F17") izbere območje F11:F17 in nato Odmik (-7, -2) bo premaknil 7 vrstic navzgor iz celice F11 in 2 stolpca na levi strani. Nato se enako število celic v območju F11:F17 se izbere tukaj.
Na koncu izbriše območje D4:D10 .
➤Press F5
Rezultat :
Na ta način boste kopirali območje podatkov v Stolpec z e-poštno identiteto .
Metoda-10: Uporaba VBA Range Offset za vnos vrednosti
Tukaj imamo prazno celico (za razlago te metode smo odstranili vrednost v tej celici) v Stolpec z imenom učenca in ga želimo napolniti z imenom Joseph Michael . Z uporabo VBA kodo lahko enostavno vnesemo to vrednost.
Korak-01 :
➤Sledovati Korak-01 na spletnem mestu Metoda-1
Sub valuerangeoffset() Range("A1").Offset(6, 1).Value = "Joseph Michael" End Sub
Prvič, Razpon ("A1") izbere celico A1 in nato Odmik (6, 1) bo premaknil 6 vrstic navzdol iz celice A1 in 1 stolpec na desno stran. Nato se celica B7 bo izbrana in na koncu bo vnesena vrednost "Joseph Michael" v tej celici.
➤Press F5
Rezultat :
Tako boste dobili ime Joseph Michael v celici B7 .
Metoda-11: Uporaba VBA Range Offset za pridobivanje izhodnih podatkov
Recimo, da želite napisati Sprejeto ali Neuspešna korespondenca k imenom učencev glede na Stolpec z rezultati kjer je Prehod ali Fail je zapisan v oklepaju. Če želite najti ta podreženj v Stolpec z rezultati in ga zapišite v Stolpec Pass/Fail uporabite to metodo.
Korak-01 :
➤Sledovati Korak-01 na spletnem mestu Metoda-1
Sub CheckSubstring() Dim cell As Range For Each cell In Range("C5:C10") If InStr(cell.value, "Pass")> 0 Then cell.Offset(0, 1).value = "Passed" Else cell.Offset(0, 1).value = "Failed" End If Next cell End Sub
Tukaj je območje celic C5:C10 se izbere z Razpon ("C5: C10") ki je Stolpec z rezultati
InStr(vrednost celice, "Pass")> 0 je pogoj, v katerem je število večje od nič (ko celica vsebuje "Pass" ), potem se bo naslednja vrstica nadaljevala in v sosednji celici prikazala rezultat kot Sprejeto Pri tem bo sosednja celica izbrana z celica.Offset (0, 1) , kar pomeni, da se bo premaknil za 1 stolpec desno od vhodne celice.
Če pogoj postane napačen, pomeni, da celica ne vsebuje nobenega "Pass" nato vrstico pod Drugače se izvede in v sosednji celici poda izhodno vrednost kot Neuspešno .
Ta zanka se nadaljuje za vsako celico.
➤Press F5
Rezultat :
Nato boste dobili rezultate. Uspešno ali neuspešno v Pass/Fail stolpec.
Oddelek za prakso
Za samostojno izvajanje prakse smo pripravili Praksa kot spodaj v listu z imenom Praksa . Prosimo, da to storite sami.
Zaključek
V tem članku sem poskušal opisati najlažji način uporabe VBA učinkovito premikanje območij v Excelu. Upam, da vam bo koristilo. Če imate kakršne koli predloge ali vprašanja, jih lahko delite z nami.