关于excel vba 使用CopyFromRecordset出现格式问题的解决方法
出现问题的写法:
With ActiveSheet
.Name = k(i)
For num = 1 To UBound(myArray)
.Cells(1, num) = myArray(num, 1)
Next num
.range("A2").CopyFromRecordset conn.Execute(Sql)
End With
修改为:
With ActiveSheet
.Name = k(i)
For num = 1 To UBound(myArray)
.Cells(1, num) = myArray(num, 1)
Next num
.[A2].CopyFromRecordset conn.Execute(Sql)
End With
问题解决。不知道什么原因,有可能函数本身的bug

本文介绍了一个在Excel VBA中使用CopyFromRecordset方法时遇到的格式问题及其解决办法。通过调整函数调用的方式,从使用范围的方法改为直接指定单元格,成功解决了格式不匹配的问题。
8403

被折叠的 条评论
为什么被折叠?



