Összefoglalás

A Microsoft Excel tartomány cellái kijelölhetők manuálisan vagy egy egyszerű Microsoft-kód Visual Basic for Applications használatával. Ez a cikk példákat mutat be egy cellatartomány kijelölésére.

További információ

Példák a cellák manuális kijelölésére

Egy oszlop összes adatának manuális kijelöléséhez jelölje ki az első cellát, és nyomja le a CTRL+SHIFT+LE billentyűkombinációt.

Hasonlóképpen, ha manuálisan szeretne kijelölni egy sort és a sorhoz csatolt összes oszlopot, nyomja le a CTRL+SHIFT+LE+JOBBRA billentyűkombinációt. Az összes adatnak azonban összefüggőnek kell lennie (vagyis nem lehet üres sor vagy oszlop). Az alábbi lépéseket választva kijelölheti az adatok aktuális adathalmazát (összefüggő adatokat, üres sorok vagy oszlopok nélkül):

  1. A Szerkesztés menüben kattintson az Ugrás parancsra.

  2. Az Ugrás párbeszédpanelen kattintson az Speciális gombra.

  3. Az Ugrás az speciálisra párbeszédpanelen kattintson az Aktuális terület elemre, majd az
    OK gombra.

Egyszerű kód használatával is kijelölheti ezt Visual Basic for Applications tartományt.

Megjegyzés: Ha ezt az eljárást a makrórögzítővel próbálja rögzíteni, az eredmény nem ugyanaz lesz.

Példák tartomány celláinak Visual Basic kijelölésére Visual Basic kód használatával

A Microsoft csak illusztrációkhoz biztosít programozási példákat, jótállás kifejezett vagy vélelmezett nélkül. Ez többek között magában foglalja az adott célra való forgalomra vagy alkalmasságra vonatkozó vélelmezett garanciát. Ez a cikk abból indul ki, hogy Ön ismeri a bemutatott programnyelvet, valamint az eljárások létrehozására és a hibakeresésre használt eszközöket. A Microsoft támogatási szakemberei elmagyarázzák egy adott eljárás működését, de nem módosítják ezeket a példákat, hogy további funkciókat vagy az Ön igényeinek megfelelő eljárásokat építsen ki. Az alábbi Visual Basic kódmintákból azt tudható meg, hogy miként jelölheti ki az egyes tartományokat.

Ha ismeri az első cellát (ebben a példában a kezdő cella a C1 cella), és az utolsó cellát szeretné kijelölni (ugyanabban az oszlopban), amely tartalmaz adatokat, de nem ismeri ezt a címet, használja a következő kódot:

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

Megjegyzés: A SelectRangeDown makró azt feltételezi, hogy az adatok összefüggőek. Ellenkező esetben, ha a kijelölt adatoszlop üres cellákat tartalmaz, előfordulhat, hogy a makró nem jelöl ki minden cellát az oszlopban.

Ha az adatok a C1 cellában kezdődik, de abban az oszlopban nem összefüggőek, használja a következő makrót a Microsoft Office Excel 2003-as és korábbi verziói Excel ban:

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

Mivel Microsoft Office Excel 2007 1 048 576 sort támogat, a 2007-es Excel makrót használja:

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

Ha az aktív cellából lefelé és jobbra az összes oszlopot ki szeretné választani (feltéve, hogy minden sorban és oszlopban összefüggő adatok láthatók), használja a következő kódot:

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

Ha ismeri a kezdő cellát (ebben a mintakódban a D1 kezdő cella), és az oszlopban lefelé és jobbra szeretné kijelölni, használja a következő kódot:

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

Az aktuális régió összes adatának kijelöléséhez használja az alábbi kódot:

   Sub CurrentArea()
Selection.CurrentRegion.Select
End Sub

A cikkben szereplő példák bemutatják, hogy miként jelölheti ki az aktuális munkafüzet aktív munkalapja különböző tartományokat.

Ha további információra van szükség arról, hogy miként jelöljön ki tartományokat a Visual Basic for Applications-val (és további példákat is talál), kattintson a következő cikkszámra a Microsoft Tudásbázisban található cikk megtekintéséhez:

291308 Cellák és tartományok kijelölése a Visual Basic eljárásokkal Excel

További segítségre van szüksége?

Ismeretek bővítése
Oktatóanyagok megismerése
Új szolgáltatások listájának lekérése
Csatlakozás a Microsoft Insiderek

Hasznos volt az információ?

Mennyire elégedett a fordítás minőségével?
Mi befolyásolta a felhasználói élményét?

Köszönjük a visszajelzését!

×