Declaració VBA GoTo | Com s'utilitza la declaració GoTo a VBA?
Declaració Excel VBA GoTo
VBA GoTo La sentència s'utilitza quan es produeix un error mentre s'executa el codi en lloc de mostrar un error per reprendre la següent línia de codi ignorant el missatge d'error. Hi ha dos tipus d’instruccions GOTO: una és seleccionar qualsevol interval del full de treball al llibre de treball especificat i una altra és el controlador d’errors.
Per tal de superar els errors previstos a VBA, tenim una funció anomenada "GOTO". Veurem els dos tipus d’afirmacions de GoTo en aquest article.
2 maneres d'utilitzar la declaració GoTo al codi VBA
Podeu descarregar aquesta plantilla VBA GoTo Excel aquí: plantilla VBA GoTo Excel# 1: Mètode Application.GoTo
Si voleu anar al llibre de treball específic o al full de treball específic de tots els llibres de treball oberts, podem utilitzar la declaració Application.GoTo mètode.
Vegem la sintaxi del mètode Application.GoTo
- [Referència]: Això no és altra cosa que una referència de cel·la especificada. Si la referència no es proporciona per defecte, us portarà a l'últim interval de cel·les utilitzat.
- [Desplaçament]: Es tracta d’una afirmació lògica de VERITAT o FALS. Si el valor és CERT, es desplaçarà per la finestra, si el valor és FALS, no es desplaçarà per la finestra.
Exemple
Si voleu anar a una cel·la específica del full de treball específic, podem utilitzar el mètode Anar. Tinc 3 fulls anomenats gener, febrer i març.
Ara, si vull anar a la cel·la C5 del full de gener, utilitzaré el conjunt de codi següent.
Pas 1: Inicieu el nom de la macro Excel.
Codi:
Sub GoTo_Example1 () Final Sub
Pas 2: Inicieu el mètode "Aplicació. GoTo”
Codi:
Sub GoTo_Example1 ()
Aplicació.Vés
Finalitzar sub
Pas 3: A l’argument de referència hem d’especificar el nom del full de càlcul i, en aquest full de treball, hem d’esmentar la cel·la específica.
Codi:
Sub GoTo_Example1 () Application.Goto Reference: = Fulls de treball ("Jan"). Range ("C5") End Sub
Pas 4: Esmenta el desplaçament com a CERT.
Codi:
Sub GoTo_Example1 () Application.Goto Reference: = Fulls de treball ("Jan"). Rang ("C5"), desplaçament: = True End Sub
Pas 5: Ara executeu aquest codi amb la tecla F5 o també podeu executar-lo manualment, us portarà al full i a la cel·la especificats.
Ara canviaré l’argument de desplaçament a FALS i veuré el canvi que trobarà.
Sub GoTo_Example1 () Application.Goto Reference: = Fulls de treball ("Jan"). Rang ("C5"), desplaçament: = False End Sub
Si voleu anar a un llibre de treball específic, heu d’esmentar el nom del llibre també abans del nom del llibre.
Sub GoTo_Example1 () Application.Goto Reference: = Workbooks ("Book1.xlsx"). Fulls de treball ("Jan"). Rang ("C5"), desplaçament: = False End Sub
# 2: mètode de control d'errors
Quan la línia de codi particular es troba amb un error, VBA deixa d'executar la resta del codi i mostra el missatge d'error.
Per exemple, mireu la línia de codi següent.
Sub GoTo_Example2 () Fulls de càlcul ("Abril"). Suprimiu Fulls de càlcul.Afegeix Sub
El codi anterior diu que suprimiu el full abril i afegiu-ne un de nou. Al llibre de treball actiu, si hi ha algun nom de full anomenat abril, se suprimirà o mostrarà el quadre de diàleg del missatge d'error següent.
Quan vaig executar aquest codi, el meu llibre no tenia cap full anomenat Abril, de manera que el codi VBA no va poder trobar el nom del full i va provocar l’error. De vegades hem d’ignorar aquest error, perquè sovint, si no hi ha cap nom de full anomenat Abril, hem de continuar amb les altres línies de codi.
Per eliminar aquest error, podem utilitzar el mètode GoTo com a gestor d'errors.
Ara modificaré el codi ja que en cas d'error aneu a la següent línia
Sub GoTo_Example2 () en cas d'error GoTo NextLine Sheets ("Abril"). Suprimiu NextLine: Sheets.Add End Sub
Ara, si executeu això, afegirà el full nou tot i que no hi hagi cap nom de full anomenat Abril.
La declaració "On Error GoTo NextLine" entén que si es produeix algun error saltarà a la següent línia i a la següent línia el codi VBA és afegir un full nou.
Coses que cal recordar
- Si voleu saltar a la següent línia quan es produeixi l'error, també podeu utilitzar la instrucció VBA de l'error següent.
- Per passar al següent, heu d'estar segur que s'espera que es produeixi un error en aquesta línia de codi en particular.
- Si la línia important del codi es salta amb aquest controlador d'errors, és possible que la vostra tasca no estigui acabada perfectament.