向系统剪贴板写入文字能不能写入多行？

巴拉巴拉巴

;;;功能：向系统剪贴板写入文字                   ；我在论坛上找到的 这个很好，但是只能写入一行，我想写入多行粘贴到exl可以多行粘贴
(defun SET-CLIP-STRING (STR / HTML RESULT)
    (and (= (type STR) 'STR)
         (setq HTML (vlax-create-object "htmlfile"))
         (setq RESULT (vlax-invoke
                          (vlax-get (vlax-get HTML 'PARENTWINDOW)
                                    'CLIPBOARDDATA
                          )
                          'SETDATA
                          "Text"
                          STR
                      )
         )
         (vlax-release-object HTML)
    )
)

巴拉巴拉巴

小白向各位大佬请教一下。

来武影

字符串里加  “\n”

jun353835273

2. (setq text1 "1")
   
3. (setq text2 "-你好")
   
4. (SET-CLIP-STRING (STRCAT   text1 "\t" text2 "\r\n"))

(setq text1 "1")<br /> (setq text2 "-你好")<br /> (SET-CLIP-STRING (STRCAT   text1 "\t" text2 "\r\n"))

加换行符

巴拉巴拉巴

jun353835273 发表于 2023-9-15 16:25
加换行符

感谢 原来还有/t

664571221

你好最后可以用的代码可以来一个吗