Re bonjour,
J'ai essayé d'avancé pour revenir avec des choses plus concrètes.
Au lieu de oui/non j'utilise des 1=oui et des 0=non dans l'idée
Au clic sur le bouton, si il y a 1, cela change Vendeur1 en VendeurX et si il y a 0 cela laisse ce qu'il y avait avant.
Je n'arrive pas à faire en sorte que cela s'applique à toutes la colonnes, quand j'essaye par exemple de rentrer /
vendeur = Range("A2:A100")
J'ai un message d'erreur
Donc j'aimerais que mon code s'applique à toutes la colonnes, le mieux serait de faire en sorte que cela s'aligne avec là dernière cellule remplis dans la colonne Vendeur.
Voici mon code :
Sub Bouton1_Cliquer()
Dim vendeur As Single, nouveau_vendeur As String
vendeur = Range("A2")
If vendeur = 1 Then
nouveau_vendeur = "VendeurX"
ElseIf vendeur >= 0 Then
nouveau_vendeur = Range("B2")
End If
Range("B2") = nouveau_vendeur
End Sub