Copier le contenu de la cellule Hx dans presse papier selon la ligne active
l
Bonjour,
Je cherche avec VBA à générer une copie automatique du contenu au format texte de la cellule située en colonne H en fonction de la ligne selectionnée.
En pratique je cherche ceci :
Si je clique sur la cellule A2, alors H2 est copié dans le presse papier,
Si je clique sur la cellule B6, alors H6 est copié dans le presse papier.
etc...
Pourriez vous m'indiquer quel macro VBA pourrait réaliser cela svp ?
Cordialement,
Bonjour
Code à mettre dans le module de la feuille désirée :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Utiliser la référence Microsoft Forms 2.0 Object Library
Dim x As New DataObject
Dim CopieVal As String
Dim Lge As Integer
Lge = ActiveCell.Row
CopieVal = Cells(Lge, 8)
x.SetText CopieVal
x.PutInClipboard
End Subl
Merci beaucoup , ça fonctionne très bien.