Afficher les données d'un classeur Excel dans une Lisbox ou Combobox sur Vb CATIA

Bonjour à tous

Es que quelqu'un saurait si il est possible prendre des données ( textes ) rangé dans un classeur Excel et les affichers sur une combobox ou listbox dans VBA CATIA ?

J'ai essayé le code suivant :

Code:


Private Sub UserForm_Initialize()

Set objexcel = CreateObject("Excel.Application"): objexcel.Visible = True

Set objworkbook = objexcel.Workbooks.Open("C:\Users\Desktop\VISSERIE\VIS.xlsx")
Set objsheet1 = objworkbook.Sheets.Item(1)

Dim i As Integer
Dim MyArray(460, 0)
    
        For i = 2 To 459
        
        MyArray(i, 0) = objsheet1.range("W" & i)
        
        Next i
    
    
    ListBox1.List() = MyArray

End Sub



malheureusement il ne fonctionne pas

Quelqu'un saurait comment faire ?

merci d'avance pour votre aide

Bonjour Emile,

Ton code fonctionne très bien chez moi!
As tu un message d'erreur? Qu'est ce qui ne marche pas?

Bonjour,

Finalement c'est bon ça fonctionne. désolé du dérangement.