Excel VBA -l on kaks meetodit, mis kuuluvad rakenduse objekti, kahe või enama vahemiku manipuleerimiseks: Union ja Intersect.
Liit
Liidu meetod tagastab kõik lahtrid kahes või enamas vahemikus, mis esitati selle argumendina.
Järgmine käsk valib alloleval pildil näidatud vahemiku:
| 1 | Liit (vahemik ("A1: B4"), vahemik ("B3: C6")). Valige |
Liidu meetodiga tagastatavale vahemikule saate määrata mis tahes väärtuse või valemi.
| 1 | Liit (vahemik ("A1: B4"), vahemik ("B3: C6")) = 10 |
Sellega sisestatakse liidu igas lahtris väärtus 10.
Võite liita mis tahes funktsiooni, mis võtab vahemiku kokku, liidu meetodi ümber. Järgnev näide tagastab väärtuste summa vahemikes A1: B4 ja B3: C6:
| 1 | Tulemus = Application.WorksheetFunction.Sum (liit (vahemik ("A1: B4"), vahemik ("B3: C6"))) |
Võite olla üllatunud, kui saate tulemuse väärtuseks 160! Ehkki valiku vaatamisel on liidus ainult 14 lahtrit (igas vahemikus 8, millest kaks on tavalised), tagastab Union tegelikult 16 lahtrit, seega on tulemus 160.
Ristub
Lõikemeetod tagastab argumendina ainult tavalised lahtrid kahes või enamas vahemikus.
Järgmine käsk valib alloleval pildil näidatud vahemiku (hall ala):
| 1 | Lõikab (vahemik ("A1: B4"), vahemik ("B3: C6")). Valige |
Intersecti kasutamine
Intersecti kõige tavalisem kasutamine on töölehe või töövihikuga seotud sündmustes. Seda kasutatakse selleks, et testida, kas muudetud lahtrid kuuluvad huvipakkuvasse vahemikku. Järgnev näide koos kontrolliga, kas lahtrit (lahtreid) on muudetud (tuvastatud sihtmärgi järgi) ja vahemik A1: A10 on tavalised, ja võtke asjakohased meetmed, kui need on olemas.
Lõikav objekt ei tagasta midagi, kui puuduvad ühised lahtrid, nii et lõikumine (sihtmärk, vahemik („A1: A10”)) pole midagi on tõene, kui ühiseid lahtreid pole. Kui lisate tingimusele Mitte, muudab selle tõeseks ainult siis, kui testi tulemus Lõikab (sihtmärk, vahemik („A1: A10”)) Ei midagi on vale, teisisõnu, sihtmärgil ja vahemikul A1: A10 on mõned ühised lahtrid.
| 12345 | Privaatne alamlehe muutmine (ByVal Target kui vahemik)Kui mitte ristuda (sihtmärk, vahemik ("A1: A10")) pole siis midagi'Tehke soovitud toimingLõpp KuiEnd Sub |
Kirjutas: Vinamra Chandra
