Menu

VBA Copier en plage variable [Résolu]

Messages postés
146
Date d'inscription
lundi 15 octobre 2018
Statut
Membre
Dernière intervention
11 mai 2019
- - Dernière réponse : Anthelm
Messages postés
146
Date d'inscription
lundi 15 octobre 2018
Statut
Membre
Dernière intervention
11 mai 2019
- 23 nov. 2018 à 23:19
Bonjour,

J'ai une macro qui me permet de mettre en surbrillance un tableau via la valeur d'une cellule.


Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Intersect(Target, Range("V3:AM502")) Is Nothing Then

Range("S1").Value = Target.Row

End If

End Sub

(j'ai raccourci la macro mais en gros c'est ça)



J'aimerais faire une chose similaire, c'est pour ça que je l'ai prise en exemple.
Je souhaite copier et coller le contenu d'une plage quand je clique sur la ligne

en gros:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Intersect(Target, Range("V3:AM502")) Is Nothing Then

Range("Feuille2, A1:O1 ").Value = Colonne W Target.Row:Colonne AK Target.Row

...
En gros:
Quand je clique dans la zone V3:AM502
Les valeurs contenues depuis la colonne W jusque à la colonne AK, dans la ligne sur laquelle j'ai cliqué, soit copiées sur la plage A1:O1 située en feuille 2

Es-ce possible? Auriez vous une piste?

Merci beaucoup!
Afficher la suite 

Votre réponse

1 réponse

Messages postés
146
Date d'inscription
lundi 15 octobre 2018
Statut
Membre
Dernière intervention
11 mai 2019
1
0
Merci
En fait j'aurais juste besoin de ça, à la limite:

Range("W&(Target.Row):AK&(Target.Row)").Copy

Je crois que je l'ai très mal formulé...
Commenter la réponse de Anthelm