Kako uporabiti VBA Range Offset (11 načinov)

  • Deliti To
Hugh West

Č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.xlsm

11 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.

Hugh West je zelo izkušen trener Excela in analitik z več kot 10-letnimi izkušnjami v industriji. Po izobrazbi je diplomirani računovodstvo in finance ter magisterij poslovne administracije. Hugh ima strast do poučevanja in je razvil edinstven pristop k poučevanju, ki ga je enostavno slediti in razumeti. Njegovo strokovno znanje o Excelu je pomagalo na tisoče študentom in strokovnjakom po vsem svetu, da so izboljšali svoje sposobnosti in se izkazali v karieri. Prek svojega bloga Hugh deli svoje znanje s svetom, ponuja brezplačne vadnice za Excel in spletno usposabljanje, ki posameznikom in podjetjem pomaga doseči njihov polni potencial.