Plage de cellules

[renaud]

Bonjour a tous,


J aimerais savoir comment elargir
If Target.Address = "$A$10" Then Call BB

a la plage A10- A123 a l exception des cellules A73-A74 et A24-A26

Merci

 

[Pascal76]

Salut Renaud

Regardes ce lien où Thierry explique en long, en large, en hauteur, en profondeur et tout ce que tu veux la fonction Intersect.
Cela devrait répondre à ta question.

Lien supprimé

Bon courage

Pascal

 

[renaud]

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

 

[Pascal76]

Re Renaud

Excuses moi mais tu n'utilises pas la fonction Intersect dans ce que tu écris.
Regardes bien le fil référencé et tu verras qu'avec cette fonction détaillée comme il faut (comme d'habitude) par Thierry tu trouveras ton bonheur.

Pascal

 

[renaud]

c bon ca marche, merci