Com utilitzar macros per crear llibres de treball dExcel

És possible que de vegades vulgueu o necessiteu crear un llibre d'Excel de manera automatitzada. Per exemple, és possible que hàgiu de copiar dades d'una taula i enganxar-les en un llibre de treball acabat de crear. La macro següent copia un rang de cel·les del full actiu i enganxa les dades en un nou llibre de treball.

Com funciona la macro

Com veureu quan llegiu les línies del codi, aquesta macro és relativament intuïtiva:

Sub macro1()
'Pas 1 Copieu les dades
    Fulls("Exemple 1").Range("B4:C15").Copia
"Pas 2 Creeu un llibre de treball nou
    Quaderns de treball.Afegir
"Pas 3 Enganxeu les dades
    ActiveSheet.Paste Destinació:=Range("A1")
"Pas 4 Desactiveu les alertes de l'aplicació
    Application.DisplayAlerts = Fals
"Pas 5 Deseu el llibre de treball acabat de crear
    ActiveWorkbook.SaveAs _
    Nom del fitxer:="C:TempMyNewBook.xlsx"
"Pas 6 Torneu a activar les alertes de l'aplicació
    Application.DisplayAlerts = Veritable
End Sub

Al pas 1, simplement copieu les dades que van des de les cel·les B4 a C15. Tingueu en compte que especifiqueu tant el full com l'interval pel nom. Aquest enfocament és una pràctica recomanada quan es treballa amb diversos llibres de treball oberts.

Al pas 2, utilitzeu el mètode Add de l'objecte Workbook per crear un llibre de treball. El llibre de treball en blanc equival a triar manualment Fitxer → Nou → Document en blanc a la cinta d'Excel.

Al pas 3, utilitzeu el mètode Enganxa per enviar les dades copiades a la cel·la A1 del nou llibre de treball.

Preste atenció al fet que el codi fa referència a l'objecte ActiveSheet. Quan afegiu un llibre de treball, el nou llibre de treball es centra immediatament i es converteix en el llibre de treball actiu. (Excel fa el mateix quan afegiu un llibre de treball manualment.)

Al pas 4 del codi, configureu el mètode DisplayAlerts a Fals, desactivant efectivament els avisos d'Excel. Ho feu perquè al següent pas del codi, deseu el llibre de treball acabat de crear. Podeu executar aquesta macro diverses vegades, en aquest cas Excel intenta desar el fitxer diverses vegades.

Què passa quan intenteu desar un llibre de treball diverses vegades? Així és: Excel us avisa que ja hi ha un fitxer amb aquest nom i després us pregunta si voleu sobreescriure el fitxer existent anteriorment. Com que el vostre objectiu és automatitzar la creació del llibre de treball, voleu suprimir aquest avís.

Al pas 5, deseu el fitxer mitjançant el mètode SaveAs. Tingueu en compte que introduïu el camí complet de la ubicació de desat, inclòs el nom del fitxer final.

Com que vau desactivar els canvis d'aplicació al pas 4, heu de tornar-los a activar (vegeu el pas 6). Si no ho feu, Excel continua suprimint tots els avisos durant la sessió actual.

Com utilitzar la macro

Per implementar aquesta macro, podeu copiar-la i enganxar-la en un mòdul estàndard:

Activeu Visual Basic Editor prement Alt+F11.

Feu clic amb el botó dret al nom del projecte/llibre de treball a la finestra del projecte.

Seleccioneu Insereix → Mòdul.

Escriviu o enganxeu el codi al mòdul acabat de crear.

Probablement haureu de canviar el nom del full, l'adreça de l'interval i la ubicació de desar.


Com bloquejar Microsoft Word dobrir fitxers en mode només de lectura a Windows

Com bloquejar Microsoft Word dobrir fitxers en mode només de lectura a Windows

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 solucionar la impressió incorrecta de documents de Microsoft Word

Com solucionar la impressió incorrecta de documents de Microsoft Word

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

Esborra els dibuixos de llapis i ressaltats a les teves diapositives de PowerPoint

Esborra els dibuixos de llapis i ressaltats a les teves diapositives de PowerPoint

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 […]

Contingut de la biblioteca destils a SharePoint 2010

Contingut de la biblioteca destils a SharePoint 2010

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 […]

Formateu els números en milers i milions als informes dExcel

Formateu els números en milers i milions als informes dExcel

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.

Com compartir i seguir els llocs de SharePoint

Com compartir i seguir els llocs de SharePoint

Apreneu a utilitzar les eines de xarxes socials de SharePoints que permeten a persones i grups comunicar-se, col·laborar, compartir i connectar-se.

Com convertir les dates a formats Julian a Excel

Com convertir les dates a formats Julian a Excel

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 […]

Com crear una aplicació web daccés

Com crear una aplicació web daccés

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 […]

Barra dinici ràpid a SharePoint 2010

Barra dinici ràpid a SharePoint 2010

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 […]

Què signifiquen els missatges derror del solucionador a Excel?

Què signifiquen els missatges derror del solucionador a Excel?

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 […]