Problem speichern...
04.12.2004 17:47:58
SteffenS
brauche!
Mein Code:
Dim wkb As Workbook
For Each wkb In Workbooks
If wkb.FullName <> ThisWorkbook.FullName Then
If InStr(1, wkb.FullName, ThisWorkbook.Path &
"\BLV") > 0 Then
If Not wkb.Saved Then wkb.Save
wkb.Close
End If
End If
Unter Excel 97 kommt bei:
InStr
ein Fehler.
Was muss ich tun damit dieser Code auch unter 97
geht?
Danke vielmals
Steffen Schmerler