Fix multiple locale et al in GB/T 7714 bibliography generated by Zotero(csl) for MS-Word

Kyle
2018-12-28T16:51:14Z

fix_csl_gbt7714.vb

| Sub deng2etal()
| '
| ' deng2etal macro
| ' English等 -> english, et al
| '
| With Selection.Find
| .Forward = True
| .ClearFormatting
| .Text = "(<[A-z]@)等"
| With .Replacement
| .ClearFormatting
| .Text = "\1, et al"
| End With
| .Wrap = wdFindStop
| .Execute Replace:=wdReplaceAll, MatchWildcards:=True
| End With
| End Sub