Introducció

Les macros són seqüències d'instruccions que automatitzen tasques repetitives a Excel. Gravar i executar macros és una habilitat essencial per a qualsevol usuari avançat d'Excel, ja que permet estalviar temps i reduir errors humans.

Objectius

En aquesta secció, aprendràs a:

  1. Gravar una macro.
  2. Executar una macro.
  3. Assignar una macro a un botó.
  4. Entendre el codi VBA generat per la macro.

  1. Gravar una Macro

Passos per Gravar una Macro

  1. Obrir el Llibre de Treball: Assegura't que el llibre de treball on vols gravar la macro està obert.
  2. Accedir a la Pestanya de Desenvolupador: Si no veus la pestanya de Desenvolupador, activa-la des de les opcions d'Excel.
  3. Iniciar la Gravació:
    • Fes clic a Desenvolupador > Gravar Macro.
    • Apareixerà el quadre de diàleg Gravar Macro.

Configuració del Quadre de Diàleg

  • Nom de la Macro: Dona un nom descriptiu a la macro (per exemple, FormatarTaula).
  • Tecla de Drecera: Opcionalment, assigna una tecla de drecera per executar la macro ràpidament.
  • Emmagatzemar Macro a: Selecciona on vols emmagatzemar la macro (Llibre de Treball Actual, Nou Llibre de Treball, o Llibre de Treball de Macros Personal).
  • Descripció: Escriu una breu descripció de la macro.

Gravar les Accions

  1. Fes clic a Acceptar per començar a gravar.
  2. Realitza les accions que vols automatitzar (per exemple, formatar una taula, aplicar filtres, etc.).
  3. Quan hagis acabat, fes clic a Desenvolupador > Aturar Gravació.

  1. Executar una Macro

Passos per Executar una Macro

  1. Accedir a la Pestanya de Desenvolupador: Fes clic a Desenvolupador > Macros.
  2. Seleccionar la Macro: Al quadre de diàleg Macros, selecciona la macro que vols executar.
  3. Executar la Macro: Fes clic a Executar.

Executar una Macro amb una Tecla de Drecera

Si has assignat una tecla de drecera a la macro, simplement prem la combinació de tecles per executar-la.

  1. Assignar una Macro a un Botó

Passos per Assignar una Macro a un Botó

  1. Inserir un Botó:
    • Fes clic a Desenvolupador > Inserir > Botó (Control de Formulari).
    • Dibuixa el botó a la fulla de càlcul.
  2. Assignar la Macro:
    • Apareixerà el quadre de diàleg Assignar Macro.
    • Selecciona la macro que vols assignar i fes clic a Acceptar.
  3. Personalitzar el Botó:
    • Fes clic dret al botó i selecciona Edita el Text per canviar el nom del botó.

  1. Entendre el Codi VBA Generat

Visualitzar el Codi VBA

  1. Accedir a l'Editor de VBA:
    • Fes clic a Desenvolupador > Visual Basic.
  2. Explorar el Codi:
    • Al panell de l'Editor de VBA, busca el mòdul que conté la teva macro.
    • Fes doble clic al mòdul per veure el codi VBA generat.

Exemple de Codi VBA

Sub FormatarTaula()
    ' Aplicar format a una taula
    Range("A1:D10").Select
    With Selection.Font
        .Name = "Arial"
        .Size = 12
        .Bold = True
    End With
    Selection.Borders(xlEdgeLeft).LineStyle = xlContinuous
    Selection.Borders(xlEdgeTop).LineStyle = xlContinuous
    Selection.Borders(xlEdgeBottom).LineStyle = xlContinuous
    Selection.Borders(xlEdgeRight).LineStyle = xlContinuous
End Sub

Explicació del Codi

  • Sub FormatarTaula(): Inici de la macro amb el nom FormatarTaula.
  • Range("A1:D10").Select: Selecciona el rang de cel·les A1 a D10.
  • With Selection.Font: Aplica format de font a la selecció.
  • Selection.Borders: Aplica línies de contorn a la selecció.

Exercicis Pràctics

Exercici 1: Gravar una Macro per Formatar Cel·les

  1. Grava una macro que:
    • Seleccioni el rang A1:C5.
    • Apliqui un color de fons groc.
    • Apliqui un contorn a les cel·les.
  2. Executa la macro per veure els resultats.

Exercici 2: Assignar una Macro a un Botó

  1. Grava una macro que:
    • Seleccioni el rang B2:D6.
    • Apliqui un format de text en cursiva.
  2. Assigna aquesta macro a un botó a la fulla de càlcul.
  3. Fes clic al botó per executar la macro.

Solucions

Solució a l'Exercici 1

Sub FormatCeles()
    Range("A1:C5").Select
    With Selection.Interior
        .Color = RGB(255, 255, 0) ' Color groc
    End With
    Selection.Borders(xlEdgeLeft).LineStyle = xlContinuous
    Selection.Borders(xlEdgeTop).LineStyle = xlContinuous
    Selection.Borders(xlEdgeBottom).LineStyle = xlContinuous
    Selection.Borders(xlEdgeRight).LineStyle = xlContinuous
End Sub

Solució a l'Exercici 2

Sub FormatTextCursiva()
    Range("B2:D6").Select
    With Selection.Font
        .Italic = True
    End With
End Sub

Conclusió

Gravar i executar macros a Excel és una manera poderosa d'automatitzar tasques repetitives i millorar l'eficiència. Amb la pràctica, podràs crear macros més complexes i personalitzades per satisfer les teves necessitats específiques. En la següent secció, aprendrem a editar macros utilitzant VBA per afegir més funcionalitats i personalitzacions.

Dominar l'Excel: De Principiant a Avançat

Mòdul 1: Introducció a l'Excel

Mòdul 2: Funcions Bàsiques de l'Excel

Mòdul 3: Habilitats Intermèdies d'Excel

Mòdul 4: Formules i Funcions Avançades

Mòdul 5: Anàlisi i Visualització de Dades

Mòdul 6: Gestió Avançada de Dades

Mòdul 7: Automatització i Macros

Mòdul 8: Col·laboració i Seguretat

Mòdul 9: Integració d'Excel i Eines Avançades

© Copyright 2024. Tots els drets reservats