小编Sat*_*in2的帖子

Applescript将应用程序放在特定桌面上

我有一个在Automator中创建的AppleScript,它打开了许多应用程序和文件夹,我将其用作创建相册的工作流程的一部分.我的流程的工作方式是桌面1中的Photoshop Elements,桌面2上的四个Finder窗口,桌面3上的iPhoto和桌面4上的Booksmart.

正如我所知,我的AppleScript打开了每一个,唯一的问题是它打开了我当时在桌面上的所有内容.然后我必须进入任务控制并在我的窗户周围移动,将每个应用程序放到我希望它上面的桌面上.只需在必要的桌面上逐个打开应用程序即可.

我已经尝试将桌面分配给应用程序,但这似乎并不一致.

我可以使用任何可以在特定桌面上打开应用程序的AppleScript吗?

我正在运行OS X 10.8.2.

非常感谢

desktop applescript osx-mountain-lion

6
推荐指数
1
解决办法
2257
查看次数

在重新激活工作簿时执行操作

我有一个工作簿,其中有按钮可以通过VBA打开其他工作簿.

我的理解是这个初始工作簿(我们称之为Hub工作簿),当我进入它时,它是ThisWorkbook和ActiveWorkbook.

通过其中一个按钮打开另一个工作簿后,新打开的工作簿将变为ActiveWorkbook.

当我再次点击Hub时,它再次成为ActiveWorkbook.

只有当Hub重新获得作为活动工作簿的状态时,我才会执行操作.

我已经尝试通过在工作表上执行操作来执行此操作,但如果它是唯一的工作表并且我只是从另一个工作簿中单击它,则不会执行此操作.例如,如果我有两个工作表,请单击返回此工作表.

Private Sub Worksheet_Activate()
 MsgBox "Worksheet Reactivated"
End Sub
Run Code Online (Sandbox Code Playgroud)

我似乎无法按照我的要求让它工作,但我确信必须有一些方法来做到这一点.

任何帮助,将不胜感激.

谢谢

excel vba excel-vba excel-2013

3
推荐指数
1
解决办法
90
查看次数

粘贴的形状不被视为“最新”形状

我正在从 Excel 电子表格自动生成 PowerPoint 报告。在我粘贴表格之前,我已经完成了这个过程。

我正在使用PPApp.CommandBars.ExecuteMso ("PasteSourceFormatting")该表格将表格粘贴到 PowerPoint ,表格在我的幻灯片上显示为一个形状(第三个形状)。

要引用我使用的新形状,Set pShape = Slide2.Shapes(Slide2.Shapes.Count)但现在当我粘贴时,pShape分配了“形状 2”(而不是“形状 3”)。在粘贴和分配对象之间有什么需要做的吗?

下面的代码,评论了问题发生的地方。(已删除完整代码;可在此处查看)

'Copy tables from Excel
Set rng = ws.Range("A:A")
rng.ColumnWidth = 22.75
Set rng = ws.Range("A4:C27")

'Copy the table range
Application.CutCopyMode = False
rng.Copy
Application.Wait (Now + TimeValue("0:00:02"))

'The issue occurs here!!! '-------------------------------------
'Paste the table in to the slide
Slide2.Select
PPApp.CommandBars.ExecuteMso ("PasteSourceFormatting")

'Name the new shape object
Set pShape = Slide2.Shapes(Slide2.Shapes.Count)
pShape.Name = "Slide_2_Table_1"
pShape.LockAspectRatio = …
Run Code Online (Sandbox Code Playgroud)

excel powerpoint vba shapes

2
推荐指数
1
解决办法
1116
查看次数