En måde, hvorpå du kan få kode ind i et VBA-modul, er ved at registrere dine handlinger ved hjælp af Excel-makrooptageren. En ting du skal huske er, at du kun kan optage ting, du kan gøre direkte i Excel. Visning af en beskedboks er ikke i Excels normale repertoire. (Det er en VBA-ting.) Makrooptageren er nyttig, men i mange tilfælde skal du sandsynligvis indtaste i det mindste noget kode manuelt.
Her er et trin-for-trin eksempel, der viser dig, hvordan du optager en makro, der indsætter et nyt regneark og skjuler alle undtagen de første ti rækker og alle undtagen de første ti kolonner. Hvis du vil prøve dette eksempel, skal du starte med en ny, tom projektmappe og følge disse trin:
Aktiver et regneark i projektmappen.
Ethvert regneark duer.
Klik på fanen Udvikler, og sørg for, at Brug relative referencer ikke er fremhævet.
Denne makro vil blive optaget ved hjælp af Absolutte referencer.
Vælg Udvikler → Kode → Optag makro, eller klik på ikonet ved siden af Klar-indikatoren i venstre ende af statuslinjen.
Excel viser dialogboksen Optag makro.
I dialogboksen Optag makro skal du navngive makroen TenByTen og trykke på Shift+T for genvejstasten.
Makroen kan udføres, når du trykker på Ctrl+Shift+T.
Klik på OK for at starte optagelsen.
Excel indsætter automatisk et nyt VBA-modul i projektet, der svarer til den aktive projektmappe. Fra dette tidspunkt konverterer Excel dine handlinger til VBA-kode. Mens du optager, bliver ikonet i statuslinjen til en lille firkant. Dette er en påmindelse om, at makrooptageren kører. Du kan også klikke på det ikon for at stoppe makrooptageren.
Klik på ikonet Nyt ark til højre for den sidste arkfane.
Excel indsætter et nyt regneark.
Vælg hele kolonne K (den 11. kolonne) og tryk på Ctrl+Shift+højre pil; højreklik derefter på en valgt kolonne, og vælg Skjul i genvejsmenuen.
Excel skjuler alle de valgte kolonner.
Vælg hele række 11 og tryk på Ctrl+Shift+pil ned; højreklik derefter på en hvilken som helst valgt række og vælg Skjul i genvejsmenuen.
Excel skjuler alle de valgte kolonner.
Vælg celle A1.
Vælg Udvikler → Kode → Stop optagelse, eller klik på knappen Stop optagelse på statuslinjen (den lille firkant).
Excel stopper med at registrere dine handlinger.
For at se denne nyligt optagede makro skal du trykke på Alt+F11 for at aktivere VBE. Find projektmappens navn i projektvinduet. Du kan se, at projektet har et nyt modul på listen. Navnet på modulet afhænger af, om du havde andre moduler i projektmappen, da du begyndte at optage makroen. Hvis du ikke gjorde det, får modulet navnet Modul1. Du kan dobbeltklikke på modulet for at se kodevinduet for modulet.
Her er koden genereret af dine handlinger:
Sub TenByTen()
'
' TenByTen Makro
'
' Tastaturgenvej: Ctrl+Shift+T
'
Sheets.Add After:=ActiveSheet
Kolonner ("K:K"). Vælg
Range(Udvalg, Valg.End(xlTilHøjre)).Vælg
Selection.EntireColumn.Hidden = Sand
Rækker ("11:11"). Vælg
Range(Udvalg, Valg.End(xlNed)).Vælg
Selection.EntireRow.Hidden = Sand
Range(“A1”).Vælg
Slut Sub
For at prøve denne makro skal du aktivere et hvilket som helst regneark og trykke på genvejstasten, som du tildelte i trin 4: Ctrl+Shift+T.
Hvis du ikke har tildelt en genvejstast til makroen, skal du ikke bekymre dig. Sådan viser du en liste over alle tilgængelige makroer og kører den, du ønsker:
Vælg Udvikler → Kode → Makroer.
Tastaturfans kan trykke på Alt+F8. En af disse metoder viser en dialogboks, der viser alle tilgængelige makroer.
Vælg makroen på listen (i dette tilfælde TenByTen).
Klik på knappen Kør.
Excel udfører makroen, og du får et nyt regneark med ti synlige rækker og ti synlige kolonner.
Du kan udføre et vilkårligt antal kommandoer og udføre et vilkårligt antal handlinger, mens makrooptageren kører. Excel oversætter pligtskyldigt dine musehandlinger og tastetryk til VBA-kode.
Og du kan selvfølgelig også redigere makroen, efter du har optaget den. For at teste dine nye færdigheder, prøv at redigere makroen, så den indsætter et regneark med ni synlige rækker og kolonner - perfekt til et Sudoku-puslespil.