Er zijn verschillende korte macro's die u aan uw persoonlijke macrowerkmap kunt toevoegen en vervolgens aan de QAT kunt toevoegen. In deze tip ziet u hoe u de persoonlijke macrowerkmap maakt, enkele macro's typt en deze vervolgens toewijst aan pictogrammen op de QAT.
Maak een persoonlijke macrowerkmap
Begin vanuit een willekeurige werkmap. Ga naar Weergave, Macro's, Macro opnemen. Typ in het dialoogvenster Macro opnemen een naam van één woord, zoals HelloWorld. Kies Persoonlijke macrowerkmap. Klik OK.
Typ Hallo in de actieve cel en druk op Enter. Selecteer vervolgens Weergave, Macro's, Opname stoppen. Met deze stappen wordt een Personal.xlsb op uw computer gemaakt waarin u nieuwe macro's kunt opslaan.
Open de VBA-editor en zoek Module1 in Personal.xlsb
Druk vanuit Excel op Alt + F11. (Als u geen Alt + F11 hebt, kunt u de Visual Basic-opdracht aan de QAT toevoegen en erop klikken.
De eerste keer dat je in de VBA-editor bent, is het misschien een enorme hoeveelheid grijs. Selecteer in het VBA-menu View, Project Explorer.
Zoek naar een item met de naam VBAProject (PERSONAL.XLSB). Klik op het + pictogram om het uit te vouwen.
Zoek naar modules en vouw ze uit. Klik met de rechtermuisknop op Module1 en kies Bekijk code.
Je ziet je HelloWorld-code. Typ een van deze procedures na de End Sub.
Sub VeryHideActiveSheet() ActiveSheet.Visible = xlVeryHidden End Sub Sub ShowAllSheets() For Each sh In ActiveWorkbook.Worksheets sh.Visible = True Next sh End Sub Sub UpperSelection() For Each cell In Selection.SpecialCells(2, 2) ' 2, 2 means xlCellTypeConstants, Text cell.Value = UCase(cell.Value) Next End Sub Sub LowerSelection() For Each cell In Selection.SpecialCells(2, 2) cell.Value = LCase(cell.Value) Next End Sub Sub ProperSelection() For Each cell In Selection.SpecialCells(2, 2) cell.Value = Application.WorksheetFunction.Proper(cell.Value) Next End Sub Wanneer u de QAT aanpast, kiest u Macro's in het vervolgkeuzemenu linksboven.
Wanneer u een macro kiest en op Toevoegen >> klikt, wordt het pictogram standaard een stroomschema. Klik rechtsonder op Wijzigen. Kies een nieuw pictogram. Typ een goede tooltip.
Hier is een uitleg van het gebruik van deze vijf macro's:
- Very Hide : Werkbladen kunnen zichtbaar, verborgen of erg verborgen zijn. Weinig mensen zijn op de hoogte van Very Hidden-bladen omdat u VBA moet gebruiken om ze te maken. Een werkblad dat erg verborgen is, wordt niet weergegeven in Start, Opmaak, Verbergen en zichtbaar maken, Werkbladen. (Met dank aan -Sagar Malik)
- Toon alle bladen : het is gemakkelijk om 12 bladen te selecteren en ze in één opdracht te verbergen. Maar dan is het een een-voor-een voorstel om de bladen zichtbaar te maken. Deze macro zal alle bladen zichtbaar maken (inclusief zeer verborgen bladen).
- Bovenselectie : converteert alle tekst in de selectie naar hoofdletters.
- Onderste selectie : converteert alle tekst in de selectie naar kleine letters.
- Juiste selectie : converteert alle tekst in de selectie naar hoofdletters en kleine letters.
Met dank aan MF Wong voor het suggereren van enkele van deze macro's.
