![]() |
|
Forum
|
|
|
#1 (permalink) |
|
Guest
Messages: n/a
|
Bonsoir à toutes et à tous,
J'aurai besoin d'un peu d'aide ou tout du moins d'une explication, j'ai besoin de mettre dans le code d'une feuille 2 macros de type : Private Sub Worksheet_Change(ByVal Target As Range) Elles sont indépendantes l'une de l'autre, elles marchent l'une et l'autre, mais je n'arrive pas à les faire fonctionner les 2 en même temps. J'ai essayé des les accoler l'une derrière l'autre, ça ne marche pas, en changeant le nom de l'une ça ne marche pas non plus. Question : Que puis-je faire???? Merci de votre aide. Jacques |
| ANNONCES | |||
|
|
|
|
#2 (permalink) |
|
Guest
Messages: n/a
|
Bonsoir Jacques et le forum
Une solution consiste à les conditionner ! Exemple : Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("D1")) Is Nothing Then If Range("D1") = "Run" Then Demarrer End If End If If Not Application.Intersect(Target, Range("A1")) Is Nothing Then Programmation End If End Sub Cordialement CBernardT |
| Liens sociaux |
| Outils de la discussion | |
|
|