在功能中使用剪贴板

Question

如何在函数中使用剪贴板的内容？

当我使用Paste[]时，它会将其复制到活动笔记本的当前单元格中。另一方面，我可以使用CopyToClipboard[expr]轻松地将表达式放到剪贴板中。

Answer 1

您可以尝试使用ClipboardNotebook[]

In[1]:= CopyToClipboard[expression]

In[2]:= an[ToExpression[NotebookGet[ClipboardNotebook[]][[1, 1, 1]]]]

Out[2]= an[expression]

虽然你应该比我在上面的代码中更加小心。请参阅示例Szabolcs' Mathematica tricks。