VorprefixFootnote ()
Schwaches F-N als Fußnote
Schwaches strPrefix als Schnur
strPrefix = „betrachten bitte“
Für jedes F-N in ActiveDocument.Footnotes
Wenn es verlassen (F-N. Range.Text, Len (strPrefix)) <> strPrefix dann
F-N. Range.Text = strPrefix u. F-N. Range.Text
Beenden wenn
Zunächst
Enden-Unterseeboot
|