Mijn hobbysite
Excel 2007 - 2010 / Vista en Windows 7
Macro om de tekst in geselecteerde cellen om te zetten naar hoofdletters
Open Excel met een leeg werkblad, open het lint 'Ontwikkelaars' en klik op 'Macro opnemen'
Geef de naam voor de macro (hier: 'Hoofdletter') en de sneltoets waarmee je de macro wilt oproepen (hier: 'h'). Kies voor 'Macro opslaan in' 'Persoonlijke Macrowerkmap'.
Druk op [OK]
De macro-opnemer komt op en mag dadelijk terug gestopt worden.
Kies voor 'Opslaan' en sluit Excel. Indien de persoonlijke macrowerkmap nog niet bestaat, wordt ze automatisch aangemaakt bij het opnieuw openen van Excel.
Deze 'Personal.xlsb', in de map 'XLSTART', wordt automatisch aangehecht aan iedere werkmap die geopend wordt, maar is normaal onzichtbaar. Om de macro's in deze map te kunnen aanpassen, moet ze zichtbaar gemaakt worden.
Open het lint 'Beeld' en klik op 'Zichtbaar maken'. Selecteer 'Personal.xlsb' en druk [OK].
Om de macro te maken (of aan te passen), open het lint 'Ontwikkelaars' en klik op 'Macro's'
en selecteer onze macro 'Hoofdletter' en klik [Bewerken].
Nu kom je terecht in de Visual Basic Editor. De groene tekst wordt automatisch geplaatst.
De programmeertaal is volledig gelijk aan Visual Basic. Natuurlijk zijn er nu wel extra syntaxen en commando's voorzien die specifiek voor Excel zijn.
Vul de code exact in zoals hier beneden in het voorbeeld. (Let op de juiste schrijfwijze!! Het is programmeercode en alles heeft zijn betekenis).
Niet vergeten op te slaan! Daarna 'Sluiten en terugkeren naar Microsoft Excel'
De map 'Personal.xlsb' terug onzichtbaar maken via het lint 'Beeld' en klikken op 'Verbergen'.
Bij afsluiten van Excel wordt nog eens gevraagd om de wijzigingen op te slaan. Hier natuurlijk op [OK] klikken.
Even een kleine test:
- Open Excel en typ wat kleine tekst in enkele cellen
- Selecteer de gewenste cellen (Met [Ctrl] ingedrukt kun je meerdere niet-aaneengesloten celgroepen selecteren)
- Druk op de ingestelde sneltoetscombinatie [Ctrl]+[h] en de ganse tekst wordt in hoofdletters geplaatst.
Macro om de tekst in geselecteerde cellen om te zetten naar kleine letters
Dit vraagt natuurlijk maar een kleine aanpassing in de programmacode.
Waar de code 'UCase' (= Uppercase = hoofdletter) staat, vervang je gewoon de 'U' door een 'L' (LCase = Lowercase = Kleine letter).
Voor het overige kan exact dezelfde procedure als hierboven gevolgd worden.
Even een kleine test:
- Open Excel en typ wat kleine tekst in enkele cellen
- Selecteer de gewenste cellen (Met [Ctrl] ingedrukt kun je meerdere niet-aaneengesloten celgroepen selecteren)
- Druk op de ingestelde sneltoetscombinatie [Ctrl]+[l] en de ganse tekst wordt in kleine letters geplaatst.
Roterende combinatie
- kleine letters => Begin-hoofdletter;
- Begin-hoofdletter => HOOFDLETTERS;
- HOOFDLETTERS => alles kleine letters.
Dit vraagt iets meer kennis van Visual Basic voor de juiste programmeercode. Voor het overige kan exact dezelfde procedure als hierboven gevolgd worden.
Even een kleine test:
Open Excel en typ wat kleine tekst in enkele cellen en selecteer de gewenste cellen. (Met [Ctrl] ingedrukt kun je meerdere niet-aaneengesloten celgroepen selecteren)
- Druk op de ingestelde sneltoetscombinatie [Ctrl]+[w] en alle woorden van de tekst beginnen met hoofdletter.
- Druk nog eens op de ingestelde sneltoetscombinatie [Ctrl]+[w] en de ganse tekst wordt in hoofdletters geplaatst.
- Druk nog eens op de ingestelde sneltoetscombinatie [Ctrl]+[w] en de ganse tekst wordt in kleine letters geplaatst.
