如何将"=if (c2>0,"是","否")"写进电子表格单元格
本帖最后由 Gu_xl 于 2014-8-7 18:48 编辑本意是将=if (c2>0,"是","否")写入C3单元格,但结果c3单元格内只写入了=if (c2>0，不能将=if (c2>0,"是","否")完整地写入，请问有什么办法解决。 完整程序。 写成 "=if(c2>0,""是"",""否"")" 试试。 本帖最后由 lht 于 2014-7-31 11:49 编辑
三楼方法不行,回二楼,相关部分程序如下:
(setq ffn (getfiled "选择文件" "" "csv" 1 )
ff (open ffn "w")
)
(close ff)
……………
(setq ff (open ffn "a"))
(princ "=if (c2>0,"是","否")" ff)
(close ff)
目的是如果c2单元格的值大于0,c3单元格就显示"是",c2单元格的值小于0,就显示"否",因为电子表格要把"是"或"否"用引号括起来才能按字符串显示.
lht 发表于 2014-7-31 11:41 static/image/common/back.gif
三楼方法不行,回二楼,相关部分程序如下:
(setq ffn (getfiled "选择文件" "" "csv" 1 )
f ...
看看这样：
(defun c:tt ()
(setq ffn (getfiled "选择文件" "" "csv" 1)
ff(open ffn "w")
)
(princ 1 ff) ;数字可以直接写入文件
(princ "," ff)
(princ "2" ff);数字也可以当作字符写入文件
(princ "," ff)
(princ "\"=if(b2>0,\"\"是\"\",\"\"否\"\")\"" ff);写到文件中应该包括全部的引号，即声明是字符串
(close ff)
) ll_j 发表于 2014-7-31 12:40 static/image/common/back.gif
看看这样：
请大师解决个问题....001导入EXCEL会自动变成1....加'也没用...拜托给想点办法....谢谢了! edata 发表于 2014-7-31 10:44 static/image/common/back.gif
完整程序。
一块解决下呗.....001导入EXCEL会自动变成1....加'也没用...拜托给想点办法....谢谢了! q3_2006 发表于 2014-7-31 16:55 static/image/common/back.gif
一块解决下呗.....001导入EXCEL会自动变成1....加'也没用...拜托给想点办法....谢谢了!
试了一下，没什么有效办法，有几个思路可以参考：
1.使用excel的text函数，复杂，但得到的是字符串。
2.使用excel的单元格输出格式，这要对excel单元格进行设置，用Lisp就难了（我不懂就不说了）
当然，也可以就加一个“'”，这样输出的单元格在被（点击）激活后是正确的字符串，但激活之前不正确。
对这些我也不是很精通，只是善于现学现卖而已，希望有用。 ll_j 发表于 2014-7-31 17:21 static/image/common/back.gif
试了一下，没什么有效办法，有几个思路可以参考：
1.使用excel的text函数，复杂，但得到的是字符串。
2 ...
我目前的方法是导出TXT...用EXCEL打开...之外没有更好的方法....也百度不到... q3_2006 发表于 2014-7-31 16:53 static/image/common/back.gif
请大师解决个问题....001导入EXCEL会自动变成1....加'也没用...拜托给想点办法....谢谢了!
院长....如果这么简单能搞定...就不问了....
页:
[1]
2