Diskuzní fórum, poradna
CAD diskuze, rady, výměna zkušeností |
Veřejné diskuzní fórum k CAD aplikacím - ptejte se na libovolné otázky týkající se oboru CAx, podělte se o vaše znalosti a zkušenosti s programy AutoCAD, Inventor, Revit, Fusion 360, 3ds Max a s dalšími CAD aplikacemi.
Zaregistrujte se nebo se přihlašte a zašlete váš příspěvek do odpovídajícího fóra. Viz další informace o CAD Fóru. Nechcete se registrovat? Zeptejte se v naší Facebook poradně.
Fórum nenahrazuje technický support firmy Arkance Systems (CAD Studio) - přímá podpora pro zákazníky funguje na helpdesk.cadstudio.cz
Chyba pri VBA |
Odpovědět | archiv |
Autor | |
mimo0912
Zasloužilý člen Přihlášen: 24.říj.2008 Lokalita: Slovensko Používám: AutoCAD2011, Inventor2017, SolidEdge Stav: Offline Bodů: 122 |
Téma: Chyba pri VBA 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. |
|
Navara
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Arkance Systems support Arkance Systems Přihlášen: 08.zář.2008 Lokalita: ČR (Pha) Používám: Inventor Stav: Offline Bodů: 1636 |
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í.
|
|
mimo0912
Zasloužilý člen Přihlášen: 24.říj.2008 Lokalita: Slovensko Používám: AutoCAD2011, Inventor2017, SolidEdge Stav: Offline Bodů: 122 |
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.
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ť.
|
|
Pro technickou podporu CAD
kontaktujte Helpdesk
Odpovědět | |
Přejít na fórum | Oprávnění fóra Nemůžete vytvářet nová témata v tomto fóru Nemůžete odpovídat na témata v tomto fóru Nemůžete vymazávat vaše příspěvky v tomto fóru Nemůžete upravovat vaše příspěvky v tomto fóru Nemůžete vytvářet ankety v tomto fóru Nemůžete hlasovat v anketách v tomto fóru |
Stránka byla vygenerována za 0,807 sekund.