photosdematures.com

Interval anomenat VBA d'Excel

Quan treballem amb una gran quantitat de dades per evitar referir-nos a una cel·la o intervals de cel·les particulars, normalment creem intervals amb nom i ens permet referir-nos a l'interval de cel·les requerit a través de l'interval anomenat. A VBA per crear un interval de noms, tenim la funció Afegeix un nom.

Podem seleccionar una cel·la o un interval de cel·les i donar-li un nom. Després de nomenar les cel·les, podem referir-nos a aquestes cel·les introduint els noms definits en lloc de les referències habituals de columna o fila.

Podeu descarregar aquesta plantilla Excel VBA Named Range aquí: plantilla Excel VBA Named Range

Com es poden crear intervals amb nom?

És un passeig pel parc per crear intervals amb nom. El primer que hem de fer és identificar les cel·les que volem crear a Excel.

Per obtenir un exemple, mireu la imatge següent.

Per obtenir el benefici a la cel·la B4 he aplicat la fórmula B2 - B3.

Això és el que fa tothom. Però, què hi ha de crear els noms i aplicar la fórmula com "Vendes" - "Cost".

Col·loqueu un cursor a la cel·la B2> Vés al quadre Nom i anomeneu-lo com a Vendes.

Col·loqueu un cursor a la cel·la B3 i anomeneu-lo Cost.

Ara, a la columna de beneficis, podem referir aquests noms en lloc de referències de cel·les.

Això és bàsic sobre Named Ranges.

Com es poden crear intervals amb nom mitjançant el codi VBA?

Exemple 1

Alguna vegada heu pensat a crear un interval anomenat mitjançant el codi VBA?

Seguiu els passos següents per crear un interval amb nom.

Pas 1: Definiu la variable com a "Interval".

Codi:

 Sub NamedRanges_Example () Dim Rng As Range End Sub 

Pas 2: Ara configureu la variable "Rng" a les cel·les específiques que vulgueu anomenar.

Codi:

 Sub NamedRanges_Example () Dim Rng As Range Set Rng = Range ("A2: A7") End Sub 

Pas 3: Mitjançant l'accés a l'objecte "ThisWorkbook", propietat de noms.

Tenim tants paràmetres amb Noms.Afegeix mètode. A continuació es detallen les explicacions.

[Nom]: El nom no és res més que quin és el nom que voldríem donar a l’interval que especifiquem.

Mentre s’anomena la cel·la, no ha de contenir cap caràcter especial, excepte el símbol de subratllat (_) i tampoc ha de contenir caràcters espacials, no ha de començar amb valors numèrics.

[Es refereix a]: Això no és res més que a quin rang de cèl·lules ens referim.

Crec que aquests dos paràmetres són prou bons per iniciar el procediment.

Pas 4: Al nom, l'argument introdueix el nom que voleu donar. He nomenat com a "Números de venda".

Codi:

 Sub NamedRanges_Example () Dim Rng As Range Set Rng = Range ("A2: A7") ThisWorkbook.Names.Add Name: = "SalesNumbers" End Sub 

Pas 5: A l’argument referència a, introduïu l’interval de cel·les que volem crear. Al nom de la variable "Rng" ja hem assignat l'interval de cel·les com A2 a A7, de manera que proporcioneu l'argument com a "Rng".

Codi:

 Sub NamedRanges_Example () Dim Rng As Range Set Rng = Range ("A2: A7") ThisWorkbook.Names.Add Name: = "SalesNumbers", RefersTo: = Rng End Sub 

D'acord, aquest codi crearà un interval anomenat per a cel·les d'A2 a A7.

Ara, al full de treball, he creat alguns números de A2 a A7.

A la cel·la A8, vull tenir el total dels números de cel·la anteriors. Utilitzant l'interval anomenat, crearem una SUMA d'aquests números.

Codi:

 Sub NamedRanges_Example () Dim Rng As Range Set Rng = Range ("A2: A7") ThisWorkbook.Names.Add Name: = "SalesNumbers", RefersTo: = Rng Range ("A8"). Value = WorksheetFunction.Sum (Range ( "Números de venda")) Final Sub 

Si executeu aquest codi manualment o prement la tecla f5, obtindrem el total d’un interval anomenat a la cel·la A8.

Aquests són els fets bàsics imprescindibles sobre "Intervals amb nom".

Exemple 2

A VBA que utilitza l'objecte RANGE, podem referir-nos a les cel·les. De la mateixa manera, també podem referir-nos a aquestes cel·les també mitjançant intervals amb nom.

Per exemple, a l'exemple anterior, hem anomenat la cel·la B2 com a "Vendes" i B3 com "Cost".

En utilitzar la referència de cel·la real, ens referim a aquestes cel·les com aquesta.

Codi:

 Sub NamedRanges () Range ("B2"). Seleccioneu "Això seleccionarà l'interval de cel·les B2 (" B3 "). Seleccioneu" Això seleccionarà la cel·la B3 End Sub 

Com que ja hem creat aquestes cel·les, podem referir-nos a l'ús d'aquests noms com el següent.

Codi:

 Sub NamedRanges () Interval ("Vendes"). Seleccioneu "Això seleccionarà la cel·la anomenada" Vendes ", és a dir, Interval de cel·les B2 (" Cost "). Seleccioneu" Això seleccionarà la cel·la anomenada com "Cost", és a dir, cel·la B3 

Així, utilitzant Named Ranges, podem fer ús d’aquestes cel·les. Mitjançant aquests noms es pot calcular l’import del benefici a la cel·la B4. Per aquest primer nom, la cel·la B4 és Profit.

Ara, a l'editor VBA, apliqueu aquest codi.

Codi:

 Sub NamedRanges_Example1 () Interval ("Benefici"). Valor = Interval ("Vendes") - Interval ("Cost") Final Sub 

Això calcularà l'import del benefici a la cel·la anomenada "Benefici".