XL 2013 sélection plage de cellule en fonction de valeur

[erics83]

Bonjour,

Je tourne, je cherche et...je n'y suis pas arrivé (du moins pour une plage de cellule)

J'ai un classeur, 2 feuilles.
Feuil1, des données. En feuil2, en A1, je définis la plage (et donc les valeurs) que j'aimerai récupérer le la feuil1 (je le positionne en B5). je ne veux pas faire de plage nommée, il faut que je puisse définir la plage de la feuil1. Mon code fonctionne avec 1 cellule, mais pas avec une plage... :

Sub eric()
a = Feuil2.Range("A1")
Feuil2.Range("B5") = Feuil1.Range(a) 'test OK
End Sub

j'ai essayé de mettre A3:A7, mais cela ne fonctionne pas...(j'ai essayé de mettre le résultat en B5 et en adaptant la plage (B5:B9), mais ça ne fonctionne pas.....ça doit être tout simple, mais je bloque....

Merci pour votre aide,
Eric

 

[job75]

Bonjour erics83,

Sub eric()
a = Feuil2.Range("A1")
Feuil1.Range(a).Copy Feuil2.Range("B5")
End Sub

A+

 

[job75]

Si l'on veut copier uniquement les valeurs :

Sub eric()
a = Feuil2.Range("A1")
With Feuil1.Range(a)
    Feuil2.Range("B5").Resize(.Rows.Count, .Columns.Count) = .Value
End With
End Sub

 

[erics83]

Bonjour Job75,

Une fois de plus MERCI !
j'y étais presque.....lol....

Merci pour votre aide,
Eric,