Bonsoir le Forum,
En haut d'une colonne d'un fichier Excel j'ai un menu et suivant la sélectionque je fais j'ai des nombre ou des %. J'ai une table de correspondance qui me donne 1 ou 2 si c'est nombre ou %. Une petite macro me permet de changer le format des cellules en cliquant sur un petit bouton.
Question: Est-il possible d'avoir le changement automatique du format sans cliquer sur le petit bouton qui lance la macro suivant la valeur 1 ou 2 de la cellule A1
Petit exemple de joint
Merci pour vos réponses et votre aide
Cordialement
Laraviole
Bonsoir Staple1600,
J'ai testé ton conseil cela me donne l'aide microsoft mais j'avoue que je n'ai pas trouvé, ni la loupe d'ailleurs
Merci pour ta réponse
Cdt
Laraviole
Bonsoir tout le monde,
Merci pour vos réponses
La réponse de mth fonctionne, JCGL j'ai une erreur de compilation lorsque je change de valeur dans le menu avec ta solution. Il est fort probable que c'est moi qui fait une erreur.Quand à la loupe, je n'avais jamais fait attention à ce raccourci, j'ai appris plein de chose ce soir.
Encore merci pour votre aide
Cordialement
Laraviole
Bonsoir tout le monde,
Tout fonctionne JCGL, mon erreur était d'avoir supprimé le module pour tout ramener dans la feuille1
Carcharodon-Carcharias, j'ai fait les téléchargements VBA.
Une nouvelle fois merci à tous
Trés cordialement
Laraviole
Si tu préfères "tout" dans un seul code et dans le code de la feuille concernée :
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$2" Then
With Columns("D:D")
If Range("A1") = 1 Then
.NumberFormat = "0.00"
Else
.NumberFormat = "0.00%"
End If
Range("D2").Select
End With
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$2" Then
Columns("D:D").NumberFormat = IIf([A1] = 1, "0.00", "0.00%")
Range("D2").Select
End If
End Sub