Alors je réussi à mettre la couleur sur une cellule avec un bouton mais je
voudrais dans cette même cellule qu'il me mette le nom du boutton
voici le début qui peut me donner la suite???
Private Sub brico_Click()
Selection.NumberFormat = "@"
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
End Sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. Ajoute Selection.value="brico" "Jerome SABATHIE" a écrit dans le message de news: 44228931$0$6687$
Alors je réussi à mettre la couleur sur une cellule avec un bouton mais je voudrais dans cette même cellule qu'il me mette le nom du boutton voici le début qui peut me donner la suite???
Private Sub brico_Click() Selection.NumberFormat = "@" With Selection.Interior .ColorIndex = 6 .Pattern = xlSolid .PatternColorIndex = xlAutomatic End With End Sub
Bonjour.
Ajoute Selection.value="brico"
"Jerome SABATHIE" <jerome.tania@wanadoo.fr> a écrit dans le message de news:
44228931$0$6687$8fcfb975@news.wanadoo.fr...
Alors je réussi à mettre la couleur sur une cellule avec un bouton mais je
voudrais dans cette même cellule qu'il me mette le nom du boutton
voici le début qui peut me donner la suite???
Private Sub brico_Click()
Selection.NumberFormat = "@"
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
End Sub
Bonjour. Ajoute Selection.value="brico" "Jerome SABATHIE" a écrit dans le message de news: 44228931$0$6687$
Alors je réussi à mettre la couleur sur une cellule avec un bouton mais je voudrais dans cette même cellule qu'il me mette le nom du boutton voici le début qui peut me donner la suite???
Private Sub brico_Click() Selection.NumberFormat = "@" With Selection.Interior .ColorIndex = 6 .Pattern = xlSolid .PatternColorIndex = xlAutomatic End With End Sub
Jerome SABATHIE
bonjour et merci c'était bien ça!!! "Daniel" a écrit dans le message de news:
Bonjour. Ajoute Selection.value="brico" "Jerome SABATHIE" a écrit dans le message de news: 44228931$0$6687$
Alors je réussi à mettre la couleur sur une cellule avec un bouton mais je voudrais dans cette même cellule qu'il me mette le nom du boutton voici le début qui peut me donner la suite???
Private Sub brico_Click() Selection.NumberFormat = "@" With Selection.Interior .ColorIndex = 6 .Pattern = xlSolid .PatternColorIndex = xlAutomatic End With End Sub
bonjour et merci c'était bien ça!!!
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de news:
eVaLJmnTGHA.2276@tk2msftngp13.phx.gbl...
Bonjour.
Ajoute Selection.value="brico"
"Jerome SABATHIE" <jerome.tania@wanadoo.fr> a écrit dans le message de
news: 44228931$0$6687$8fcfb975@news.wanadoo.fr...
Alors je réussi à mettre la couleur sur une cellule avec un bouton mais
je voudrais dans cette même cellule qu'il me mette le nom du boutton
voici le début qui peut me donner la suite???
Private Sub brico_Click()
Selection.NumberFormat = "@"
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
End Sub
bonjour et merci c'était bien ça!!! "Daniel" a écrit dans le message de news:
Bonjour. Ajoute Selection.value="brico" "Jerome SABATHIE" a écrit dans le message de news: 44228931$0$6687$
Alors je réussi à mettre la couleur sur une cellule avec un bouton mais je voudrais dans cette même cellule qu'il me mette le nom du boutton voici le début qui peut me donner la suite???
Private Sub brico_Click() Selection.NumberFormat = "@" With Selection.Interior .ColorIndex = 6 .Pattern = xlSolid .PatternColorIndex = xlAutomatic End With End Sub