Merci Éric je m'était peut-etre mal exprimer car c'est pas tout a fait cela que je voulait parcontre je me suis inspiré de toi: J'avais 12 bouton...Janv...Fév...
Derrière le janvier j'ai mis:
Private Sub Label1_Click()
Sheets("JANVIER").Select
TextBox1.value= ActiveSheet.Name
End Sub
et le même chose pour février....mars
Merci beaucoup
Temjeh