Re: וויאזוי גיט מען זיך א עצה אין מייקראסאפט ווארד
כמובן אז עס איז נישט דא קיין עכטע סימפעל וועג, ווען יא וואלסטו נישט דא געפרעגט...
מיט א מעקראו קען מען עס טון:
קאוד: וועל אויס אלע
Sub DeleteEmptyFootnotes()
Dim fn As footnote
For i = ActiveDocument.Footnotes.Count To 1 Step -1
Set fn = ActiveDocument.Footnotes(i)
If Trim(fn.Range.Text) = "" Then
fn.Delete
End If
Next i
MsgBox "Empty footnotes have been deleted.", vbInformation
End Sub
ביטע מיר נישט קאנטעקטן אויף סיי וואספארא וועג. אן אויסנאם איז טעקניקעל אירע וואס העלפן אנדערע און דארף הילף דערמיט
