VBA: Problème VBA avec Range !!!!

Résolu/Fermé
sebohl - 10 mars 2018 à 16:01
 sebohl - 10 mars 2018 à 19:25
Bonjour,

Mon problème l'air très simple comme cela mais je sèche depuis un bon moment. Voilà, je souhaite copier une plage de données d'un classeur (Range E81:V81) dans l'onglet compound de mon classeur en F4:W4.
Pour cela j'ai le code ci dessous qui marche très bien

ThisWorkbook.Sheets("Compound").Range("F4:W4") = Workbooks(nomfichier).Sheets("25°C 80%rH").Range("E81:V81").Value


Par contre, en voulant ajouter une nouvelle plage de données dans mon onglet compound, je souhaite qu'elle soit mise en F6:W6.

Il me faudrait un truc du genre Range(F(4+i):W(4+i)) or je n'arrive pas à trouver cela. J'ai vu Range("F4:W" & i) mais cela ne joue que sur la cellule de fin.

Moi j'ai besoin d’incrémenter la première ligne et la dernière.

J'ai aussi essayé qqch de ce type:
ThisWorkbook.Sheets("Compound").Range(cells((4+i),6),cells(4+i),23) = Workbooks(nomfichier).Sheets("25°C 80%rH").Range("E33:V33").Value

En spécifiant min "i" mais ça ne marche pas !!! :-(

J'espère avoir été clair car je ne suis pas un expert car je débute en VBA

Cdlt

Sébastien

1 réponse

jordane45 Messages postés 38138 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 17 avril 2024 4 649
10 mars 2018 à 16:43
Bonjour,
Range("F" & i & ":W" & i)


1
Merci beaucoup, ca marche !!!

Cdlt

Sebastien
0