Déclencher macro sur evenement sur plage de données

Le
Vader
Bonjour,

Je n'arrive pas à trouver un moyen de déclencher une macro sur un événement
pouvant se dérouler sur n'importe quelle cellule du range(C4:G223)

Déclencher sur la modification d'une cellule c'est OK mais après je fais
tout planter :-)

Si quelqu'un a qq chose à me proposer je serai bien content

Antoine
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
JB
Le #4695341
Bonjour,

Transforme en majuscules les noms saisis dans le champ B2:B10:

If Not Intersect(Range("B2:B10"), Target) Is Nothing And Target.Count
= 1 Then
Application.EnableEvents = False
Target = Ucase(Target)
Application.EnableEvents = True
End If

http://boisgontierjacques.free.fr/pages_site/evenements.htm#WorkSheetChange

JB
http://boisgontierjacques.free.fr


On 14 sep, 17:22, Vader
Bonjour,

Je n'arrive pas à trouver un moyen de déclencher une macro sur un é vénement
pouvant se dérouler sur n'importe quelle cellule du range(C4:G223) ...

Déclencher sur la modification d'une cellule c'est OK ... mais après je fais
tout planter :-)

Si quelqu'un a qq chose à me proposer je serai bien content ...

Antoine


Vader
Le #4695291
Merci mais il faut absolument que cela marche pour n'importe quoi et pas
seulement détecter un passage en majuscule.


Bonjour,

Transforme en majuscules les noms saisis dans le champ B2:B10:

If Not Intersect(Range("B2:B10"), Target) Is Nothing And Target.Count
= 1 Then
Application.EnableEvents = False
Target = Ucase(Target)
Application.EnableEvents = True
End If

http://boisgontierjacques.free.fr/pages_site/evenements.htm#WorkSheetChange

JB
http://boisgontierjacques.free.fr


On 14 sep, 17:22, Vader
Bonjour,

Je n'arrive pas à trouver un moyen de déclencher une macro sur un événement
pouvant se dérouler sur n'importe quelle cellule du range(C4:G223) ...

Déclencher sur la modification d'une cellule c'est OK ... mais après je fais
tout planter :-)

Si quelqu'un a qq chose à me proposer je serai bien content ...

Antoine







Publicité
Poster une réponse
Anonyme