Com utilitzar VBA per seleccionar l'interval de la cel·la activa a Excel (3 mètodes)

Hugh West

20-08-2023 Macros i amp; Excel VBA
  • Comparteix Això
Hugh West

Us mostrarem 3 mètodes a Excel VBA per seleccionar l'interval de la cel·la activa . Per demostrar-ho, hem escollit un conjunt de dades amb 3 columnes : “ Nom ”, “ Cognom ” i “ Correu electrònic ”. Seleccionarem una cel·la i amb Excel VBA seleccionarem l'interval d'aquesta cel·la .

Baixeu el quadern de pràctiques

Seleccioneu l'interval de Active Cell.xlsm

3 maneres de seleccionar l'interval de la cel·la activa mitjançant VBA a Excel

1. Utilitzar VBA per seleccionar l'interval des de la cel·la activa fins a l'última cel·la no en blanc

Per al primer mètode, utilitzarem la propietat Range.End .

Aquí, introduirem el nostre codi com a Mòdul . Per obrir la finestra Mòdul , feu aquests-

Passos:

  • En primer lloc, des del Desenvolupador pestanya >>> seleccioneu Visual Basic .

Apareixerà la finestra Visual Basic .

  • Finalment, des de Insereix >>> seleccioneu Mòdul .

Això s'obrirà la finestra Mòdul .

1.1. Utilitzant la propietat End(xlUp)

En aquesta secció, seleccionarem l' interval cap amunt fins a l'última cel·la no en blanc des de la nostra cel·la activa .

Pasos:

  • En primer lloc, obre la finestra Mòdul .
  • En segon lloc, escriviu el codi següent. 
8659

Estem trucant al nostre Sub Procediment ToUp . A continuació, seleccionem el nostre interval . El primer valor és la nostra cel·la activa . L'últim valor és ActiveCell.End(xlUp) . Finalment, estem seleccionant el interval amb el mètode Range . Selecciona .

  • En tercer lloc, Deseu-lo i tanqueu la finestra.
  • Després, seleccioneu cel·la C6 . Aquesta cel·la és la nostra activa cel·la .

Ara, anem a obre la finestra Macro . Per fer-ho:

  • Des de la pestanya Desenvolupador >>> seleccioneu Macros .

Després, apareixerà el quadre de diàleg Macro .

  • A continuació, seleccioneu " ToUp " a " Nom de la macro: ".
  • Finalment, feu clic a Executar .

Ho veiem, hem seleccionat l' interval de cel·les C4:C6 .

Llegir més: Excel VBA: copiar el rang dinàmic a un altre llibre de treball

1.2. Incorporació de la propietat End(xlDown)

En aquesta secció, seleccionarem l' interval avall de la nostra cel·la activa .

Passos:

  • En primer lloc, obre la finestra Mòdul .
  • En segon lloc, escriviu el codi següent. 
9911

Estem trucant al nostre Sub Procediment ToDown . A continuació, seleccionem el nostre interval . El primer valor és la nostra cel·la activa . L'últim valor és ActiveCell.End(xlDown) . Finalment, estemseleccionant el interval amb el interval . Seleccioneu el mètode .

  • En tercer lloc, Deseu-lo i tanqueu la finestra.
  • Després, seleccioneu cel·la C6 . Aquesta és la nostra cel·la activa .

  • A continuació, obre el quadre de diàleg Macro .
  • Seleccioneu “ Avall ”.
  • Finalment, feu clic a Executar .

Per tant, hem seleccionat un interval de la nostra cel·la activa mitjançant Excel VBA .

Llegir més: Excel VBA per recórrer l'interval fins a la cel·la buida (4 exemples)

Articles similars

  • Excel VBA: recorre les columnes de l'interval (5 exemples)
  • Com utilitzar VBA per a cada fila d'un rang a Excel
  • Macro d'Excel: ordena diverses columnes amb rang dinàmic (4 mètodes)
  • VBA per recórrer files i columnes en un rang a Excel (5 exemples)
  • Com convertir rang en matriu a Excel VBA (3 maneres)

1.3. Aplicant la propietat End(xlToLeft)

En aquesta secció, seleccionarem l' interval a l' esquerra de la nostra cel·la activa .

Passos:

  • En primer lloc, obre la finestra Mòdul .
  • En segon lloc, escriviu el codi següent. 
9757

Estem trucant al nostre Sub Procediment ToLeft . A continuació, seleccionem el nostre interval . El primer valor és la nostra cel·la activa . L'últim valor és ActiveCell.End(xlToLeft) . Finalment, estem seleccionant el interval amb el Range . Seleccioneu el mètode .

  • En tercer lloc, Deseu-lo i tanqueu la finestra.
  • Després, seleccioneu cel·la D7 . Aquesta és la nostra cel·la activa .

  • A continuació, obre el quadre de diàleg Macro .
  • Seleccioneu " A l'esquerra ".
  • Finalment, feu clic a Executar .

Per tant, hem seleccionat un interval de la nostra cel·la activa mitjançant Excel VBA .

1.4. Implementant la propietat End(xlToRight)

En aquesta secció, seleccionarem l' interval a la dreta de la nostra cel·la activa .

Passos:

  • En primer lloc, obre la finestra Mòdul .
  • En segon lloc, escriviu el codi següent. 
4419

Estem trucant al nostre subprocediment ToRight . A continuació, seleccionem el nostre interval . El primer valor és la nostra cel·la activa . L'últim valor és ActiveCell.End(xlToRight) . Finalment, estem seleccionant el interval amb el Range . Seleccioneu el mètode .

  • En tercer lloc, Deseu-lo i tanqueu la finestra.
  • Després, seleccioneu cel·la C8 . Aquesta és la nostra cel·la activa .

  • A continuació, obre el quadre de diàleg Macro .
  • Seleccioneu “ ToRight ”.
  • Finalment, feu clic a Executar .

Per tant, hem seleccionat un interval de la nostra cel·la activa mitjançant Excel VBA .

2. Utilitzant la propietat Range.Offset de VBA per seleccionar l'interval de la cel·la activa Utilitzant VBA a Excel

Per al segon mètode, utilitzarem la propietat VBA Range.Offset per seleccionar l' interval mitjançant la nostra cel·la activa .

Passos:

  • En primer lloc, escriviu el codi següent a la finestra Mòdul . 
6341

Hem creat el nostre Subprocediment UsingOffset . A continuació, seleccionem el nostre interval . El primer valor és la nostra cel·la activa . L'últim valor és ActiveCell.Offset (1,2) . Amb la propietat de desplaçament estem movent 1 fila cap avall i 2 columnes dreta . Finalment, estem seleccionant el interval amb el Range . Seleccioneu el mètode .

  • En segon lloc, Deseu-lo i tanqueu la finestra.
  • Després, seleccioneu cel·la B8 . Aquesta és la nostra cel·la activa .

  • A continuació, obre el quadre de diàleg Macro .
  • Seleccioneu " UsingOffset ".
  • Finalment, feu clic a Executar .

En conclusió, hem seleccionat un interval de la cel·la activa . A més, aquest és el que hauria de ser el pas final.

Llegir més: Excel VBA: obteniu rang de cel·les amb valors (7 Exemples)

3. Seleccioneu Interval de la cel·la activa mitjançant VBA a Excel utilitzant la propietat CurrentRegion

Per a l'últim mètode, utilitzarem la propietat Range.CurrentRegion .

Passos:

  • Primer, escriviu el codi següent a la finestra Mòdul . 
9773

Estem trucant al nostre Sub procediment cRegió . A continuació, seleccionem el nostre interval . Amb la propietat CurrentRegion , estem seleccionant l' interval fins a una cel·la en blanc . Finalment, estem seleccionant el interval amb el Range . Seleccioneu el mètode .

  • En segon lloc, Deseu-lo i torneu al full Excel .
  • Després, seleccioneu cel·la C10 . Aquesta és la nostra cel·la activa .

  • A continuació, obre el quadre de diàleg Macro .
  • Seleccioneu “ cRegion ”.
  • Finalment, feu clic a Executar .

Per tant, hem seleccionat el interval fins a una cel·la en blanc .

Secció de pràctica

Hem proporcionat conjunts de dades pràctiques per a cada mètode al fitxer Excel .

Conclusió

Nosaltres Us he mostrat 3 mètodes de Excel VBA seleccioneu l'interval de la cel·la activa . Si teniu problemes per entendre els passos, no dubteu a comentar a continuació. Gràcies per llegir, segueix excel·lent!

Publicació anterior Com convertir la data en text AAAAMMDD (3 maneres ràpides)
Següent post Com utilitzar la funció VBA DIR a Excel (7 exemples pràctics)

Hugh West és un entrenador i analista d'Excel molt experimentat amb més de 10 anys d'experiència en el sector. És llicenciat en Comptabilitat i Finances i Màster en Administració i Direcció d'Empreses. Hugh té una passió per l'ensenyament i ha desenvolupat un enfocament pedagògic únic que és fàcil de seguir i entendre. El seu coneixement expert d'Excel ha ajudat a milers d'estudiants i professionals de tot el món a millorar les seves habilitats i a destacar en les seves carreres. A través del seu bloc, Hugh comparteix els seus coneixements amb el món, oferint tutorials d'Excel gratuïts i formació en línia per ajudar les persones i les empreses a assolir tot el seu potencial.