Cum se scrie macrocomenzi. VBA Excel: exemple de programe. Macro-uri în Excel. Ce înregistrează o macro?

La fel ca în alte aplicații Microsoft Office, există un lucru atât de interesant ca o macro. Pe scurt, o macrocomandă este o secvență programabilă de acțiuni. Îl poți crea în două moduri:

1. Folosind elementul de meniu corespunzător;

2. Manual.

Prima metodă este foarte simplă și nu necesită abilități speciale de programare. Dar înainte de a începe să creați o macrocomandă, trebuie să vă modificați setările de securitate. Accesați Fișier/Opțiuni/Centrul de încredere/Setări Centrul de încredere/Setări macro. Aici trebuie să selectați Activați toate macrocomenzile.


Acum totul este gata și trecem direct la crearea macro-ului. Deschide fila Dezvoltatorși apăsați .

Va apărea o fereastră în care trebuie să specificați numele macrocomenzii, să atribuiți o cheie pentru lansarea rapidă și, de asemenea, să selectați cartea în care doriți să salvați macrocomanda.

După apăsarea butonului BineÎncepe înregistrarea macro. Tot ceea ce faci va fi înregistrat. De exemplu, puteți crea un tabel și îl puteți edita - setați numărul necesar de rânduri, coloane și lățimea acestora. Apoi, pentru a opri înregistrarea, trebuie să apăsați butonul corespunzător.

Acum, pentru a rula macrocomandă, trebuie să mergem la fila Dezvoltator presa Macro-uri.

În fereastra care apare, găsiți macrocomandă creată de noi și faceți clic A executa. De asemenea, puteți utiliza combinația de taste pe care am introdus-o la crearea macrocomenzii.

Nu există multe avantaje ale acestei metode de a crea macrocomenzi. În cele mai multe cazuri, o astfel de macrocomandă poate fi utilizată numai în registrul de lucru curent și pentru o situație specifică. Este mult mai eficient să folosești o macrocomandă scrisă folosind un limbaj de programare Visual Basic. Cu toate acestea, crearea unei astfel de macrocomenzi necesită anumite abilități. Este luat în considerare un exemplu de creare a unei macrocomenzi în VBA.

Macro-urile pot extinde semnificativ capacitățile Excel. Ei automatizează procesele de lucru și preiau cea mai mare parte a muncii de rutină a utilizatorului. Trebuie doar să înveți cum să folosești macrocomenzi și productivitatea ta va crește de zece ori!

Nici măcar nu trebuie să fii programator sau să cunoști limbajul de programare VBA pentru a-ți crea propriile programe macro folosind instrumentul de înregistrare macro.

Mai întâi trebuie să activați panoul pentru dezvoltatori. Pentru a face acest lucru, în meniul „Fișier”, deschideți grupul de opțiuni „Opțiuni”. În fereastra „Opțiuni Excel” care apare, deschideți grupul „Personalizare panglică”. Fiți atenți la coloana din dreapta a setărilor sub același nume „Personalizați panglica”. În ea, bifați opțiunea „Dezvoltator”, așa cum se arată în figura de mai jos:

Acum avem acces la o nouă filă „Dezvoltator” de pe panglică cu toate instrumentele sale pentru automatizarea muncii în Excel și crearea de macrocomenzi.

Utilizarea VBA și macrocomenzi în Microsoft Excel

Macro-urile sunt aplicații interne care se ocupă de toată munca de rutină, ușurând viața utilizatorului. Fiecare utilizator poate crea o macrocomandă fără cunoștințe de limbaje de programare. În acest scop, există un macro recorder, care este lansat folosind butonul „Înregistrare macro”.

În acest mod, macro recorder-ul înregistrează toate acțiunile utilizatorului în Excel, traducând automat codul VBA în limbajul de programare. După ce înregistrarea este finalizată, primim un program gata făcut care realizează el însuși acțiunile pe care utilizatorul le-a efectuat în timpul înregistrării.

Cum să înregistrezi o macrocomandă gata făcută în Excel? Foarte simplu:


Folosind programe macro, puteți crește productivitatea utilizatorului de zeci de ori. Dar pentru a utiliza înregistrarea macrocomenzilor personalizate 100%, trebuie să urmați reguli simple care afectează semnificativ calitatea acestora în momentul înregistrării și eficiența la executare.



Cum se lucrează cu macrocomenzi în Excel

5 sfaturi simple pentru a vă ajuta să creați macrocomenzi fără programare. Utilizați aceste sfaturi simple pentru a crea rapid și ușor programe macro de înaltă calitate în mod automat:

1 Numele corecte în macrocomenzi.

Dați macrocomenzilor dvs. nume scurte, dar semnificative. Odată ce ați înțeles, în timp va trebui să creați o mulțime de macrocomenzi. Când sunt selectate în caseta de dialog, acestea sunt mai ușor de găsit cu nume scurte și semnificative. VBA vă oferă posibilitatea de a furniza o descriere a numelui. Asigurați-vă că îl utilizați.

Numele macrocomenzii trebuie să înceapă cu litere și nu poate conține spații, simboluri sau semne de punctuație. După primul caracter, puteți utiliza mai multe litere, cifre sau liniuțe de subliniere, dar lungimea maximă a numelui este de 80 de caractere.

2 Utilizați adrese de celule relative (nu absolute).

Adresa absolută a unei celule este locația exactă a cursorului atunci când informațiile despre locația sa sunt scrise la adrese macro cu o legătură rigidă către o anumită celulă în momentul înregistrării. Adresele absolute limitează capabilitățile macrocomenzii dacă datele sunt adăugate/șterse pe foaia Excel sau lista de date devine mai mare. Instrumentele relative nu leagă cursorul la o anumită adresă de celulă.

În mod implicit, modul Excel este activat în modul Absolut, dar puteți schimba acest lucru activând butonul Legături relative situat sub butonul Înregistrare macrocomandă din bara de instrumente a filei Dezvoltator:


3 Începeți întotdeauna înregistrarea cu cursorul în A1

Numărarea absolută a celulelor se efectuează întotdeauna de la poziția de pornire (adresa celulei A1) - până la adresa cursorului cu datele dvs. Dacă ați salvat macrocomanda într-un registru de lucru personal cu macrocomandă (este recomandat să faceți acest lucru), atunci puteți utiliza programul pe alte foi cu date similare. Indiferent unde este poziționat cursorul atunci când începeți înregistrarea unei macrocomenzi! Chiar dacă se află deja în celula A1, prima macrocomandă de înregistrat după apăsarea tastelor ar trebui să fie Ctrl + Acasă.

Exemplu: Imaginează-ți că în fiecare lună primești zeci de mese de la toate filialele. Vi se cere să organizați datele și să calculați valorile pentru a produce un alt raport lunar. Puteți înregistra o macrocomandă pentru a îndeplini toate aceste funcții, inclusiv deschiderea și unirea tuturor foilor într-un singur tabel combinat.

4 Deplasați-vă întotdeauna cu tastele direcționale în timp ce înregistrați o macrocomandă

Utilizați tastele săgeți pentru a controla cursorul (Ctrl + Sus etc.). Poziționați cursorul astfel încât să puteți adăuga, modifica sau șterge date din tabel, după cum este necesar.

Utilizarea unui mouse pentru a naviga este mai dificilă și nu este la fel de fiabilă atunci când înregistrați. Când vine vorba de macrocomenzi, cel mai bine este să folosiți mouse-ul doar pentru a afișa meniuri.

5 Creați macrocomenzi pentru sarcini mici specifice

Păstrați macrocomenzile pentru sarcini mici, specifice. Cu cât mai mult cod într-o macrocomandă, cu atât rulează mai lent, mai ales dacă este necesar să efectueze multe funcții sau să calculeze multe formule într-o foaie de calcul mare.

Dacă rulați fiecare proces individual, puteți vizualiza rapid rezultatele pentru a verifica acuratețea executării lor.

Dacă este imposibil să divizați o macrocomandă lungă în aplicații scurte, dar trebuie să verificați funcționalitatea acesteia pas cu pas („depanare”). Apăsați tasta F8 de fiecare dată când doriți să treceți la pasul următor dintr-o sarcină. Procesul de execuție a programului se oprește când vede o eroare. Puteți remedia o eroare care este ușor de găsit folosind „debug” sau o puteți scrie într-un mod nou.

Dacă nu ești puternic în programare, dar în același timp, trebuie să implementezi unelePentru o sarcină care depășește funcțiile și comenzile standard ale MS Excel, puteți căuta o soluție pe Internet. Soluția va veni cel mai probabil sub formă de cod VBA pe care trebuie să-l copiați și să-l inserați în registrul de lucru, apoi faceți cumva acest cod să funcționeze pentru dvs., în acest articol vă voi spune cum să faceți acest lucru.

Să ne uităm la două exemple:

1. Găsiți și utilizați comanda

De exemplu, avem nevoie de o comandă care să insereze numărul „1” în celulele selectate. Lansăm motorul de căutare, introducem expresia de căutare, obținem rezultatele, începem să navigăm, găsim codul cam așa:

Sub Insertion1() Dim q Ca obiect la eroare Reluați următorul set q = Celule pentru fiecare q În selecție q = 1 Următorul q End Sub

Selectați acest cod (fără numerotarea liniilor, începând cu cuvântul Sub) și apăsați Ctrl+C. Accesați registrul de lucru MS Excel și apăsați comanda rapidă de la tastatură Alt+F11, se va deschide o fereastră de editor VBA:

În fereastra din stânga „Proiect - Proiect VBA” selectăm (clic cu mouse-ul) registrul nostru de lucru în care trebuie să inserăm macro-ul, de exemplu, „VBAProject (Book2)”:

În elementul de meniu „Inserare”, selectați „Modul”:

În fereastra din stânga „Proiect - Proiect VBA” ar trebui să aveți un nou folder „Module” și în el un nou obiect „Module1”:

Mutați cursorul în câmpul de introducere „Mare” din dreapta și faceți clic Ctrl+V, macrocomanda copiată este lipită în modul:

Macro-urile în MS Excel pot fi inserate în următoarele locuri:

  • În Modul, acestea introduc de obicei codul macro-urilor, care va fi lansat atunci când utilizatorul apasă un buton (ca, de exemplu, în cazul nostru) sau codul funcțiilor (formule);
  • În Foaia de lucru este de obicei inserat codul macrocomenzilor, a cărui lansare ar trebui să apară automat în funcție de acțiunile utilizatorului sau de modificările datelor din foaie (datele s-au schimbat, macro-ul este executat);
  • Codul macro este de obicei inserat în registrul de lucru, care ar trebui să fie lansat automat în funcție de acțiunile efectuate pe registrul de lucru (fișier). De exemplu, o macrocomandă care rulează atunci când un registru de lucru este deschis sau închis sau când este salvat;
  • Macro-urile pot face, de asemenea, parte dintr-un formular de utilizator.

De obicei, persoana care postează codul specifică unde ar trebui să fie inserat, într-un modul, foaie de lucru sau registru de lucru.

Pentru a insera codul într-o foaie de lucru, selectați foaia corespunzătoare în fereastra din stânga a editorului VBA, faceți dublu clic pe ea cu butonul stâng al mouse-ului, mutați cursorul în câmpul de intrare din dreapta și lipiți codul.

Pentru a insera un cod într-o carte, selectați „ThisBook”:


Sa exersam. Lipiți codul postat mai jos în „Sheet1”.

Private Sub Worksheet_Change(ByVal Target As Range) La eroare GoTo a If Target = 2 Then VBA.MsgBox("Cell " & Target.Address & " = 2") End If a: Exit Sub End Sub

Această macrocomandă afișează un mesaj de informare dacă introduceți „2” în orice celulă de foaie.

Reveniți la registrul de lucru, accesați „Sheet1” și introduceți numărul „2” în celula „A1” și faceți clic introduce, după care ar trebui să vedeți următorul mesaj:

Dacă vedeți acest mesaj, atunci ați făcut totul bine. Dacă nu, atunci ați introdus codul undeva în locul greșit, încercați din nou.

Când lipiți codul, trebuie să aveți grijă unde îl inserați. Acest lucru se poate face uitându-se la ceea ce este scris în titlul ferestrei editorului VBA:

2. Găsiți și utilizați funcția

Găsim pe Internet codul VBA al unei funcții care numără, de exemplu, numărul de cuvinte dintr-o celulă:

Funcție publică Numărul de cuvinte în celulă (celula ca interval) Dim q ca variantă Aplicație.Volatil q = VBA.Split(Application.WorksheetFunction.Trim(Cell.Value), " ") Numărul de cuvinte în celulă = UBound(q) + 1 End Funcţie

Copiați codul și apăsați combinația de taste Alt+F11, editorul VBA se va deschide:


Adăugați un nou modul în registrul de lucru și inserați codul copiat în acest modul:


Închideți editorul VBA și accesați registrul de lucru. Creați o foaie nouă (opțional) într-o celulă A1 introduceți textul „mama a spălat cadrul”. Mergem la celula în care dorim să obținem rezultatul (număr de cuvinte), în meniul „Formule”, faceți clic pe butonul „Inserare funcție”:

În fereastra „Inserare funcție” care se deschide, în câmpul „Categorie”, selectați „Definit de utilizator”

În lista de funcții disponibile, selectați „Număr de cuvinte în celulă”, faceți clic pe „OK”:

Introduceți argumentele necesare și faceți clic pe „OK”:

Obtinem rezultatul:

Important:

Dacă nu salvați registrul de lucru în care ați inserat macrocomandă ca „registru de lucru activat pentru macrocomandă”, toate modulele cu macrocomenzi vor fi șterse și va trebui să faceți din nou această muncă.

Dacă, când inserați o macrocomandă într-un modul, vedeți semne roșii în loc de ceva text " ???????? "

Aceasta înseamnă că aveți o problemă de codificare, care apare la copierea textului chirilic din unele browsere. Pentru a depăși această problemă, încercați să lipiți codul copiat într-o foaie de MS Excel goală ca „text Unicode”. Pentru a face acest lucru, accesați registrul de lucru MS Excel, selectați sau creați o foaie goală, mergeți la celula „A1” și apăsați comenzile rapide de la tastatură Ctrl+Alt+V. Ar trebui să apară meniul Paste Special, selectați Unicode Text și faceți clic pe OK.

Codul trebuie lipit în foaia de lucru fără semnele de întrebare:

După aceea, copiați din nou codul lipit în foaie și lipiți-l în modul.

Dacă nu vedeți fereastra „Proiect - Proiect VBA” în editorul VBA, accesați fila de meniu „Vizualizare” și selectați „Explorator proiect” din listă sau apăsați comanda rapidă de la tastatură Ctrl+R:

Mulți oameni cred că macrocomenzile din Excel sunt foarte dificile, dar acest lucru nu este adevărat. În acest articol veți găsi câteva exemple interesante și simple despre cum vă puteți automatiza sarcinile de zi cu zi în Excel. O macrocomandă este un program Visual Basic conceput pentru a automatiza sarcini în Microsoft Office. În exemplele mele, folosesc Excel 2010, dar puteți utiliza la fel de ușor și Excel 2007.

Creați o macrocomandă folosind comanda „Înregistrați macrocomandă”.

Macrocomanda înregistrată poate fi accesată folosind comanda Vizualizați macrocomenzi(Macro), care se află în filă Vedere(Vizualizare) în meniul drop-down Macro-uri(Macro-uri). Se va deschide o casetă de dialog Macro(Macro) în care îl puteți selecta pe cel de care aveți nevoie. Faceți dublu clic pe numele macrocomenzii pentru a executa programul.

În plus, puteți asocia o macrocomandă cu un buton. Pentru aceasta:

  1. Pe fila Fişier(Fișier) faceți clic Opțiuni(Opțiuni) > Bara de acces rapid(Bara de acces rapid).
  2. În câmp Alegeți comenzi din(Selectați comenzile din) selectați Toate comenzile(Toate echipele).
  3. Găsiți o echipă Butonul de opțiune(Buton), avem nevoie de cel care aparține secțiunii Controlul formularelor(Controale formulare). Selectați-l și faceți clic Adăuga(Adăuga). Apoi apasa Bine pentru a închide Opțiunile Excel.
  4. Selectați comanda pe care tocmai ați adăugat-o în bara de instrumente Acces rapid și desenați conturul butonului pe foaia de lucru Excel.
  5. Atribuiți o macrocomandă unui obiect.

Notă: Dacă aveți fila activată Dezvoltator(Dezvoltator), apoi puteți accesa controalele formularului din acesta. Pentru a face acest lucru, accesați fila Dezvoltator(Dezvoltator), faceți clic pe pictogramă Introduce(Inserați) și selectați elementul dorit din meniul derulant.

Nu știu cum să afișați o filă Dezvoltator(Dezvoltator)? Excel 2007: faceți clic pe butonul Birou > Opțiuni Excel(Opțiuni Excel) > Popular(De bază) și bifați caseta de lângă opțiune Afișați fila Dezvoltator în Panglică(Afișați fila „Dezvoltator” pe panglică). Excel 2010: faceți clic pe filă Fişier(Fișier) > Opțiuni(Opțiuni) > Personalizați panglica(Personalizați panglica) și în lista din dreapta activați fila Dezvoltator(Dezvoltator).

FOR Loop

În exemplul următor veți vedea cum să utilizați o buclă PENTRU. Ciclu PENTRU ne permite să repetăm ​​bucla cu valori diferite. Să vedem cum putem completa numerele din 1 inainte de 5 celule A1:A5.

Pentru a face acest lucru, pe fila Dezvoltator(Dezvoltator) faceți clic Visual Basic. Faceți dublu clic pe un obiect din listă Obiecte Microsoft Excel, în care ar trebui salvată macro-ul. Introdu acest cod:

Sub Macro1 () Pentru n = 1 până la 5 celule (n, 1) = n Next n End Sub

Salvați fișierul. Pentru a rula macro-ul, mergeți Vedere > Macro-uri > Vizualizați macrocomenzi(Vizualizare > Macrocomenzi > Macrocomenzi), selectați numele macrocomenzii dorite din listă și faceți clic Alerga(Alerga).

Următorul cod afișează expresia „ Salut Lume” în fereastra de mesaje Windows.

Sub MacroName() MsgBox("Bună lume!") End Sub

În exemplul următor creăm un mesaj cu o alegere da(Da sau Nu(Nu). Dacă selectați opțiunea da(Da), atunci valoarea celulei va fi ștearsă.

Sub MacroName() Dim Answer As String Answer = MsgBox ("Sunteți sigur că doriți să ștergeți valorile celulei?", vbQuestion + vbYesNo, "Delete cell") If Answer = vbYes Then ActiveCell.ClearContents End If End Sub

Să verificăm acest cod. Selectați celula și rulați macro-ul. Vi se va afișa acest mesaj:

Dacă apăsați da(Da), valoarea din celula selectată va fi ștearsă. Si daca Nu(Nu) – valoarea va fi salvată.

IF design

În Microsoft Excel puteți folosi și construcția DACĂ. În acest cod, vom colora celulele în funcție de valoarea lor. Dacă valoarea celulei este mai mare decât 20 , apoi fontul va deveni roșu, altfel va deveni albastru.

Sub MacroName() Dim CellValue As Integer CellValue = ActiveCell.Value Dacă CellValue > 20 Apoi Cu Selection.Font .Color = -16776961 End With Else With Selection.Font .ThemeColor = xlThemeColorLight2 .TintAnd Endd Sub = End0 If .

Pentru a testa acest cod, selectați o celulă cu valoarea mai mult de 20:

Când rulați macro-ul, culoarea fontului se va schimba în roșu:

Dacă a doua condiție este îndeplinită, fontul va deveni albastru:

Design CASE

De asemenea, puteți utiliza constructul Caz a asocia executarea unei acțiuni cu apariția unei valori specifice într-o celulă. Următorul exemplu afișează un mesaj al cărui conținut depinde de vârsta specificată a persoanei.

Sub MacroName() Dim CellValue As Integer CellValue = ActiveCell.Value Selectare Case CellValue Case 60 la 200 MsgBox „Persoana este bătrână” Cazul 30 la 59 MsgBox „Persoana este adult” Cazul 18 la 29 MsgBox „Persoana este tânără” Caz 0 până la 17 MsgBox „Persoana este un copil” Caz Else MsgBox „Vârsta necunoscută” End Select End Sub

Pentru a testa acest exemplu, trebuie să selectați o celulă cu o valoare și să rulați macrocomanda. Dacă valoarea celulei selectate, de exemplu, este 44 , atunci acest mesaj va fi afișat.

Macro-urile sunt indispensabile. O macrocomandă poate fi definită ca o secvență de comenzi (secvențial), care poate fi clicuri, apăsări de taste sau chiar linii mici de cod cu funcționalități mai avansate. Aceste secvențe sunt scrise într-un modul VBA și executate după cum este necesar.

Principalul avantaj al unui macro este economia de timp pe care o oferă, deoarece automatizează ceea ce trebuie făcut manual în mai mulți pași. Foarte util atunci când trebuie să efectuați același set de sarcini de mai multe ori.

O macrocomandă poate fi creată în două moduri diferite:

  • Folosind Macro Recorder:În această procedură, Excel salvează fiecare acțiune care va face parte dintr-o macrocomandă, iar apoi scriitorul de macrocomandă convertește acele acțiuni în comenzi Visual Basic pentru aplicații (VBA).
  • Folosind VBA: Dacă știți puțin despre programare sau chiar cunoașteți VBA, vă puteți crea singuri propriile macrocomenzi. Pentru a face acest lucru, pur și simplu utilizați editorul VBA prezent în cele mai recente versiuni de Microsoft Excel.

După cum am menționat mai devreme, există multe lucruri pe care le puteți face cu macrocomenzi, dar unele sunt diferite de altele, deoarece sunt utilizate mai frecvent în munca de zi cu zi. Consultați 10 macrocomenzi pentru a vă ajuta cu foile de calcul.

1) Afișați mesajul

Doar lipiți comanda MsgBox în macrocomandă. Ca în exemplul următor:

MsgBox „textul mesajului”


Această linie de cod poate fi inserată în orice macrocomandă, ceea ce este foarte util în cazurile în care trebuie să emiteți avertismente utilizatorului foii de calcul în care rulează macrocomanda.

2) Rulați macro-ul când deschideți foaia

În unele cazuri, macro-ul trebuie deschis împreună cu foaia de lucru. În acest caz, pur și simplu montați macro-ul cu parametrul Auto_Open(). Verificați exemplul

Sub Auto_Open()
MsgBox „Pentru a afla totul despre Excel, accesați www.https://luz.vc/”
End Sub

În exemplul de mai sus, va fi afișat un mesaj după deschiderea foii de calcul. Nu uitați să activați macrocomenzi în Excel.

3) Foaie de lucru cu data și ora curente

Puteți scrie data și ora curentă pe foaie. Următorul exemplu inserează aceste date în celula A1, vezi

Sub writeDataEora()
Interval("A1") = Acum
End Sub


4) Efectuați aceeași acțiune pentru fiecare celulă selectată.

La un moment dat trebuie să efectuați o acțiune asupra celulelor selectate de utilizator. Pentru a face acest lucru, creați o macrocomandă ca în exemplul de mai jos.

Sub doSpeedCell()
Pentru fiecare celulă din Selection.Cells
MsgBox pentru celule
Următorul
End Sub

5) La fel pentru toate celulele selectate

Puteți face aceeași macrocomandă înainte, dar într-un mod puțin mai complet, adică acțiunea nu va fi efectuată pas cu pas. În exemplul de mai jos, „Bună ziua” este scris în toate celulele.

Sub la doSomethingAllAsCells()
Selection.Cells.Value = "Bună ziua"!}
End Sub


Puteți face o mulțime de modificări la cod, cum ar fi schimbarea culorii textului, dimensiunea fontului, tipul fontului și multe altele.

6) Identificarea formulelor în fiecare celulă

Sub CheckFormula()
Dacă Range("A1") HasFormula = True, atunci
MsgBox „Există o formulă”
Mai mult
MsgBox „Nu este o formulă”
Încheiați dacă
End Sub

7) Schimbați culoarea celulei la trecerea mouse-ului

De asemenea, puteți oferi o interactivitate mai mare cu utilizatorii foilor de calcul. În mod ideal, interactivitatea urmărește să faciliteze întreținerea și vizualizarea informațiilor. Macrocomanda de mai jos este un exemplu despre modul în care tabelele dvs. pot afișa celule cu același ton de culoare atunci când mouse-ul transmite date care corelează celulele respective.

Private Sub Worksheet_SelectionChange (ByVal Target As Range)

Linia de acasă Dima ca gamă
Gamă
Dim Line2 cât timp

Cells.Interior.ColorIndex = xlNone

Line2 = Target.Row

Set Line Start = Range ("A" și Line2, Target)

Colorează celula selectată în coloana 5
Set Line = Range(celule(Target.Row, 1), cells(Target.Row, 5))

Cu riglă
.Interior.ColorIndex = 12
Se termina cu

8) Schimbați culorile în interior și fonturile

Această macrocomandă schimbă culorile în interiorul și la sursa celulelor în funcție de litera celulelor.

Sub Colorir_interior_letra()
Pentru N=1 la interval (“O65536”). End(xlUp).Rând

Selectați intervalul de scară („O” și N)
Cazul „A”
Interval(„O” și N).Interior.ColorIndex = 3
Interval(„O” și N).Font.ColorIndex = 1

Cazul „B”
Interval(„O” și N).Interior.ColorIndex = 4
Interval(„O” și N).Font.ColorIndex = 2

Cazul „C”
Interval(„O” și N).Interior.ColorIndex = 5
Interval(„O” și N).Font.ColorIndex = 3

Cazul „D”
Interval(„O” și N).Interior.ColorIndex = 7
Interval(„O” și N).Font.ColorIndex = 12

Cazul Altceva
Interval(„O” și N).Interior.ColorIndex = 6
Interval(„O” și N).Font.ColorIndex = 4
Încheierea selectării

Următorul N

9) Macro vorbitoare

M-am gândit deja că ar fi interesant să existe o foaie de calcul care să conțină datele conținute în ea, exact asta face această macrocomandă. În exemplul de mai jos, tabelul conține cuvinte care merg de la celula A1 la A5, dar puteți alege spațierea care funcționează cel mai bine pentru dvs., așa că pur și simplu schimbați A1:A5 furnizat în codul de mai jos la spațierea pe care o preferați.

Sub ExcelFalling()

Interval ("A1:A5").