导出csv身份证号科学计数了,怎么解决

zhao19831124 2011-03-11 03:34:55
导出csv身份证号科学计数了,怎么解决
...全文
1152 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
  • 打赏
  • 举报
回复
03加引号,

Private Sub CommandButton1_Click()
With Sheets("sheet1")
ar = .[a1].CurrentRegion
For i = 1 To UBound(ar)
ar(i, 1) = Trim(ar(i, 1)) 'A例数据
Next
.[a1].Resize(UBound(ar)) = ar
End With
End Sub

使A例变为文本格式
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 shandengx 的回复:]
数据写入到CSV时前面加上 '
[/Quote]

正解

一般导出csv是给excel 03打开的话
加上引号就解决了
cc_net 2011-03-11
  • 打赏
  • 举报
回复
需求不清楚。。。你是要从数据库导出还是神马
fengboyangjinfeng 2011-03-11
  • 打赏
  • 举报
回复
以字符串的形式 写到文件里
shandengx 2011-03-11
  • 打赏
  • 举报
回复
数据写入到CSV时前面加上 '
周公 2011-03-11
  • 打赏
  • 举报
回复
csv其实就是一个以","标记的txt文件,你可以用读文本文件的方式读取,也可以用OleDB的方式读取。
但是如果里面的数据本身就是科学计数形式的,那就没办法了。

5,174

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 Office开发/ VBA
社区管理员
  • Office开发/ VBA社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧