2016-02-08 73 views
-2

我想通過Visual Basic UI運行photoshop動作。我的意思是如果用戶點擊按鈕,然後Photoshop應該運行。Photoshop自動化

有人可以提供任何暗示嗎? 謝謝

Public Class Form1 
    Dim appRef 
    Dim app 
    Dim File 
    Dim JavaScriptFile 
    Dim nums(2) 
    Dim argsArr() 
    Dim photoshopApp As Photoshop.Application 
    Dim photoshopDoc As Photoshop.Document 
    Dim curLayer As Photoshop.ArtLayer 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
     appRef = CreateObject("Photoshop.Application") 
     app.load(File("C:\Border-2.atn")) 
     app.DoAction(ThisQueue.Dequeue) 
    End Sub 

+0

「但也有一些是錯誤的」? –

+0

@ roryap是的,先生這個代碼不working..please幫助 –

+0

我的觀點是,「某些事情是錯誤的」是什麼意思?它怎麼不起作用? –

回答

1

你必須首先裝載在Photoshop的動作或Actionsets!您已經嘗試過無法加載或調用操作。 「App.load(文件(...」 是指加載圖像。

Private Sub PhotoshopDoAction(ByVal action As String, ByVal actionSet As String) 
 
     Dim PS As Photoshop.Application 
 

 
     PS = New Photoshop.Application 
 
     If PS.Application.Documents.Count > 0 Then 
 
      PS.DoAction(action, actionSet) 
 

 
     End If 
 

 
    End Sub

+0

如果在操作托盤中預加載了操作,此代碼工作正常。但我想通過代碼加載動作文件,然後執行操作 –

+0

不幸的是,沒有方法通過代碼「加載」動作。這不是由Adobe提供的,它將成爲錯誤的一個很好的來源(例如,在第二個腳本執行時,在同一組中將有兩個具有相同名稱的操作)。不過,你可以用ScriptListener來做到這一點; https://www.kirupa.com/motiongraphics/scripting5.html – Goldmoon