Merci,
mais le pb est que l action est differente pour chaque cellule.
J ai essaye ca mais j ai un bug
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = Range("A10:A44, A47:A71, A74:A123") Then Call BB
End Sub
comment faire pour debuger sachant que dans ma macro BB je fais appel a
ActiveCell.Offset(0, 8).Value
merci