Wenn der Agent auf dem Server läuft mit "Print" Sachen und Dinge ausgeben.
Trifft das
If ( scquelle.Type = RICHTEXT ) Then
für den Server zu?
Bricht der Agent ab?
OnError ist hilfreich.
Ist "doc" deklariert?
Ist überhaupt etwas deklariert?
Dim scquelle As Variant
Dim scziel As Variant
ist zu 100% falsch- läuft vielleicht, ist aber nicht richtig.
Warum deklarierst Du das nicht als das, wofür Du es verwendest?
Mein Gefühl sagt mir, Du hattest einfach nur Glück, dass es bis heute funktioniert hat....
Ist nicht böse gemeint...!
Matthias