Comment ouvrir un fichier Excell en utilisant une macro depuis Solidworks?

Macro
,
1

Bonjour,

j'utilise une macro sur Solidworks qui m'a créé un fichier Excell pour m'y inscrire la nomenclature. 

Alors que ce fichier est toujours ouvert, j'aimerai ouvrir un autre fichier excell présent sur mon disque. Pour ce faire j'ai utilisé les instructions suivantes:

Dim xlApp As Excel.Application
Set xlApp = New Excel.Application
Dim wbk As Excel.Workbook
Dim sht As Excel.Worksheet

Dim Fichier_section_source  As String

 Fichier_section_source = "\\vx-c-0004h\D$\DIVERS\a jeter\Liste_profilé_concatener.xls"
    
  Dim oXL As Excel.Application
Dim oWB As Workbook

'Start excel and get application
Set oXL = CreateObject("Excel.application")
oXL.Visible = True

'Ouverture du classeur
Set oWB = oXL.Workbooks.Open(Fichier_section_source)

 

j'obtiens un message d'erreur sur excell disant qu'il est impossible d'ouvrir ce fichier... et sur Solidworks, j'ai une erreur 1004 (nom fichier ou accès qui n'existe pas / fichier utilisé par un autre programme ).

auriez vous une idée ?

2ème question : quelles sont les extensions excell que je peux ouvrir depuis solidworks ? xlsx, xlsm ?

 

merci de votre aide

2

j'ai avancé d'un pas et parviens à ouvrir le fichier en utilisant le code suivant :

Dim xlSheet As Object
Dim xlBooks As Object

Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = True
xlApp.Workbooks.Open Fichier_section_source
Set xlSheet = xlApp.ActiveSheet

Sheets("Liste materiel").Select    'et là j'ai un runtime error 9  (cet onglet existe bien)
 

Avez vous une idée ? merci à vous