savechanges funktioniert nicht - warum?
31.07.2002 18:52:23
fred74
If UCase(w.Name) <> Datei_PM And UCase(w.Name) <> "TKV.XLS" Then
' in Gruppen(8,i,5) stehen einfach nur Namen drin wie Müller, Meier, Schulze
w.Close savechanges:=True, FileName:="C:\sd\" + Gruppen(8, i, 5) + ".xls"
End If
Next w
Wenn ich diese Schleife durchlaufe, kommt immer folgende Fehlermeldung:
Laufzeitfehler 424
Objekt erforderlich.
Was mache ich falsch???
Anzeige