affichage valeur vba

[cromate]

bonjour,

je souhaiterai afficher une valeur en cliquant sur une cellule, mais je ne sais pas ce qu'il faut ecrire dans le code pour que cela prenne la valeur de la cellule et non la valeur fixe que j'ai écrite.

merci à vous

 

[skoobi]

Re : affichage valeur vba

Bonjour cromate,

ceci?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[F3:F7].ClearContents
'Application.Volatile
If Not Intersect([e3:e7], Target) Is Nothing Then
Range("F" & Target.Row).Value = Range("B" & Target.Row).Value
End If
 
End Sub

 

[cromate]

Re : affichage valeur vba

bonjour skoobi et merci,

je souhaiterai juste que les valeurs restent affichées dans la colonne F, j'ai besoin de tous les chiffres.

 

[skoobi]

Re : affichage valeur vba

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'[F3:F7].ClearContents
'Application.Volatile
If Not Intersect([e3:e7], Target) Is Nothing Then
Range("F3:F7").Value = Range("B3:B7").Value
End If
 
End Sub

Et là?

 

[cromate]

Re : affichage valeur vba

merci skoobi, c'est bon.

bonne soirée