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
Posts mit dem Label Word VBA werden angezeigt. Alle Posts anzeigen
Posts mit dem Label Word VBA werden angezeigt. Alle Posts anzeigen
2.26.2008
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
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
Abonnieren
Posts (Atom)
