Cum economisești timp în Excel: Power Query, macro-uri VBA și automatizări practice

Automatizarea în Excel nu necesită cunoștințe de programare avansate. Power Query, înregistrarea de macro-uri și câteva tehnici cu formule rezolvă 90% din sarcinile repetitive pe care le execuți manual acum. Iată cum funcționează fiecare și când îl folosești.

Power Query — automatizarea importului și curățării datelor

Power Query înregistrează fiecare pas de transformare aplicat datelor importate. La următoarea actualizare, Ctrl+Alt+F5 reaplică toți pașii automat, în ordinea înregistrată.

Import și curățare CSV — exemplu complet

// Data → Get Data → From File → From CSV
// Power Query Editor deschide fișierul

// Pași tipici de curățare (se înregistrează automat):
// 1. Changed Type — setezi tipul fiecărei coloane
// 2. Removed Columns — elimini coloanele inutile
// 3. Filtered Rows — elimini rândurile cu erori sau valori lipsă
// 4. Added Custom Column — calculezi o coloană derivată
// 5. Renamed Columns — dai nume clare coloanelor

// La final: Close & Load → Table
// Actualizare: clic pe tabel → Data → Refresh All (Ctrl+Alt+F5)

Combinarea automată a mai multor fișiere din același folder

// Data → Get Data → From File → From Folder
// Introduci calea folderului: C:\Rapoarte\Lunar// Power Query listează toate fișierele → Combine → Combine & Transform
// Selectezi foaia de interes din fișierele Excel
// Rezultat: toate fișierele combinate automat într-un singur tabel
// Adaugi un fișier nou în folder → Ctrl+Alt+F5 → apare automat în tabel

Macro-uri VBA — automatizarea acțiunilor repetitive

Înregistrarea unui macro (fără cod)

View → Macros → Record Macro → dai un nume și o comandă rapidă (ex: Ctrl+Shift+R) → execuți manual acțiunile → Stop Recording. De acum, Ctrl+Shift+R execută tot ce ai înregistrat instantaneu.

Macro VBA scris manual — export PDF automat

Sub ExportRaportPDF()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("Dashboard")

    Dim numeFisier As String
    numeFisier = "Raport_" & Format(Now, "YYYY-MM-DD") & ".pdf"

    ws.ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:=Environ("USERPROFILE") & "\Desktop" & numeFisier, _
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        OpenAfterPublish:=True

    MsgBox "PDF exportat: " & numeFisier, vbInformation
End Sub

Macro pentru trimiterea automată prin email (Outlook)

Sub TrimiteRaportEmail()
    Dim ol As Object
    Dim mail As Object

    Set ol = CreateObject("Outlook.Application")
    Set mail = ol.CreateItem(0)

    With mail
        .To = "[email protected]"
        .Subject = "Raport zilnic " & Format(Date, "DD.MM.YYYY")
        .Body = "Salut," & vbCrLf & "Raportul zilnic este atașat." & vbCrLf & "Excel Group"
        .Attachments.Add ThisWorkbook.FullName
        .Send
    End With

    MsgBox "Email trimis!", vbInformation
End Sub

Formule care înlocuiesc munca manuală

Flash Fill (Ctrl+E) — separarea textului fără formule

Ai coloana A cu „Ion Popescu” și vrei prenumele în coloana B. Scrii manual „Ion” în B1, apeși Ctrl+E — Excel completează tot restul automat prin recunoaștere de pattern. Funcționează și pentru formatarea numerelor de telefon, codurilor poștale și oricărei transformări cu un pattern consistent.

TRIM și CLEAN — curățarea automată a datelor importate

=TRIM(CLEAN(A2))
// CLEAN elimină caracterele non-printabile (tab, newline, caractere ascunse)
// TRIM elimină spațiile de la început, sfârșit și pe cele duble din interior
// Combinat: curăță orice text importat din sisteme externe

Formula 3D — suma din mai multe foi simultan

=SUMA(Ian:Dec!B5)
// Sumează celula B5 din toate foile între "Ian" și "Dec"
// Adaugi o foaie nouă între ele → se include automat în calcul
// Funcționează și cu MEDIE, MAX, MIN, NUMAR

Întrebări frecvente

Trebuie să știu să programez ca să automatizez în Excel?

Nu. Power Query înregistrează singur fiecare pas de transformare, iar înregistrarea unui macro (View → Macros → Record Macro) reține exact ce faci manual, fără nicio linie de cod scrisă. Codul devine util mai târziu, pentru lucruri precum exportul automat în PDF sau trimiterea raportului pe email.

Cum combin automat mai multe fișiere dintr-un folder?

Data → Get Data → From File → From Folder, introduci calea folderului, iar Power Query listează toate fișierele. Alegi Combine → Combine & Transform și selectezi foaia de interes. Rezultatul e un singur tabel, iar când adaugi un fișier nou în folder apeși Ctrl+Alt+F5 și apare automat.

Ce face Flash Fill și când îl folosesc?

Flash Fill (Ctrl+E) separă sau reformatează text prin recunoașterea unui tipar, fără formule. Scrii manual primul rezultat, apeși Ctrl+E și Excel completează restul. Funcționează pentru separarea numelui de prenume, pentru formatarea numerelor de telefon, a codurilor poștale și pentru orice transformare cu tipar consistent.

Articol scris de Pisău Daniel — Excel Group