Macro EXCEL

Résolu
Ttomax Messages postés 60 Date d'inscription   Statut Membre Dernière intervention   -  
Ttomax Messages postés 60 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

je souhaite une macro qui me surveille si en case A32 g "Pas de réglage",
d34,d35 i34,i35 et m34,35 passe à "X "

Sans mettre de formule car d34,35 .... peuvent etre efface

D'avance merci



A voir également:

6 réponses

Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Salut,

Tu peux éviter d'écrire en langage sms s'il te plait.
Explique ta demande, si dans la cellule A32 tu as "Pas de réglage"
les cellules D34, D35, I34 et M34 la valeur "Pas de réglage", devient "X", c'est cela !
mais peux expliquer ce que vient faire 35 dans ta question "m34,35 passe"

0
Ttomax Messages postés 60 Date d'inscription   Statut Membre Dernière intervention   1
 
Désolé donc en fait je souhaite que lorsque ma cellule A32 est écrit "Pas de réglage" les cellules D34,D35,I34,I35,M34 et M35 deviennent "X" sachant que le message dans A32 "Pas de réglage" est le résultat d'une autre formule.

D'avance merci
0
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Re,

Es ce que ta question à un raport avec ta question précédent avec des cellules fusionnées !

Je n'ai pas ta temps d'écrire un code je rentre en cours je serais te retour en fin d'après midi
0
Ttomax Messages postés 60 Date d'inscription   Statut Membre Dernière intervention   1
 
oui c sur le même fichier avec des cellules fusionnés
bon courage
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Re,

dans les propriétés de ta feuille (clic sur l'onglet de feuille/Visualiser le code)

colle ce code qui actualisera les cellules dès que tu déplaceras le curseur de ta souris

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If [A32] = "Pas de réglage" Then Range("D34,D35,I34,I35,M34,M35") = "X"
If [A32] <> "Pas de réglage" Then Range("D34,D35,I34,I35,M34,M35") = ""
End Sub
0
Ttomax Messages postés 60 Date d'inscription   Statut Membre Dernière intervention   1
 
cool merci, et désolé pour le retard ^^. Merci pour ton aide. ++
0