Tartalom

• Lépni
• 3. Módszer: Válassza ki az egyes cellákat
• 3/2-es módszer: Válasszon tartományokat
• 3/3 módszer: Válassza ki az adatokat az "egymást követő" és a "nem egymást követő" oszlopokban
• Tippek

Ez a wikiHow megtanítja a Visual Basic használatával az adatok kiválasztására a Microsoft Excel alkalmazásban. Amíg ismeri a VB szkriptek alapjait és az Excel fejlettebb funkcióinak használatát, a szkriptek kiválasztása meglehetősen egyszerű.

Lépni

3. Módszer: Válassza ki az egyes cellákat

1. Jelöljön ki egy cellát az aktuális munkalapon. Tegyük fel, hogy az E6 cellát szeretné kiválasztani a Visual Basic segítségével. Ezt a következő parancsok egyikével teheti meg:
   

   ActiveSheet.Cells (6, 5). Válassza ki
   

   ActiveSheet.Range ("E6"). Válassza a lehetőséget

2. Jelöljön ki egy cellát ugyanazon munkafüzet másik munkalapján. Tegyük fel, hogy az E6 példa cellánk a Sheet2 nevű lapon található. A kiválasztásához az alábbi módszerek egyikét használhatja:
   

   Application.Goto ActiveWorkbook.Sheet ("Sheet2"). Cellák (6, 5)

   Application.Goto (ActiveWorkbook.Sheets ("Sheet2"). Range ("E6"))

3. Válasszon egy cellát egy másik munkafüzet munkalapján. Tegyük fel, hogy a BOOK2.XLS nevű munkafüzetben szeretne egy cellát kiválasztani a Sheet1-ből. A két módszer egyikének működnie kell:

   Application.Goto munkafüzetek ("BOOK2.XLS"). Lapok ("Sheet1"). Cellák (2,1)

   Application.Goto munkafüzetek ("BOOK2.XLS"). Lapok ("Sheet1"). Tartomány ("A2")

4. Válasszon egy cellát egy másik cellához képest. A VB segítségével kiválaszthat egy cellát az aktív (vagy más) cellához viszonyított helye alapján. Csak a hibák elkerülése érdekében ellenőrizze, hogy létezik-e a cella. Ez a következőképpen történik:
   • Válassza ki a cellát három sor alatt és négy oszlopot az aktív cellától balra:

     ActiveCell.Offset (3, -4). Válassza ki

   • Jelölje ki a C7 cellától jobbra lévő öt sort és négy oszlopot jobbra:

     ActiveSheet.Cells (7, 3). Offset (5, 4). Válassza ki

3/2-es módszer: Válasszon tartományokat

1. Válasszon cellatartományt az aktív munkalapon. A C1: D6 cellák kiválasztásához az aktuális munkalapon használja a következő három módszer egyikét:

   ActiveSheet.Range (cellák (1, 3), cellák (6, 4)). Válassza ki

   ActiveSheet.Range ("C1: D6"). Válassza a lehetőséget

   ActiveSheet.Range ("C1", "D6"). Válassza a lehetőséget

2. Válasszon sorozatot ugyanazon munkafüzet másik munkalapjáról. Az alábbi példák egyikével kiválaszthatja a C3: E11 cellákat a Sheet3 nevű lapon:

   Application.Goto ActiveWorkbook.Sheets ("Sheet3"). Tartomány ("C3: E11")

   Application.Goto ActiveWorkbook.Sheets ("Sheet3"). Tartomány ("C3", "E11")

3. Válasszon cellatartományt egy másik munkafüzet munkalapjáról. Mindkét példának ki kell választania az E12: F12 cellákat a BOOK2.XLS nevű munkafüzet 1. lapján:

   Application.Goto munkafüzetek ("BOOK2.XLS"). Lapok ("Sheet1"). Tartomány ("E12: F12")

   Application.Goto munkafüzetek ("BOOK2.XLS"). Lapok ("Sheet1"). Tartomány ("E12", "F12")

4. Válasszon egy megnevezett tartományt. Ha cellatartományhoz rendelt nevet, akkor ugyanazt a szintaxist használja, mint a 4-6. Lépésben, de cserélje ki a tartomány címét (pl. 'E12', 'F12') a tartomány nevére (pl. 'Értékesítés'). ). Íme néhány példa:
   
   • Az aktív munkalapon:

     ActiveSheet.Range ("Értékesítés"). Válassza a lehetőséget

   • A munkafüzet másik munkalapja:

     Application.Goto ActiveWorkbook.Sheets ("Sheet3"). Range ("Értékesítés")

   • Egyéb munkafüzet:

     Application.Goto munkafüzetek ("BOOK2.XLS"). Lapok ("Sheet1"). Tartomány ("Sales")

5. Válasszon egy tartományt egy megnevezett tartományhoz képest. A szintaxis az említett tartomány helyétől és az új tartomány méretének módosításától függően változik.
   • Ha a kiválasztani kívánt tartomány azonos méretű, mint a szerszám 5. teszt hívja, de négy sort lefelé és három oszlopot jobbra tol, majd használja a következő kódot:

     ActiveSheet.Range ("Test5"). Eltolás (4, 3). Válassza ki

   • Ha a tartomány ugyanazon munkafüzet 3. lapján található, akkor először aktiválja azt a munkalapot, majd válassza ki a tartományt az alábbiak szerint:

     Táblák ("3. lap"). Aktiválja az ActiveSheet.Range ("Teszt"). Eltolás (4, 3) .Válassza

6. Válasszon ki egy tartományt, és méretezze át a kijelölést. Szükség esetén növelheti a kiválasztott tartomány méretét. Ha ki akar választani egy tartományt Adatbázis és ezután öt sorral szeretné növelni a méretet, használja ezt a szintaxist:

   Tartomány ("Adatbázis"). Válassza a Selection.Resize (Selection.Rows.Count + 5, _Selection.Columns.Count) lehetőséget. Válassza ki

7. Válassza ki a két megnevezett sorozat unióját. Ha két átfedésben lévő elnevezett tartománya van, akkor a VB segítségével kiválaszthatja a cellákat abban az átfedésben lévő régióban (az 'unió'). A korlátozás az, hogy ezt csak az aktív munkalapon teheti meg. Tegyük fel, hogy van egy tartomány nevű Jó és egy nevű Rossz ki akarja választani:

   • Application.Union (Tartomány ("Jó"), Tartomány ("Rossz")). Válassza ki

   • Ha az átfedő terület helyett két említett tartomány részhalmazát kívánja kiválasztani, egyszerűen cserélje ki Alkalmazás. Unió keresztül Alkalmazás. Intersect.

3/3 módszer: Válassza ki az adatokat az "egymást követő" és a "nem egymást követő" oszlopokban

1. Használja ezt a mintaadatot a módszer példáihoz. Ez a mintaadatokkal teli diagram, a Microsoft jóvoltából, segít szemléltetni a példák viselkedését:

   A1: Név	B1: Eladás	C1: Mennyiség
   A2: a	B2: 10 €	C2: 5
   A3: b	B3:	C3: 10
   A4: c	B4: 10 €	C4: 5
   A5:	B5:	C5:
   A6: Összesen	B6: 20 €	C6: 20

2. Válassza ki az utolsó cellát egy összefüggő oszlop alján. A következő példában az A4 cellát választjuk ki:

   ActiveSheet.Range ("A1"). End (xlDown). Válassza ki

3. Jelölje ki az első üres cellát egy összefüggő cellák oszlopának alatt. Az alábbi példa az A5-öt választja a fenti ábra alapján:

   ActiveSheet.Range ("A1"). End (xlDown). Offset (1.0). Válassza ki

4. Válasszon egy egymást követő cellatartományt egy oszlopban. Az alábbi két példában az A1: A4 tartomány van kiválasztva:

   ActiveSheet.Range ("A1", ActiveSheet.Range ("a1"). End (xlDown)). Válassza ki

   ActiveSheet.Range ("A1:" & ActiveSheet.Range ("A1"). Vége (xlDown) .Cím) .Választ

5. Válasszon ki egy nem egymást követő cellák teljes tartományát egy oszlopban. A módszer tetején található adattábla használatával az alábbi két példa az A1-et választja: A6:

   ActiveSheet.Range ("A1", ActiveSheet.Range ("A65536"). End (xlUp)). Válassza ki

   ActiveSheet.Range ("A1", ActiveSheet.Range ("A65536"). End (xlUp)). Válassza ki

Tippek

• Az "ActiveSheet" és az "ActiveWorkbook" tulajdonságok általában elhagyhatók, ha az aktív munkalapra és / vagy munkafüzetekre utalnak.