Klik op de Extra drop- down menu in Excel . Wijzen naar " Macro " . Klik op " Visual Basic Editor " . Kopen van 2

Maak een plek om uw macro op te slaan . In het menu Invoegen op de VBA editor , klik op "Module " . De module wordt geopend in een nieuw venster . Deze module zal de macro die u gaat schrijven huisvesten . De module is eigenlijk opgeslagen in een map met de naam " VBA Project" .

Typ het woord " Sub " in het lege venster 3 . Schrijf niet over de tekst die "End Sub " leest . Na de Sub , typ een naam voor uw macro , zoals " MyLoopMacro " . Een lus is de makkelijkste macro te schrijven . Een lus telt automatisch rijen totdat een gespecificeerd punt te stoppen bereikt . Dit kan nuttig zijn voor grote hoeveelheden gegevens op een werkblad te zijn .
4

Vertel de lus om te stoppen op een lege cel . In het venster VBA , typ de volgende code : Do While Cells ( x , 1 ) . Waarde < > " " X = x + 1 Y = y + 1 Loop
5

Vertel uw macro die u wilt het woord "Naam" te donkerder dan andere tekst in uw Excel-werkmap worden weergegeven . Voeg de volgende code in de VBA- editor : IfMyCell.Value Like " Naam " Dan MyCell.Font.Bold = True End If
6

Code uw macro om meer te doen met cellen in een spreadsheet . Dit is slechts een voorbeeld , maar een die je kunt gebruiken voor een aantal dingen in een macro . Je gaat naar code die zal combineren twee cellen in een extra cel te schrijven . Dit kan waardevol zijn als u een spreadsheet die eerste en laatste namen kunnen combineren , paar data samen of om welke andere reden dan je zou willen om de gegevens over te dragen naar een andere kolom in het werkblad . Typ de volgende code in de VBA- editor : Sub LoopRange1 ( ) X = 3 Do While Cells ( x , 3 ) . Waarde < > " "
7

Voeg meer code aan uw macro . Tot zover u de waarde " x " om te beginnen bij rij 3 in uw werkblad hebt toegewezen . Je hebt ook een commando om lus totdat een lege rij wordt ontdekt door de macro . Vervolgens typt u de volgende drie regels code om de waarden van de derde en vierde kolom samen te gaan met een ruimte tussen hen in de vijfde kolom : Cells ( x , 5 ) . Value = Cells ( x , 3 ) . Value + _ " " + Cells ( x , 4 ) . waarde x = x + 1
8

Maak de cellen van kleur veranderen om een ​​woord ontdekt in een spreadsheet aan te geven . Dit kan zeer nuttig zijn voor het vinden ingevoerd door marketing specifieke gegevens . Nu ga je de variabele in uw code te creëren om te zoeken naar het woord " concurrent " in het werkblad . Typ de volgende code in de VBA -venster : Sub LoopRange2 ( ) Dim CompetitorCell als Range Deze code verklaart de variabele " CompetitorCell " . Nu druk op "Enter " om een ​​spatie tussen de laatste reeks van de tekst in uw code te creëren . Typ de volgende code . Als CompetitorCell.Value Like " * Concurrent * " Dan MyCell.Interior.ColorIndex = 3 ElseIf MyCell.Value Like " * Movie * " dan Mycell.Interior.ColorIndex = 4 ElseIf MyCell.Value = " " dan MyCell.Interior.ColorIndex = xINone Else ; MyCell.Interior.ColorIndex = 5 End If Next End Sub
9

Maak een macro die dubbele gegevens in uw werkblad te verwijderen . Dit kan prachtig zijn voor het bijhouden van dubbele accounts in uw spreadsheet systeem . Typ de volgende code aan te maken en test je eigen macro . Sub LoopRange3 ( ) X = ActiveCell.Row Y = x + 1 Do While Cells ( x , 4 ) . Waarde < > " " Do While Cells ( y , 4 ) . Waarde < > " " Als ( Cells ( x , 4 ) . Value = Cells ( y , 4 ) . Value ) _ en ( Cells ( x , 6) . value = _ Cells ( y , 6 ) . value ) Then Cells ( y , 4 ) . EntireRow.Delete Else y = y + 1 End If Loop & # xD ; x = x 1 y = x 1 Loop End Sub
10

het venster VBA sluiten . Klik op Opslaan . Uw macro is gemaakt . De code wordt het gemakkelijk om te begrijpen wanneer je oefenen met het. Het enige wat u hoeft te doen is verandering de variabele namen , de lus opdrachten en de cellen in het werkblad dat u wilt dat uw macro's om een taak uit te voeren met .
Wijs een bestaande Macro om een object in Excel < br >
11

klik met de rechtermuisknop op elk object tin uw werkblad , zoals een grafiek, tabel of bedrijfslogo .
12

klik met de linkermuisknop " Macro toewijzen " . Een side - out menu verschijnt nadat u met de rechtermuisknop klikken , die u vervolgens kunt selecteren uit . In dit geval , klik dan op " Macro toewijzen " .
13

Klik op de macro die u wilt toewijzen uit het vak Macro .
Verwijder een macro vanuit Excel < br >

Klik 14 op het menu Bestand van Excel . Klik op "Open Werkboek " . Als de werkmap is verborgen in de Personal.xlsb macrowerkmap , dan moet u de werkmap zichtbaar maken .

Klik 15 op "View " en klik op ' Zichtbaar maken ' .
16

Klik op " PERSONAL " onder het tabblad zichtbaar maken werkboeken en klik op " OK " .
Maak een macro van een bestaande Macro
17

Open de werkmap die bevat een bestaande macro die u wilt een deel van kopiëren voor uw nieuwe macro .

Klik 18 op " macro's " . Dit is gelegen in het tabblad Ontwikkelaars in Windows Vista of onder Hulpmiddelen voor andere versies van Windows .
19

Klik op de naam van de macro die u wilt bewerken .
20

Klik op ' bewerken ' .
21

Selecteer de code uit de code -venster dat opent met je muis . Druk op Ctrl + C om de selectie te kopiëren . Klik op de module in het vak Procedure waar u de gekopieerde code te plaatsen. Klik op Ctrl + V om de code te plakken .