Kaip pasirinkti diapazonus naudojant "Visual Basic" (pradedantiesiems pavyzdžius)

Pavyzdžiai, kaip pasirinkti langelius rankiniu būdu

Norėdami rankiniu būdu pasirinkti visus stulpelio duomenis, pažymėkite pirmąjį langelį ir paspauskite CTRL + SHIFT + RODYKLĖ ŽEMYN.

Taip pat, norėdami rankiniu būdu pasirinkti eilutę ir visus prie eilutės pridėtus stulpelius, paspauskite CTRL + SHIFT + RODYKLĖ ŽEMYN + RODYKLĖ DEŠINĖN. Tačiau visi duomenys turi būti gretimi (tai yra, jūs negalite turėti tuščių eilučių ar stulpelių). Be to, galite pasirinkti dabartinę duomenų sritį (gretimus duomenis be tuščių eilučių ar stulpelių) atlikdami šiuos veiksmus:

1. Meniu Redagavimas spustelėkite Eiti į.

2. Dialogo lange Eiti į spustelėkite Specialusis.

3. Dialogo lange Eiti į specialųjį spustelėkite Dabartinė sritis, tada spustelėkiteOK
   .

Šį diapazoną taip pat galite pasirinkti naudodami paprastą Visual Basic programų kodą.

Pastaba Jei bandysite įrašyti šią procedūrą naudodami makrokomandų įrašymo priemonę, negausite tų pačių rezultatų.

Pavyzdžiai, kaip naudoti Visual Basic kodą norint pažymėti langelius diapazone

"Microsoft" pateikia programavimo pavyzdžius tik iliustracijai, be išreikštos ar numanomos garantijos. Tai apima numanomas tinkamumo prekybai arba tinkamumo tam tikru tikslu garantijas, bet tuo neapsiribojant. Šiame straipsnyje daroma prielaida, kad esate susipažinę su demonstruotia programavimo kalba ir įrankiais, naudojamais procedūroms kurti ir derinti. "Microsoft" palaikymo inžinieriai gali padėti paaiškinti konkrečios procedūros funkcijas, tačiau jie nekeiskite šių pavyzdžių, kad galėtų teikti papildomas funkcijas arba kurti procedūras, kad atitiktų jūsų konkrečius reikalavimus. Toliau Visual Basic kodo pavyzdžiai rodo, kaip pasirinkti skirtingus diapazonus.

Jei žinote pradžios langelį (šiame pavyzdyje, pradžios langelis yra C1 langelis) ir norite pažymėti iki paskutinio langelio (tame pačiame stulpelyje), kuriame yra duomenų, bet nežinote šio adreso, naudokite šį kodą:

   Sub SelectRangeDown()
      Range("c1", Range("c1").End(xlDown)).Select
   End Sub

Pastaba Makrokomanda SelectRangeDown daro prielaidą, kad jūsų duomenys yra gretimi. Kitu atveju, jei duomenų stulpelyje yra tuščių langelių, ši makrokomanda gali nepasirinkti visų stulpelio langelių.

Jei jūsų duomenys prasideda langelyje C1, bet nėra gretimi šiame stulpelyje, naudokite šią makrokomandą 2003 m. Microsoft Office Excel ir ankstesnėse "Excel" versijose:

   Sub SelectRangeDown_Discontiguous()
      Range("c1", Range("c65536").End(xlUp)).Select
   End Sub

Kadangi Microsoft Office Excel 2007" palaiko 1 048 576 eilutes, 2007 m. Excel makrokomandą:

 Sub SelectRangeDown_Discontiguous()
      Range("c1", Range("c1048576").End(xlUp)).Select
   End Sub

Jei norite pasirinkti iš aktyvaus langelio žemyn ir visus stulpelius į dešinę (darant prielaidą, kad gretimi duomenys visose eilutėse ir stulpeliuose), naudokite šį kodą:

   Sub myrangearea()
      Range(ActiveCell, ActiveCell.End(xlDown).End(xlToRight)).Select
   End Sub

Jei žinote pradinį langelį (šiame kodo pavyzdyje pradinis langelis yra D1), o jūs norite pažymėti stulpelį žemyn ir į dešinę, naudokite šį kodą:

   Sub RangeFromStart()
      Range("d1", Range("d1").End(xlDown).End(xlToRight)).Select
   End Sub

Norėdami pasirinkti visus dabartinės srities duomenis, naudokite šį kodą:

   Sub CurrentArea()
      Selection.CurrentRegion.Select
   End Sub

Šiame straipsnyje pateikti pavyzdžiai rodo, kaip pasirinkti skirtingus diapazonus aktyviame dabartinės darbaknygės darbalapyje.

Jei reikia papildomos informacijos, kaip pasirinkti diapazonus su "Visual Basic for Applications" (ir daugiau išplėstinių pavyzdžių), spustelėkite toliau nurodytą straipsnio numerį ir peržiūrėkite straipsnį "Microsoft" žinių bazėje:

291308 Kaip pasirinkti langelius / diapazonus naudojant Visual Basic procedūras Excel