Tasks finden leicht gemacht

Mit Word-VBA ist das Auffinden von Tasks sehr einfach:



Und hier weniger schön zum rauskopieren:
Sub ZeigeExcel() Dim tskJeder As Task For Each tskJeder In Tasks If InStr(LCase(tskJeder), "excel") Then tskJeder.Visible = True End If NextEnd Sub