Taula de continguts
A les grans bases de dades, vau dedicar la major part del temps a tractar amb intervals i cel·les. De vegades cal repetir la mateixa acció en grans intervals o en un gran nombre de cel·les. Això al mateix temps mata el vostre temps i redueix la vostra eficiència. La solució intel·ligent a aquest problema és crear un Codi de programació VBA que s'executarà per cada cel·la de l'interval i realitzarà la mateixa acció dirigida per vostè. Avui, en aquest article, parlarem de com fer VBA per a cada cel·la de l'interval a Excel.
Baixeu el llibre de pràctiques
Descarregueu aquest llibre de pràctiques per exercir la tasca mentre llegiu aquest article.
Codi VBA per a cada cel·la d'un rang a Excel.xlsx
3 maneres adequades d'aplicar VBA a cada cel·la d'un rang a Excel
Mitjançant un codi VBA, podeu realitzar la mateixa fórmula a cada cel·la d'un rang, una columna o una fila. En aquesta secció, repassarem totes les seccions.
1. Apliqueu VBA per a cada cel·la de l'interval
Considereu una situació en què haureu d'aplicar el mateix codi VBA per a cada cel·la d'una cel·la. rang donat ( B3:F12 ). Per fer-ho construirem un codi VBA. Les instruccions es donen a continuació
Pas 1:
- Primer, inserirem un botó d'ordres per simplificar la nostra feina . Aneu a la vostra Pestanya Desenvolupador , seleccioneu Insereix i feu clic al botó d'ordres per obtenir-ne un.
- Tenim el nostre comandamentbotó.
- Feu clic amb el botó dret al botó d'ordre per obrir les opcions. Seleccioneu i feu clic a Propietats per modificar algunes opcions.
- Canvieu el títol del botó d'ordres. Aquí canviem el nom a " Fes clic aquí ".
Pas 2:
- Ara feu doble clic al botó d'ordres per obrir el mòdul VBA . Aquí anotarem el nostre codi VBA per a la tasca.
- Primer, declararem dues variables. Anomenem els objectes d'interval CL i Rng . Podeu anomenar-los com vulgueu.
4622
- Assigneu un rang específic mitjançant aquesta ordre,
Defineix Rng = Fulls de treball(“VBA1”).Range(“B3:F12”)
- Aquí VBA1 és el nom del nostre full de treball i B3:F12 és el nostre interval definit.
- Ara farem servir el codi per passar per cada cel·la de l'interval. El codi és,
1489
- Valor = 100 fa referència que retornarà 100 per a cada cel·la de l'interval donat.
- Així que el nostre codi final es converteix en,
8938
- Aneu al vostre full de treball principal i feu clic al botó d'ordres per executar VBA per a cada cel·la de l'interval.
Pas 3:
- Com els valors numèrics, també podem posar valors de text per a cada cel·la de l'interval. En aquest cas, aneu a la finestra de VBA i, en lloc de 100, inseriu el valor de text que voleu executar. El canviatLa línia és
1238
- Feu clic al botó d'ordres i el codi VBA retornarà aquest valor de text per a cada cel·la de l'interval.
Pas 4:
- En aquest pas, aprofundirem una mica més. Suposem que volem ressaltar cada cel·la en blanc del nostre interval.
- Per això, afegiu una nova condició al vostre codi existent. La nova fórmula és,
9754
- Aquest nou codi ressaltarà la cel·la en blanc amb color vermell. Per tant, el codi complet és:
1985
- Obteniu el resultat fent clic al botó d'ordres.
Lectures similars:
- Com utilitzar l'objecte d'interval de VBA a Excel (5 propietats)
- Utilitza el desplaçament de rang VBA (11 maneres)
- Com comptar el text a Excel (7 trucs fàcils)
2. Insereix VBA Codi per a cada cel·la d'una columna d'un rang
També podem executar codi VBA per a cada cel·la d'una columna. Suposem que tenim una columna que conté nombres i hem de pintar valors inferiors a 10. Construirem un codi VBA per executar cada cel·la de la columna.
Pas 1:
- Creeu un botó d'ordres seguint les instruccions que hem comentat.
Pas 2:
- Feu doble clic al botó d'ordres per obrir la finestra de VBA.
- Declararem una variable anomenada " c " del tipus llarg. Estem utilitzant la variable de tipus Long aquí perquè Longles variables tenen una capacitat més gran que les variables enteres.
3545
- A continuació, afegiu la línia de codi que canvia el color de la font de totes les cel·les de la nostra columna a negre.
6642
- Inseriu el bucle per a aquest codi.
5154
- En aquest pas, introduirem una condició per pintar els valors que siguin inferiors al valor de la cel·la C4 (10). Introduïu aquest codi per fer-ho.
7904
- Així que el codi final és,
1716
- El VBA s'executarà i mostrarà els resultats quan feu clic al botó d'ordres.
3. Escriu un codi VBA per a cada cel·la en una fila d'un rang
També podem executar un codi VBA per a cada cel·la seguida. A la fila donada, hem de realitzar la mateixa acció a cada cel·la de la fila.
Pas 1:
- Afegiu un botó d'ordres i canvieu-ne el nom a " Feu clic aquí! "
- Feu doble clic al botó per obriu la finestra de VBA. Anoteu el codi VBA que es proporciona a continuació.
3726
- El codi passarà per cada cel·la de la fila i s'aplicarà un farciment de color groc a cada cel·la.
- Feu clic al botó i el nostre resultat és aquí.
Notes ràpides
👉 Si no teniu la vostra pestanya de desenvolupador visible, podeu activar-la amb aquesta instrucció.
Barra d'eines d'accés ràpid personalitzada → Més ordres → Personalitza la cinta → Desenvolupador → D'acord
Conclusió
Hem passat per tres enfocaments diferents per executar VBA per a cada cel·la d'un interval. Si teniu cap pregunta o consulta, podeu fer comentaris. També podeu consultar els nostres altres articles relacionats amb les tasques d'Excel!