Procediments "Funció" i "Sub" a VBA

Funcions VBA integrades

Abans de començar a crear les vostres pròpies funcions VBA, és bo saber que Excel VBA té una rica col·lecció de funcions integrades preconstruïdes que podeu utilitzar mentre escriviu el vostre codi.

Es pot veure una llista d'aquestes funcions a l'editor de VBA:

• Obriu un llibre d'Excel i inicieu l'editor VBA (feu clic per fer-ho Alt + F11) i, a continuació, premeu F2.
• Seleccioneu una biblioteca de la llista desplegable a la part superior esquerra de la pantalla VBA.
• Apareixerà una llista de classes i funcions de VBA integrades. Feu clic al nom de la funció per mostrar la seva breu descripció a la part inferior de la finestra. pressionant F1 obrirà la pàgina d'ajuda en línia per a aquesta funció.

A més, es pot trobar una llista completa de funcions VBA integrades amb exemples al Centre de desenvolupadors de Visual Basic.

Procediments personalitzats "Funció" i "Sub" a VBA

A Excel Visual Basic, un conjunt d'ordres que realitzen una tasca específica es col·loca en un procediment. function (Funció) o Sub (subrutina). La principal diferència entre els procediments function и Sub és aquest el procediment function retorna resultat, procediment Sub - no.

Per tant, si necessiteu realitzar accions i obtenir algun resultat (per exemple, sumar diversos nombres), normalment s'utilitza el procediment function, i per simplement realitzar algunes accions (per exemple, canviar el format d'un grup de cel·les), heu de seleccionar el procediment Sub.

Arguments

Es poden passar diverses dades als procediments VBA mitjançant arguments. La llista d'arguments s'especifica quan es declara un procediment. Per exemple, el procediment Sub a VBA afegeix l'enter donat (Enter) a cada cel·la de l'interval seleccionat. Podeu passar aquest número al procediment mitjançant un argument, com aquest:

Sub AddToCells(i As Integer) ... End Sub

Tingueu en compte que tenir arguments per als procediments function и Sub en VBA és opcional. Alguns procediments no requereixen arguments.

Arguments opcionals

Els procediments VBA poden tenir arguments opcionals. Són arguments que l'usuari pot especificar si vol, i si s'ometen, el procediment utilitza els valors per defecte per a ells.

Tornant a l'exemple anterior, per fer que un argument enter a una funció sigui opcional, es declararia així:

Sub AddToCells (Opcional i com a enter = 0)

En aquest cas, l'argument sencer i el valor per defecte serà 0.

Hi pot haver diversos arguments opcionals en un procediment, tots ells llistats al final de la llista d'arguments.

Passar arguments per valor i per referència

Els arguments en VBA es poden passar a un procediment de dues maneres:

• Per Val – passar un argument per valor. Això vol dir que només el valor (és a dir, una còpia de l'argument) es passa al procediment i, per tant, qualsevol canvi fet a l'argument dins del procediment es perdrà quan el procediment surti.
• PerRef – passar un argument per referència. És a dir, l'adreça real de la ubicació de l'argument a la memòria es passa al procediment. Qualsevol canvi fet a un argument dins del procediment es desarà quan el procediment s'acabi.

Ús de paraules clau Per Val or PerRef a la declaració del procediment, podeu especificar com es passa l'argument al procediment. Això es mostra als exemples següents:

Sub AddToCells(ByVal i As Integer) ... End Sub

Sub AddToCells(ByRef i As Integer) ... End Sub

Recordeu que els arguments a VBA es passen per referència per defecte. En altres paraules, si no s'utilitzen paraules clau Per Val or PerRef, llavors l'argument es passarà per referència.

Abans de procedir amb els tràmits function и Sub amb més detall, serà útil fer una altra mirada a les característiques i diferències entre aquests dos tipus de procediments. A continuació es mostren breus debats sobre els procediments de VBA function и Sub i es mostren exemples senzills.

Procediment VBA «Funció»

L'editor de VBA reconeix el procediment functionquan troba un grup d'ordres inclòs entre les següents sentències d'obertura i tancament:

Funció... Funció final

Com s'ha esmentat anteriorment, el procediment function en VBA (a diferència de Sub) retorna un valor. Les regles següents s'apliquen als valors de retorn:

• El tipus de dades del valor retornat s'ha de declarar a la capçalera del procediment function.
• La variable que conté el valor de retorn s'ha de denominar igual que el procediment function. No cal declarar aquesta variable per separat, ja que sempre existeix com a part integrant del procediment. function.

Això està ben il·lustrat en l'exemple següent.

Exemple de funció VBA: realització d'una operació matemàtica sobre 3 nombres

El següent és un exemple de codi de procediment VBA function, que pren tres arguments de tipus Feu doble (nombres de coma flotant de doble precisió). Com a resultat, el procediment retorna un altre número de tipus Feu dobleigual a la suma dels dos primers arguments menys el tercer argument:

Funció SumMinus(dNum1 Com a doble, dNum2 Com a doble, dNum3 Com a doble) Com a doble SumMinus = dNum1 + dNum2 - dNum3 Funció final

Aquest procediment VBA molt senzill function il·lustra com les dades es passen a un procediment mitjançant arguments. Podeu veure que el tipus de dades que retorna el procediment es defineix com Feu doble (diuen les paraules Com a Doble després de la llista d'arguments). Aquest exemple també mostra com el resultat del procediment function emmagatzemat en una variable amb el mateix nom que el nom del procediment.

Cridar el procediment VBA "Funció"

Si el procediment anterior es senzill function inserit en un mòdul de l'editor de Visual Basic, es pot cridar des d'altres procediments VBA o utilitzar-lo en un full de treball d'un llibre d'Excel.

Truqueu al procediment VBA "Funció" des d'un altre procediment

Procediment function es pot cridar des d'un altre procediment VBA simplement assignant aquest procediment a una variable. L'exemple següent mostra una trucada a un procediment Summinus, que es va definir anteriorment.

Sub main() Dim total com Doble total = SumMinus(5, 4, 3) End Sub

Truqueu al procediment VBA "Funció" des d'un full de treball

Procediment VBA function es pot cridar des d'un full de treball d'Excel de la mateixa manera que qualsevol altra funció d'Excel integrada. Per tant, el procediment creat a l'exemple anterior function - Summinus es pot cridar introduint l'expressió següent a una cel·la del full de treball:

=SumMinus(10, 5, 2)

Procediment VBA «Sub»

L'editor de VBA entén que hi ha un procediment al davant Subquan troba un grup d'ordres inclòs entre les següents sentències d'obertura i tancament:

Sub ... Final Sub

Procediment de VBA "Sub": Exemple 1. L'alineació del centre i el canvi de mida del tipus de lletra en un interval de cel·les seleccionat

Considereu un exemple d'un procediment VBA senzill Sub, la tasca del qual és canviar el format de l'interval de cel·les seleccionat. Les cel·les es centren (tant verticalment com horitzontalment) i la mida del tipus de lletra es canvia a l'especificada per l'usuari:

Sub Format_Centered_And_Sized (iFontSize opcional com a nombre enter = 10) Selection.HorizontalAlignment = xlCenter Selection.VerticalAlignment = xlCenter Selection.Font.Size = iFontSize End Sub

Aquest procediment Sub realitza accions però no retorna cap resultat.

Aquest exemple també utilitza un argument opcional Mida de la font. Si l'argument Mida de la font no s'ha passat a tràmit Sub, aleshores el seu valor per defecte és 10. Tanmateix, si l'argument Mida de la font passat a tràmit Sub, aleshores l'interval de cel·les seleccionat s'establirà amb la mida de lletra especificada per l'usuari.

Subprocediment de VBA: Exemple 2: Alineació al centre i font en negreta a l'interval de cel·les seleccionat

El procediment següent és similar al que acabem de comentar, però aquesta vegada, en lloc de canviar la mida, aplica un estil de lletra en negreta a l'interval de cel·les seleccionat. Aquest és un exemple de procediment Sub, que no pren arguments:

Sub Format_Centered_And_Bold() Selection.HorizontalAlignment = xlCenter Selection.VerticalAlignment = xlCenter Selection.Font.Bold = True End Sub

Crida al procediment "Sub" a Excel VBA

Truqueu al procediment VBA "Sub" des d'un altre procediment

Per trucar a un procediment VBA Sub des d'un altre procediment VBA, heu d'escriure la paraula clau Trucar, nom del procediment Sub i més enllà entre parèntesis hi ha els arguments del procediment. Això es mostra a l'exemple següent:

Sub main() Call Format_Centered_And_Sized(20) End Sub

Si el procediment Format_centrat_i_mida té més d'un argument, s'han de separar per comes. Com això:

Sub main() Call Format_Centered_And_Sized (arg1, arg2, ...) End Sub

Truqueu al procediment de VBA "Sub" des del full de treball

Procediment Sub no es pot introduir directament en una cel·la de full d'Excel, com es pot fer amb un procediment functionperquè el procediment Sub no retorna un valor. Tanmateix, procediments Sub, que no tenen arguments i es declaren com Públic (com es mostra a continuació) estarà disponible per als usuaris del full de treball. Per tant, si els procediments senzills comentats anteriorment Sub inserit en un mòdul del Visual Basic Editor, el procediment Format_Centrat_I_Negreta estarà disponible per utilitzar-lo en un full de treball Excel i el procediment Format_centrat_i_mida – no estarà disponible perquè té arguments.

Aquí hi ha una manera senzilla d'executar (o executar) un procediment Sub, accessible des del full de treball:

• Premsa Alt + F8 (prem la tecla Alt i mentre el manteniu premuda, premeu la tecla F8).
• A la llista de macros que apareix, seleccioneu la que voleu executar.
• Premsa Correr (correr)

Per realitzar un procediment Sub de manera ràpida i senzilla, podeu assignar-li una drecera de teclat. Per això:

• Premsa Alt + F8.
• A la llista de macros que apareix, seleccioneu la que voleu assignar una drecera de teclat.
• Premsa Paràmetres (Opcions) i al quadre de diàleg que apareix, introduïu la drecera del teclat.
• Premsa OK i tanqueu el diàleg Macro (Macro).

Atenció: Quan assigneu una drecera de teclat a una macro, assegureu-vos que no s'utilitza com a estàndard a Excel (per exemple, Ctrl + C). Si seleccioneu una drecera de teclat ja existent, es reassignarà a la macro i, com a resultat, l'usuari pot iniciar la macro per accident.

Àmbit del procediment VBA

La segona part d'aquest tutorial va analitzar l'abast de les variables i constants i el paper de les paraules clau. Públic и Privat. Aquestes paraules clau també es poden utilitzar amb procediments VBA:

Public Sub AddToCells(i As Integer) ... End Sub

Private Sub AddToCells(i As Integer) ... End Sub

Recordeu que si abans de declarar un procediment VBA function or Sub la paraula clau no s'insereix, la propietat predeterminada s'estableix per al procediment Públic (és a dir, estarà disponible a tot arreu en aquest projecte VBA). Això contrasta amb les declaracions de variables, que són per defecte Privat.

Sortida anticipada dels procediments VBA "Funció" i "Sub"

Si necessiteu finalitzar l'execució d'un procediment VBA function or Sub, sense esperar el seu final natural, doncs per això hi ha operadors Funció de sortida и Surt del sub. L'ús d'aquests operadors es mostra a continuació utilitzant un procediment senzill com a exemple. functionA que espera rebre un argument positiu per realitzar més operacions. Si es passa un valor no positiu al procediment, no es poden realitzar més operacions, de manera que s'hauria de mostrar un missatge d'error a l'usuari i el procediment hauria de sortir immediatament:

Funció VAT_Amount(sVAT_Rate As Single) As Single VAT_Amount = 0 If sVAT_Rate <= 0 Then MsgBox "Esperava un valor positiu de sVAT_Rate però rebut" i sVAT_Rate Funció de sortida Final si... Finalització de la funció

Tingueu en compte que abans de completar el tràmit function - Import_IVA, s'insereix una funció VBA integrada al codi MsgBox, que mostra una finestra emergent d'avís a l'usuari.