找回密码
 立即注册
搜索
查看: 1273|回复: 4

[软件] 懂Excel里面VBA的请入一下

[复制链接]
     
发表于 2012-11-24 22:05 | 显示全部楼层 |阅读模式
建立了一个新模块,在里面写了个Function测试
在sheet1的C2单元格写下了=XMLconv(A1,A2,B1,B2)

然后结果出来后发现,显示结果无法看到表格中文本的回车(已经测试了单元格A2中的回车是chr(10),也是过vbcrlf和chr(13)了)
这个也就算了,我复制C2单元格,然后粘贴到记事本,也算有回车了,但是居然看到的是头上和结尾各带一个引号
"文本
文本内容1
文本内容2
文本内容3
XML格式
XML 1.0"


如上,折腾了老半天,尝试直接个单元格赋值,比如
sheets("sheet1").cells(2,3)="aaaa"
sheets("sheet1").cells(2,3).value="aaaa"
ThisWorkbook.sheets("sheet1").cells(2,3).value="aaaa"
等等,都错误,也不知道怎么赋值………
复制单元格,然后粘贴到一个格式为“文本”的格子,并且仅粘贴数据,看到没有引号,但是再复制到记事本,情况依然


附件如下,记得设置安全性为用户可以自定义是否运行宏,excel2003
http://www.ugschina.com/forum/up ... n@0407109566114.rar
回复

使用道具 举报

头像被屏蔽
     
发表于 2012-11-24 22:30 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
回复

使用道具 举报

     
 楼主| 发表于 2012-11-24 22:53 | 显示全部楼层
哦,谢谢,原来这样啊
现在就是那个引号不知道怎么解决
回复

使用道具 举报

头像被屏蔽
     
发表于 2012-11-24 23:18 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
回复

使用道具 举报

     
 楼主| 发表于 2012-11-25 11:43 | 显示全部楼层
恩谢谢,原来是excel自己
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|上海互联网违法和不良信息举报中心|网上有害信息举报专区|962110 反电信诈骗|举报电话 021-62035905|Stage1st ( 沪ICP备13020230号-1|沪公网安备 31010702007642号 )

GMT+8, 2024-5-21 19:24 , Processed in 0.030600 second(s), 6 queries , Gzip On, Redis On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表