vb中用记录集打开excel，第一次运行时会报错，提示：系统不支持所选择的排序

现在有个奇怪的问题，为什么我每次打开程序，第一次运行时会报错： 

实时错误:'2147467259   (80004005)'   系统不支持所选择的排序  实时错误:'21