Ez a példa megtanítja a kiválasztást egész sorok és oszlopok ban ben Excel VBA. Kész vagy?
Helyezzen el egy parancsgombot a munkalapon, és adja hozzá a következő kódsorokat:
1. A következő kódsor a teljes lapot választja ki.
Sejtek. Válassza ki
Megjegyzés: mivel a parancsgombunkat az első munkalapra helyeztük, ez a kódsor kijelöli a teljes első lapot. Más cellák celláinak kijelöléséhez először aktiválnia kell ezt a lapot. Például a következő kódsorok kijelölik a teljes második munkalapot.
Munkalapok (2). Aktiválás
Munkalapok (2). Sejtek. Válassza ki
2. A következő kódsor a második oszlopot választja ki.
Oszlopok (2). Válassza ki
3. A következő kódsor a hetedik sort választja ki.
Sorok (7). Válassza ki
4. Több sor kiválasztásához adjon hozzá egy ilyen kódsort:
Sorok ("5: 7"). Válassza ki
5. Több oszlop kijelöléséhez adjon hozzá egy ilyen kódsort:
Oszlopok ("B: E"). Válassza ki
6. Ügyeljen arra, hogy ne keverje össze a Sorok és oszlopok tulajdonságokat a Sorok és oszlopok tulajdonságokkal. A Sorok és oszlopok tulajdonságok egy Tartomány objektumot adnak vissza. A Sor és Oszlop tulajdonságok egyetlen értéket adnak vissza.
Kódsor:
MsgBox sejtek (5, 2). Sor
Eredmény:
7. Válassza ki a D6 cellát. A következő kódsor kijelöli az aktív cella teljes sorát.
ActiveCell.EntireRow.Select
Megjegyzés: a szegély csak illusztráció.
8. Válassza ki a D6 cellát. A következő kódsor a 2 értéket írja be az aktív cellát tartalmazó oszlop első cellájába.
ActiveCell.EntireColumn.Cells (1). Érték = 2
Megjegyzés: a szegély csak illusztráció.
9. Válassza ki a D6 cellát. A következő kódsor a 3 értéket írja be az aktív cellát tartalmazó sor alatti sor első cellájába.
ActiveCell.EntireRow.Offset (1, 0). Cellák (1). Érték = 3
Megjegyzés: a szegély csak illusztráció.