Makroer er biter av kode som kan kjøres repeterende oppgaver fra Excel-arbeidsboken . Lære å skrive en makro for Excel vil styrke deg til å ta kontroll over dokumenter og data du jobber med på daglig basis. Kort sagt , vil denne artikkelen instruere leseren i hvordan du oppretter biter av kode som vil revolusjonere din multitasking erfaring med Excel. Makroer produsere en spesifikk effekt i Excel- dokumenter. Språket som brukes i Makroer er Visual Basic for Applications ( VBA ) . Du vil bruke dette språket til å lage moduler festet til Excel arbeidsbok , hvor du vil lagre makroer. Makroer vil virkelig legge til funksjonalitet og brukervennlighet til Excel-dokumenter . Med makroer , kan du organisere flere ark med data i ett ark eller formulere data på et ark for å møte noen av dine brukerbehov. Instruksjoner
Skriv en Macro i MS Excel Bruke VBA Editor
en

Klikk Verktøy- drop- down menyen i Excel. Peke på " makro" . Klikk på " Visual Basic Editor " .
2

Lag et sted å lagre makroen . I menyen Sett inn på VBA editor , klikk på " Module" . Modulen åpnes i et nytt vindu. Denne modulen skal huse makroen du skal skrive . Modulen er faktisk lagret i en mappe merket " VBA Project" .
3

Skriv inn ordet " Sub " i tomt vindu . Ikke skriv over teksten som leser "End Sub " . Etter Sub Skriv inn et navn for makroen , som " MyLoopMacro " . En løkke er den enkleste makro for å skrive . En løkke vil telle rader automatisk til den når et bestemt punkt å stoppe. Dette kan være nyttig for store mengder data på et regneark .
4

Fortell loopen til å stoppe på en tom celle . I VBA -vinduet , skriver du inn følgende kode : Gjør Mens Cells ( x , 1 ) . Verdi < > " " X = x + 1 Y = y + 1 Loop
5

Fortell din makroen du vil ordet "Navn" for å være mørkere enn annen tekst i hele Excel arbeidsbok . Legg til følgende kode i VBA redaktør : IfMyCell.Value Like " Name " Da MyCell.Font.Bold = True End Hvis
6

Kode makroen til å gjøre mer med celler i et regneark . Dette er bare et eksempel , men en som du kan bruke for en rekke ting i en makro . Du kommer til å skrive kode som vil kombinere to celler til en ekstra celle. Dette kan være nyttig hvis du har et regneark som kan kombinere for-og etternavn , par data sammen eller for noen annen grunn til at du ønsker å bære data over til en annen kolonne i regnearket. Skriv inn følgende kode i VBA redaktør : Sub LoopRange1 ( ) X = 3 Gjør Mens Cells ( x , 3 ) . Verdi < > " "
7

Legg til mer kode til makroen. Så langt du har tilordnet verdien " x " for å starte på rad 3 i regnearket. Du har også laget en kommando for å sløyfe til en tom rad blir oppdaget av makroen. Deretter skriver disse tre linjene med kode for å gjennomføre verdiene av de tredje og fjerde kolonner sammen med et mellomrom mellom dem i den femte kolonne: Celler (x, 5). Verdi = Cells ( x , 3 ) . Verdi + _ " " + Cells ( x , 4) . Verdien x = x + 1
8

Gjør cellene endrer farge for å indikere et ord oppdaget i et regneark . Dette kan være svært nyttig for å finne bestemte data som skrives av markedsføring. Nå skal du opprette variabel i koden din for å se etter ordet " konkurrent " i regnearket. Skriv inn følgende kode i VBA -vinduet: Sub LoopRange2 ( ) Dim CompetitorCell Som Range Denne koden erklærer variabelen " CompetitorCell " . Nå trykke " Enter" for å skape et rom mellom den siste tekststreng i koden. Skriv inn følgende kode . Hvis CompetitorCell.Value Like " * Konkurrent * " Da MyCell.Interior.ColorIndex = 3 ElseIf MyCell.Value Like " * Movie * "Da Mycell.Interior.ColorIndex = 4 ElseIf MyCell.Value = " "Then MyCell.Interior.ColorIndex = xINone Else ; MyCell.Interior.ColorIndex = 5 End If Next End Sub
9

Lag en makro som vil slette like data i regnearket . Dette kan være flott for sporing dupliserte kontoer i regnearket system . Skriv inn følgende kode for å lage og teste din egen makro. Sub LoopRange3 ( ) X = ActiveCell.Row Y = x + 1. Gjør Mens Cells ( x , 4) . Verdi < > " " gjøre mens Cells ( y , 4) . Verdi < > " " If ( Cells ( x , 4) . Verdi = Cells ( y , 4) . Value) _ Og ( Cells ( x , 6 ) . Verdi = _ Cells ( y , 6 ) . Verdi ) så Cells ( y , 4 ) . EntireRow.Delete Else y = y + 1 End If Loop & # xD ; x = x 1 y = x 1 Loop End Sub
10

Lukk VBA -vinduet . Klikk på Lagre . Makroen er opprettet. Koden blir lett å forstå når du øve med det. Alt du trenger å gjøre er å endre variabelnavn , loop -kommandoer og cellene i regnearket som du vil at makroer for å utføre en oppgave med .
Tilordne en eksisterende makro til et objekt i Excel

11

Høyreklikk på et objekt tinn regnearket , for eksempel en graf , et diagram eller firmalogo.
12

Venstre-klikk " Tilordne makro " . En side- out menyen vises når du høyreklikker, som du deretter kan velge alternativer fra . I dette tilfellet , klikker du bare " Tilordne makro " .
13

Klikk på makroen du vil tilordne fra Macro -boksen .
Slette en makro fra Excel

14

Klikk på Fil-menyen i Excel. Klikk på " Åpne arbeidsbok " . Hvis arbeidsboken er skjult i Personal.xlsb makroarbeidsboken , så må du unhide arbeidsboken .
15

Klikk på "Vis" , deretter " skjul" .
16

Klikk " PERSONLIG " under Unhide arbeidsbøker fanen og deretter "OK" .
Lag en makro fra en eksisterende makro
17

Åpne arbeidsboken som inneholder en eksisterende makroen du vil kopiere en del av for den nye makroen .
18

Klikk på " Makroer " . Dette ligger i kategorien Utvikler i Windows Vista eller under Verktøy for andre versjoner av Windows.
19

Klikk på navnet på makroen du vil redigere.
20

Klikk på " Rediger " .
21

Velg kode fra vinduet som åpnes med musen . Trykk Ctrl + C for å kopiere det merkede området . Klikk på modulen i Prosedyre boks hvor du ønsker å plassere den kopierte koden . Klikk Ctrl + V for å lime inn koden .