Tilføjelse Serial kommaer i en sætning

En af de mest almindelige problemer står af Emily når redigering involverer indsættelse af den serielle komma i en in-line liste over emner, før den endelige sammenhæng mellem listeelementer. Emilys kontor håndhæver brugen af ​​den serielle komma for klarhed og for at undgå sådanne potentielt akavet fraseringer som: "Jeg dedikerer denne bog til mine forældre, Mother Teresa og Jesus." Men de fleste forfattere ikke kan lide at bruge denne komma, så Emily bruger en god mængde tid at redigere den i næsten alle afsnit i teksten hun kommer på tværs. Emily bemærker, at det ville gøre hendes liv nemmere, hvis hun havde en makro, der ville søge fra indsætningspunktet til slutningen af ​​den aktuelle sætning og indsætte et komma før den næste forekomst af de fælles konjunktioner "og" og "eller", men kun hvis der ikke er komma der allerede.

Den bedste måde at håndtere denne situation er med en makro, som Emily bemærker. Her er en, der vil udføre opgaven:

Sub SerialComma ()
Dim MySelection Som Selection

Selection.MoveRight Unit: = wdSentence, Extend: = wdExtend
Set MySelection = Selection
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
Med Selection.Find
.Text = "([,;:!.?]) Og"
.Replacement.Text = "\ 1, og"
.forward = True
.Wrap = WdFindStop
.Format = False
.MatchCase = False
.MatchWildcards = True
End med
Selection.Find.Execute Erstat: = wdReplaceAll
MySelection.Select
Med Selection.Find
.Text = "([,;:!.?]) Eller"
.Replacement.Text = "\ 1, eller"
End med
Selection.Find.Execute Erstat: = wdReplaceAll
MySelection.Select
Selection.Collapse
End Sub

Makroen først vælger alt fra den aktuelle indsætningspunktet til slutningen af ​​den aktuelle sætning. Derefter bruger et wild card søgning, søger den efter en forekomst af ordet "og", der ikke følger et tegnsætningstegn. Hvis den finder det, det erstatte forekomsten med et komma og ordet "og". Det vil derefter gøre en lignende søg-og-erstat operation for ordet "eller".

Denne makro kan naturligvis tildeles en genvejstast eller en værktøjslinje knappen for at gøre at tilføje denne type komma et snuptag.

En anden konfiguration ændring, du måske ønsker at gøre, er at fortælle Word, som du vil have det markere som forkerte eventuelt manglende kommaer i dine inline lister. Du kan foretage denne ændring på denne måde:

  1. Vælg Indstillinger i menuen Funktioner. Word viser dialogboksen Indstillinger.
  2. Sørg for, at fanen Stave- og grammatikkontrol er valgt. (Se figur 1.)

    Tilføjelse Serial kommaer i en sætning

    Figur 1. fanen Stave- og grammatikkontrol i dialogboksen Indstillinger.

  3. Klik på knappen Indstillinger. Word viser Grammatik dialogboksen. (Se figur 2.)

    Tilføjelse Serial kommaer i en sætning

    Figur 2. Grammatik dialogboksen.

  4. Sørg for, at "Comma, før sidste Listeemne" er indstillet til Altid.
  5. Klik på OK for at lukke Grammatik dialogboksen.
  6. Klik på OK for at lukke dialogboksen Indstillinger.

Indstillingen vil ikke indsætte den sidste komma for dig, men det vil fange de tilfælde, hvor kommaet ikke er til stede.

WordTips er din kilde til omkostningseffektiv Microsoft Word træning. (Microsoft Word er det mest populære tekstbehandlingsprogram i verden.) Dette tip (9293) gælder for Microsoft Word 97, 2000, 2002, og 2003. Du kan finde en version af dette tip til menufaner Word (Word 2007 og nyere) her: Tilføjelse Serial kommaer i en sætning.


© 2021 Zajacperrone.com | Contact us: webmaster# zajacperrone.com