SaveToFile csvFile, adSaveCreateOverWriteが動作しません

「動作しなくなりました」とは具体的にどのような結果になるのですか？

何も保存されず何も起こらないのか、何かのエラーが起きるのか、それ以外なのか、具体的に示しましょう。またお使いの Excel の正確な製品名やバージョンも示しましょう。