CAD Fórum : Chyba pri VBA

Chyba pri VBA : To, že dokument nie je aktívny,...

Mon, 02 Mar 2015 17:28:28 +0000

Autor: mimo0912
P�edm�t: 20776
Zasl�no: 02.b�e.2015 v 17:28

To, �e dokument nie je akt�vny, to by som v�lu�il. V Inventori je jedin� otvoren� dokument, ktor� otv�ram pr�kazom oInventorApp.Documents.Open ("D:\Skuska.ipt").

Ale trochu som sk��al a

Dim oPartDocument As PartDocument

som nahradil

Dim oPartDocument As Inventor.Document

a za�alo to beha�.

S VBA len za��nam a neviem �i tieto dve r�zne deklar�cie premenn�ch m��no zameni�.

Chyba pri VBA : Příčin může být víc, ale tahle...

Fri, 27 Feb 2015 00:44:38 +0000

Autor: Navara
P�edm�t: 20776
Zasl�no: 27.�no.2015 v 00:44

P��in m��e b�t v�c, ale tahle �prava by to mohlo spravit. Nejsp� jde o to, �e ten otev�ran� dokument nemus� b�t sou�asn� ten aktivn�.

Dim oInventorApp As Inventor.Application
Set oInventorApp = GetObject(, "Inventor.Application")
 
Dim oPartDocument As PartDocument
Set oPartDocument = oInventorApp.Documents.Open("C:\Temp\Part.ipt")
    
Dim oParameters As Inventor.Parameters
Set oParameters = oPartDocument.ComponentDefinition.Parameters

Chyba pri VBA : Pozdravujem,potreboval by som...

Thu, 26 Feb 2015 21:39:38 +0000

Autor: mimo0912
P�edm�t: 20776
Zasl�no: 26.�no.2015 v 21:39

Pozdravujem,

potreboval by som pom�c� s k�dom VBA:
       .
       .
       .
        Dim oInventorApp As Inventor.Application
        Set oInventorApp = GetObject(, "Inventor.Application")

        oInventorApp.Documents.Open ("D:\Skuska.ipt")

        Dim oPartDocument As PartDocument
        Set oPartDocument = oInventorApp.ActiveDocument na tomto riadku hl�si chybu

        Dim oParameters As Inventor.Parameters
        Set oParameters = oPartDocument.ComponentDefinition.Parameters
        .
        .
        .

Chybov� hl�senie
Run-time error '13': Type mismatch

Neviem �i to m� vplyv, ale k�d bol vytvoren� v Exceli a zapisuje parametre do Inv2014.
Spustil som ho s Inv2015 a nasko�ila t�to hl�ka. Migroval som s�bor do Inv2015 a k�d fungoval.
No po zatvoren� Inventora a n�slednom spusten� je tu op� t�to hl�ka a neviem kde je chyba.
�akujem za ka�d� radu.