Scarlett_fang 2021-08-12 21:23 采纳率: 100%
浏览 48
已结题

excel 宏,用sql读取csv文件内容,select出来的结果乱码

在excel的宏中,用sql语句去读取另一个csv文件的内容,但是读取出来的数据乱码:
vba代码为:
cnn.Open "Provider = Microsoft.ace.Oledb.12.0;Extended Properties =TEXT;Data Source =" & Mypath & ""
SQL = "select * from [" & Myfile & "] "
Set rst = cnn.Execute(SQL)

For a = 0 To rst.Fields.Count - 1
Cells(2, a + 1) = rst.Fields(a).Name
Next
Range("A3").CopyFromRecordset rst

rst.Close
cnn.Close
Set rst = Nothing
Set cnn = Nothing

读取的csv源文件数据如图片:

img

读取之后recordset复制到excel文件变成了图片中的乱码:

img
请问这个问题该怎么解决。

  • 写回答

1条回答 默认 最新

  • Zht_bs 2021-08-12 21:45
    关注

    改一下文件编码集

    img

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论

报告相同问题?

问题事件

  • 系统已结题 8月21日
  • 已采纳回答 8月13日
  • 创建了问题 8月12日

悬赏问题

  • ¥15 netty整合springboot之后自动重连失效
  • ¥20 wireshark抓不到vlan
  • ¥20 关于#stm32#的问题:需要指导自动酸碱滴定仪的原理图程序代码及仿真
  • ¥20 设计一款异域新娘的视频相亲软件需要哪些技术支持
  • ¥15 stata安慰剂检验作图但是真实值不出现在图上
  • ¥15 c程序不知道为什么得不到结果
  • ¥40 复杂的限制性的商函数处理
  • ¥15 程序不包含适用于入口点的静态Main方法
  • ¥15 素材场景中光线烘焙后灯光失效
  • ¥15 请教一下各位,为什么我这个没有实现模拟点击