回复:Powerpoint:触发粘贴剪贴板你好@hogi ,
我最喜欢的方法(在我的 Mac 上)是使用 RunProgram() 来运行一些 AppleScript。 这是我的过程,如果你正在适应 Windows,我希望它会有所帮助。
在 JMP 方面,我们将使用 RunProgram() 来执行我们将制作的 bash 脚本:
Run Program( Executable( "~/Desktop/pastePowerpoint" ) );
要制作 bash 脚本,我们打开一个纯文本文件并将 bash 写入 AppleScript 调用,然后写入 AppleScript。 这是该纯文本文件的全部内容:
#!/bin/bash
osascript <<END tell="" application=""></END>
一旦我们保存它(没有扩展名),我们需要让它可执行。 在终端中,我们可以运行以下命令(仍然假设它在您的桌面上):
chmod 755 ~/Desktop/pastePowerpoint
就是这样!希望这可以帮助!
@朱利安
回复:Powerpoint:触发粘贴剪贴板谢谢@朱利安.
对于 Windows,ChatGPT 建议使用 PowerShell 脚本:
(假设JSL脚本和ps1代码保存在同一个文件夹)
Try(Current Report()<< Copy Picture();
If( Host is( "Windows" ),
PowerShellScriptName= Convert File Path( "", windows ) ||"PastePicture.ps1";
runOptions = "-File \!""|| PowerShellScriptName||"\!"";
MyResult = Run Program(
Executable( "PowerShell.exe" ),
Options( {runOptions} ),
ReadFunction( Function( {this}, Write( this << read ) ) )
)
));粘贴图片.ps1:
$ppt = New-Object -ComObject PowerPoint.Application
$ActivePPT = $ppt.ActiveWindow
if ($ActivePPT -eq $null) {
return "no active ppt"
} else {
$slide=$activeppt.Presentation.Slides($ppt.ActiveWindow.Selection.SlideRange.SlideNumber)
$shape = $slide.Shapes.Paste()
return 0
}
Powerpoint:触发粘贴剪贴板将图形复制到剪贴板后,Jmp 是否有可能在 Powerpoint 中触发“粘贴剪贴板”。
高级统计建模内容组织实验设计大规模定制分享和交流结果回复:Powerpoint:触发粘贴剪贴板我将 Windows 版本(通过 PowerShell)添加到 GraphBuilder 工具栏:
图形生成器工具栏
