Hallo
Opent uw bestand goed in SW?
Een voorbeeld van het gebruik van GetDesignTable in VBA: http://help.solidworks.com/2013/English/api/sldworksapi/Get_Design_Table_Example_VB.htm
Probeer ook de regel toe te voegen
Bestand.GetFileCopy (0)
net na de lijn
Vault.GetFileFromPath("Le_nom_de_ton_fichier_avec_le_chemin", map)
Vriendelijke groeten
Ik heb zojuist de regel ingevoegd die u mij hebt gewezen en de fout staat op deze regel, dezelfde fout.
Ja, mijn bestand opent goed in SW en mijn macro werkt wonderwel, zolang ik van tevoren op mijn bestand heb geklikt om "De nieuwste versie op te halen".
Dit bevestigt dat dit inderdaad de reden is voor de bug.
Edit: wat betreft het gebruik van GetDesignTable gebruik ik het zoals aangegeven.
Ik zie het niet. Ter informatie: ik heb geen bedieningsfout met de volgende macro:
Dim swApp als object
Deel dimmen als object
Dim boolstatus als Booleaanse
Dim longstatus As Long, longwarnings As Long
Sub hoofd()
Stel swApp = Toepassing.SldWorks in
Dim Vault als nieuwe EdmVault5
Bestand dimmen als IEdmFile5
Map dimmen als IEdmFolder5
Vault.LoginAuto "Coffre_BE", 0
Bestand instellen = Vault.GetFileFromPath("C:\Coffre_BE\TEST\0088880001.SLDPRT", map)
Set Part = swApp.OpenDoc6(Folder.LocalPath & "/" & File.Name, 1, 2, "", longstatus, longwarnings)
swApp.ActivateDoc2 File.Name, False, longstatus
Stel swModel = swApp.ActiveDoc in
swModel.ViewZoomtofit2
Einde Sub
Het enige bericht dat ik krijg is dat de Epdm me vraagt of ik het bestand wil uitpakken wanneer het is geladen, een normaal bericht omdat dat niet het geval is. Ter info: ik heb de GetFileCopy-regel niet nodig.
Ik ben op de 2015 versie.
Vriendelijke groeten