Discussion :

[henripec]

Bonjour,

J'essaie de recupérer les valeur contenues dans plusieurs cellules d'un classeur excel.

J'y arrive très bien quand les cellules proviennent toutes de la même feuille avec la methode Union.

Par exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
With xlBook.Worksheets("Project")
       Set RangeToImport = xlApp.Union(.Range("A16:G16"), .Range("K16"))
End With

Mais la méthode Union échoue dès que je tente d'ajouter une cellule d'une autre feuille

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
With xlBook.Worksheets("Project")
       Set RangeToImport = xlApp.Union(.Range("A16:G16"), .Range("K16"), xlBook.Worksheets("ProjectDescription").Range("B4") )
End With

Pour l'instant j'affecte la valeur situé dans la feuille tierce à une cellule de la feuille principale. Une fois toutes mes valeurs sur la même feuille je peux faire mon Union.

Y a t-il une méthode moins lourdingue voire plus élégante que de faire un copier coller des valeurs à rassembler dans la même feuille?

Merci!

[Fvandermeulen]

Salut,
Finalement quel est le but de ta plage RangeToImport ?
Est-ce que les plages sont variables?
Si c'est pour rapatrier la valeur contenue dans ces cellules tu peux peut-être te passer de la méthode Union.
A+

[henripec]

Effectivement mon but est bien de récupérer les valeurs contenues dans ces cellules.

La fonction qui traite cette RangeToImport remplie un tableau unidimensionnel avec la valeur des cellules (que j'affecte ensuite à un Recordset).

Les plages sont variables. J'utilise la méthode offset (donc les cellules gardent le même "pattern")

Comment puis-je me passer de la méthode Union?

Merci!

[Fvandermeulen]

J'avais un tête l'utilisation de Tablo, mais pas eu le temps de te préparer un exemple
Tu peux toujours aller voir du côté des FAQ et Tutos de ce site, à mon avis ça va le faire.
A+

Edit: Ce serait peut-être bien d'avoir l'ensemble de ton code.