-1

Excel のアドインの例があります。オブジェクト InDesign を次のように呼び出します。

 Private Sub btnStart_Click()
    Dim pCnt As Integer
    Dim myInDesign As InDesign.Application
    Dim myDoc As InDesign.Document
    Dim myPage As InDesign.Page

    ActiveWorkbook.Colors(17) = RGB(255, 204, 255)
    Set myInDesign = CreateObject("InDesign.Application")
    Set myDoc = myInDesign.ActiveDocument

    Set myInDesign = Nothing
    Set myDoc = Nothing

    Unload Me
End Sub

ショーError 13: Type mismatchで Set myInDesign = CreateObject("InDesign.Application")

なんで？どのように修正しますか？皆さんありがとう。

4

1 に答える 1

1

http://forums.adobe.com/thread/834780で答えを見つけます

ファイル C:\ProgramData\Adobe\InDesign\Version 6.0\en_US\Scripting Support\6.0\Resources for Visual Basic.tlb を削除し、admin 権限で Excel と indesign を実行します。

于 2013-04-23T08:55:51.447 に答える