Automatisch tekst toevoegen aan de kop van een document in Microsoft Word met VBA

Automatisch tekst toevoegen aan de kop van een document in Microsoft Word met VBA

Kopteksten zijn een geweldige plek om uw Word-document te introduceren en ze zijn ook gemakkelijk te gebruiken. Je hoeft alleen maar op de kop te dubbelklikken en te typen, toch? Hoe eenvoudig het ook is, net als al het andere, kan deze taak nogal eentonig en vervelend worden als u dezelfde koptekst voor meerdere documenten achter elkaar moet toevoegen.





MAKEUSEVAN VIDEO VAN DE DAG

Voor dat scenario, of misschien andere scenario's, komt VBA goed van pas. Met VBA kun je een stukje code schrijven dat automatisch de gewenste tekst aan de kop van je document toevoegt.



Automatisch tekst toevoegen aan documentkop met VBA in Word

VBA of Visual Basic voor toepassingen is een geïntegreerde vorm van Visual Basic die wordt gebruikt in Microsoft Office-apps. Met VBA kun je codes schrijven om macro's te maken, wat op zijn beurt taken automatiseert die je anders handmatig zou moeten doen. Met VBA kunt u zelfs uw eigen aangepaste knoppen en functies voor Microsoft Word maken.





In dit artikel gaan we een macro maken en er een code voor schrijven, waarmee aangepaste tekst aan de kop van het document wordt toegevoegd. Kopteksten zijn een handig gedeelte in Word-documenten, en je kunt veel uit headers halen in Microsoft Word .

Als voorbeeld gaan we een code maken die de tekst toevoegt Geschreven en gepubliceerd door MakeUseOf naar de kop. We gaan deze tekst vet maken en uitlijnen met het midden van het document.



1. Toegang tot het tabblad Ontwikkelaars

De eerste stap bij het maken van Word-macro's is het openen van het tabblad Ontwikkelaar vanaf het lint. Dit tabblad is standaard uitgeschakeld, omdat macro's zijn gereserveerd voor geavanceerde gebruikers. Gedownloade macro's zijn een gemakkelijke manier voor hackers om malware op uw systeem te openen en te installeren, dus Microsoft heeft besloten ze standaard te blokkeren .

Dat gezegd hebbende, moet u het tabblad Ontwikkelaar inschakelen via de opties. Als je eerder macro's hebt gebruikt, is het tabblad Ontwikkelaars natuurlijk al beschikbaar, dus het is niet nodig om dit helemaal opnieuw te doen. Als het de eerste keer is dat u met macro's en VBA in Office-programma's werkt, is het een goed idee om onze handleiding over hoe u macro's in Word kunt gaan gebruiken .



Instellingen voor woordlint
  1. Ga in Microsoft Word naar de Bestand menu.
  2. Selecteer Opties . Hierdoor wordt het venster Word-opties geopend.
  3. In de Woordopties venster, selecteer Lint aanpassen .
  4. Rechts onder Hoofdtabbladen , scroll naar beneden en controleer Ontwikkelaar .
  5. Klik Oké .

Nu zie je het tabblad Ontwikkelaar in het lint, precies tussen Weergave en Help.

2. De macro maken

Nu is het tijd om je handen vuil te maken met een macro en wat code. Nadat u een macro hebt gemaakt en de code ervoor hebt geschreven, kunt u er een snelkoppeling aan toewijzen, zodat u niet elke keer naar het macromenu hoeft te gaan.



Op deze manier kunt u uw productiviteit verder verhogen, aangezien u alleen een toetscombinatie op uw toetsenbord indrukt en de magie achter de schermen plaatsvindt.

hoe jar-bestanden te openen met java windows 10
Macromenu in Word
  1. Ga naar de Ontwikkelaar tabblad.
  2. Klik op Macro's van de Code sectie.
  3. Voer een naam in voor uw macro. We gaan de onze een naam geven muoHeading .
  4. Klik op Creëren .
Een lege macro in Word

Zodra u klikt Creëren , verschijnt er een nieuw venster met twee regels code en een informatieregel. De regels Sub en End Sub markeren het begin en einde van de code van uw macro. Plaats de onderstaande code tussen de twee regels:

dingen te doen met nieuwe laptop 
Dim headerRange As Range 
Dim headerText As String 
 Set headerRange = ActiveDocument.Sections.Item(1).Headers(wdHeaderFooterPrimary).Range 
headerRange.Text = "Written and Published by MUO" 
headerRange.Font.Bold = True 
headerRange.ParagraphFormat.Alignment = wdAlignParagraphCenter

De Dim-instructie in deze code verklaart de headerBereik en koptekst variabelen als a Bereik en een Snaar respectievelijk. Volgende, de Set verklaring stelt de headerBereik variabele toe aan de koptekst van het huidige actieve document.

De Set statement krijgt eerst toegang tot het huidige actieve document, dan zijn secties, dan het eerste item en de koppen erin. Ten slotte opent het de primaire koptekst in Word en stelt het vervolgens in als a Bereik .

Zodra deze twee zijn verklaard, wordt de headerBereik tekst is ingesteld op de gewenste tekst. In de volgende regel is het lettertype vetgedrukt en in de laatste regel wordt de alinea-uitlijning ingesteld op het midden. De parameters die beginnen met 'wd' geven aan dat de parameter exclusief is voor Microsoft Word.

De Sub en Einde sub codes zijn niet opgenomen in dit fragment hierboven, omdat je verondersteld wordt de code uit het fragment tussen deze twee te plakken. Uw uiteindelijke code zou eruit moeten zien als de onderstaande afbeelding:

De macro voor het invoegen van koptekst voor Word

3. De macro gebruiken

Nadat u de code heeft ingesteld, bent u klaar om de macro te gebruiken. Het is niet nodig om het op te slaan; alles wat u typt in de VBA-werkruimte wordt direct opgeslagen. Nu is het tijd om een ​​snelkoppeling voor de macro in te stellen en te kijken of deze werkt!

  1. Ga naar de Bestand menu.
  2. Selecteer Opties .
  3. Selecteer Lint aanpassen .
  4. Klik op Aanpassen naast Toetsenbord sneltoetsen onderaan het venster. Dit opent het venster Toetsenbord aanpassen.
  5. In de Toetsenbord aanpassen venster, scroll naar beneden in de Categorieën lijst en selecteer Macro's .
  6. Selecteer in het rechtermenu uw macro.
  7. Klik op het tekstvak onder, Druk op nieuwe sneltoets .
  8. Voer de toetsencombinatie op uw toetsenbord in. Het is een goed idee om te gebruiken Ctrl , Alles , en Verschuiving tegelijkertijd. Op deze manier is de combinatie waarschijnlijk nog niet in gebruik. We gaan gebruiken Alles + Ctrl + Verschuiving + H .
  9. Klik op en klik vervolgens op Oké .

Nu is het tijd om de magie aan het werk te zien. Druk op uw toetsenbord op de toetsencombinatie die u zojuist aan uw macro hebt toegewezen. Hopelijk zie je de tekst in je header! Vet en gecentreerd! Als dingen niet gaan zoals gepland, volg dan je stappen en controleer je code op fouten.

Wanneer u de tekst wilt wijzigen die de code aan uw kop toevoegt, kunt u gewoon naar het macromenu gaan en de macro bewerken. Als je benieuwd bent naar de standaard Word-sneltoetsen, bekijk dan onze Cheatsheet voor Microsoft Word-sneltoetsen .

Automatiseer uw workflow

Het is waar dat het toevoegen van tekst aan de kop van een document in Word weinig moeite kost, maar weinig moeite in grote hoeveelheden kan eentonig, zo niet moeilijk worden. Hoe dan ook, als je het makkelijker en minder tijdrovend kunt maken, waarom zou je het dan niet doen?

VBA bestaat om dergelijke doeleinden te dienen. Als u een Word-functie wenst die automatisch een aangepaste tekst aan de koptekst van een document toevoegt, hoeft u dat niet meer te wensen. Met VBA kunt u elke functie maken die u in Word mist. Tekst toevoegen aan de kop van een document is slechts een minuscuul voorbeeld van wat u kunt bereiken met VBA in Word.

Nu weet je hoe je code voor dit doel moet schrijven en er een snelkoppeling aan toewijst. U hoeft dus alleen maar op een toetscombinatie te drukken, achterover te leunen en toe te kijken terwijl Word het saaie werk voor u doet in milliseconden.