版主
精华
|
战斗力 鹅
|
回帖 0
注册时间 2002-8-16
|
建立了一个新模块,在里面写了个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 |
|