Hej!

Sitter och bygger om ett VB6 program som sammarbetar med office Word så att det ska fungera med 2007:an. Jag har använt nedanstående kod för att fritextsöka i dokument av typen *.doc (97-2003). Denna verkar nu vara bortplockad i office 2007 och jag får error "5111 Detta kommando är inte tillgängligt på denna plattform". Nån som vet vad nedanstående FileSearch har ersatts med eller har nån bra länk till något fungerande exempel eller dokumentation?

Set appWD = GetObject(, "Word.Application")

With appWD.FileSearch
.NewSearch
.LookIn = gstrPublicDocPath
.SearchSubFolders = False
.MatchTextExactly = False
.TextOrProperty = "Min sökta fras"
.FileType = msoFileTypeAllFiles
If .Execute > 0 Then
'lista alla filer som innehåller ordet/frasen
End If

End With

Tack på förhand
Micke