Forums: Index > Watercooler > No all cap names
I have noticed a lot of all cap surnames. Worse, this pattern is getting perpetuated in category names etc. All cap names may be fine in Gedcom files, but this is not a big gedcom file. I know folks want to get to more exciting stuff, but let's devote a percentage of time to tidying up. Ok? -~ Phlox 04:51, 24 May 2009 (UTC)
- Here is a word macro to clean up all caps:
Sub NoGedcomNames() ' ' Nuke all Caps CHARLEMAGNE -> Charlemagne ' Selection.Find.ClearFormatting With Selection.Find .Text = "<[A-Z]{2,}>" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = True End With Selection.Find.Execute Selection.Range.Case = wdTitleWord End Sub
- -~ Phlox 08:52, 24 May 2009 (UTC)