Bonjour,

j'essaie de copier des données d'un fichier excel vers un tableau vb.net.

La solution qui marche mais qui rame est une boucle for :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
                    For p = 1 To 4097
                        Tf(p) = ExcelclaAISS.Sheets("Tableaux").Cells.Item(15, p).Value
                        Tt(p) = ExcelclaAISS.Sheets("Tableaux").Cells.Item(22, p).Value
                        Tl(p) = ExcelclaAISS.Sheets("Tableaux").Cells.item(19, p).Value
                        Tv(p) = ExcelclaAISS.Sheets("Tableaux").Cells.item(16, p).Value
                    Next
Je souhaiterais trouver un moyen plus rapide et plus élégant de faire ca.

J'ai déjà effectué l'opération inverse (copier un tableau vb.net dans excel) de la façon suivante :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
ExcelFeuillea1.Range("O2:U4097") = C1
Malheuresment pour moi l'inverse ne fonctionne pas (ie
Code : Sélectionner tout - Visualiser dans une fenêtre à part
C1 = (ExcelFeuillea1.Range("O2:U4097")
)

Avez vous une idée ?

Merci d'avance,