La macro que es presenta aquí és una manera excel·lent de protegir els usuaris de tancar el fitxer inadvertidament abans de desar-lo. Quan s'implementa, aquesta macro garanteix que Excel desi automàticament el llibre de treball abans de tancar-lo.
L'Excel normalment avisarà els usuaris que intentin tancar un llibre de treball no desat, donant-los l'opció de desar abans de tancar-lo. Tanmateix, és possible que molts usuaris superin l'avís i, sense voler, facin clic a No, dient a Excel que tanqui sense desar. Amb aquesta macro, esteu protegint contra això desant automàticament abans de tancar.
El codi s'activa per l'esdeveniment BeforeClose del llibre de treball. Quan intenteu tancar el llibre de treball, aquest esdeveniment s'activa i executa el codi. El quid del codi és senzill: pregunta als usuaris si volen tancar el llibre de treball. Aleshores, la macro avalua si l'usuari ha fet clic a D'acord o a Cancel·la.
El missatge que veieu quan intenteu tancar el llibre de treball.
L'avaluació es fa amb una declaració Select Case. La instrucció Select Case és una alternativa a la instrucció If-Then-Else, que us permet realitzar comprovacions de condicions a les vostres macros. La construcció bàsica d'una instrucció Select Case és senzilla:
Seleccioneu Cas
El cas és =
El cas és=
El cas és=
Finalitzar la selecció
Amb una instrucció Select Case, podeu realitzar moltes comprovacions condicionals. En aquest cas, només esteu comprovant si hi ha D'acord o Cancel·la. Fes una ullada al codi:
Private Sub Workbook_BeforeClose (Cancel·la com a booleà)
"Pas 1: activeu el quadre de missatge i inicieu la comprovació
Seleccioneu Case MsgBox ("Desar i tancar?", vbOKCancel)
"Pas 2: el botó Cancel·la premut, així que cancel·leu el tancament
Cas és = vbCancel
Cancel·la = Veritable
"Pas 3: botó D'acord premut, així que deseu el llibre de treball i tanqueu-lo
El cas és = vbOK
ActiveWorkbook.Desa
"Pas 4: tanqueu la vostra declaració Select Case
Finalitzar la selecció
End Sub
Al pas 1, activeu el quadre de missatge com a comprovació de condicions per a la instrucció Select Case. Feu servir l'argument vbOKCancel per assegurar-vos que els botons D'acord i Cancel·la es presenten com a opcions.
Al pas 2, si l'usuari va fer clic a Cancel·la al quadre de missatge, la macro diu a Excel que cancel·li l'esdeveniment Workbook_Close passant True a Cancel Boolean.
Si l'usuari va fer clic al botó D'acord al quadre de missatge, el pas 3 es farà efectiu. Aquí, dieu a Excel que desi el llibre de treball. I com que no heu establert el booleà Cancel·la com a True, Excel continua amb el tancament.
Al pas 4, només heu de tancar la declaració Select Case. Cada vegada que inicieu un cas de selecció, heu de tancar-lo amb una selecció final corresponent.
Per implementar aquesta macro, heu de copiar-la i enganxar-la a la finestra del codi d'esdeveniment Workbook_BeforeClose. Col·locar la macro allà permet que s'executi cada vegada que intenteu tancar el llibre de treball:
Activeu Visual Basic Editor prement Alt+F11.
A la finestra del projecte, cerqueu el nom del vostre projecte/llibre de treball i feu clic al signe més que hi ha al costat per veure tots els fulls.
Feu clic a Aquest llibre de treball.
A la llista desplegable Esdeveniment, seleccioneu l'esdeveniment Abans de tancar.
Escriviu o enganxeu el codi al mòdul acabat de crear.
Introduïu el vostre codi a l'esdeveniment Workbook BeforeClose.
Com bloquejar Microsoft Word d'obrir fitxers en mode de només lectura a Windows Microsoft Word obre fitxers en mode de només lectura, cosa que fa que sigui impossible editar-los? No us preocupeu, els mètodes es mostren a continuació
Com corregir errors en imprimir documents incorrectes de Microsoft Word Els errors en imprimir documents de Word amb tipus de lletra canviats, paràgrafs desordenats, falta de text o contingut perdut són força habituals. No obstant això, no
Si heu utilitzat el llapis o el marcador per dibuixar a les vostres diapositives de PowerPoint durant una presentació, podeu desar els dibuixos per a la següent presentació o esborrar-los de manera que la propera vegada que el mostreu, començareu amb diapositives de PowerPoint netes. Seguiu aquestes instruccions per esborrar dibuixos a llapis i ressaltadors: Esborrant línies una a […]
La biblioteca d'estils conté fitxers CSS, fitxers de llenguatge de full d'estil extensible (XSL) i imatges utilitzades per pàgines mestres predefinides, dissenys de pàgina i controls a SharePoint 2010. Per localitzar fitxers CSS a la biblioteca d'estils d'un lloc de publicació: Trieu Accions del lloc→Visualitza Tot el contingut del lloc. Apareix el contingut del lloc. La biblioteca d'estil es troba a […]
No desbordeu el vostre públic amb números gigantesques. A Microsoft Excel, podeu millorar la llegibilitat dels vostres taulers i informes formatant els vostres números perquè apareguin en milers o milions.
Apreneu a utilitzar les eines de xarxes socials de SharePoints que permeten a persones i grups comunicar-se, col·laborar, compartir i connectar-se.
Les dates julianes s'utilitzen sovint en entorns de fabricació com a marca de temps i referència ràpida per a un número de lot. Aquest tipus de codificació de dates permet als minoristes, consumidors i agents de serveis identificar quan es va fabricar un producte i, per tant, l'antiguitat del producte. Les dates julianes també s'utilitzen en programació, militars i astronomia. Diferents […]
Podeu crear una aplicació web a Access 2016. Què és, de totes maneres, una aplicació web? Bé, web vol dir que està en línia i l'aplicació és només una abreviatura de "aplicació". Una aplicació web personalitzada és una aplicació de base de dades en línia a la qual s'accedeix des del núvol mitjançant un navegador. Creeu i manteniu l'aplicació web a la versió d'escriptori […]
La majoria de les pàgines del SharePoint 2010 mostren una llista d'enllaços de navegació a la barra d'inici ràpid al costat esquerre de la pàgina. La barra d'inici ràpid mostra enllaços al contingut del lloc destacat, com ara llistes, biblioteques, llocs i pàgines de publicació. La barra d'inici ràpid inclou dos enllaços molt importants: Enllaç de tot el contingut del lloc: el […]
Per a problemes senzills, Solver a Excel sol trobar ràpidament els valors òptims de la variable Solver per a la funció objectiu. Però, en alguns casos, Solver té problemes per trobar els valors de la variable Solver que optimitzen la funció objectiu. En aquests casos, Solver normalment mostra un missatge o un missatge d'error que descriu o discuteix el problema que […]
