Copier coller sélection variable

[julien 07]

Bonjour le forum,

je cherche à faire un copier coller d'une plage de cellule variable.

La première cellule de la sélection est fixe, il s'agit de de la cellule A83 de ma feuille "resultat".

Par contre la dernière est variable, il s'agit de la cellule H (nombre variable).

Le nombre variable est la valeur de la cellule "B81".

Ma question est donc double, comment définir la cellule B81 comme variable pour ensuite sélectionner la plage A83:H(nombre variable) et ensuite la coller sur une autre feuille ?

Voilà, je vous remercie par avance de vos explications.

Julien

 

[Caillou]

Re : Copier coller sélection variable

Bonjour,

en vba je suppose
Range("A83:H" & Range("B81").Value).Copy

JP

 

[Pierrot93]

Re : Copier coller sélection variable

Bonjour Julien, Caillou

une autre solution :

With Sheets("resultat")
    .Range("A83:H" & .Range("B81").Value).Copy _
        Destination:=Sheets("feuilledestination").Range("A1")
End With

bonne journée
@+

 

[mercant76]

Re : Copier coller sélection variable

bonjour,

un truc tout simple :


Sub essai()

Dim fin As Long

fin = Cells(81, 2).Value
Range("A83:H" & fin).Select
Selection.Copy
Sheets("Feuil2").Select
Range("D2").Select
ActiveSheet.Paste
End Sub


feuil2 = feuille de réception
D2 = endroit où tu veux copier

@+

 

[julien 07]

Re : Copier coller sélection variable

Merci beaucoup, cela fonctionne très bien.

Julien