Affectation d'une macro à un bouton développeur

Bonjour à tous,

Je souhaiterais affecté une macro à un bouton développeur qui lorsque que je clique renvoi un texte dans une autre cellule.

Fichier en pièce jointe

Je vous remercie par avance

Cordialement

Mathieu

Salut Mathieu,

voilà...

A+

Bonjour,

Salut Curulis !

Une version un peu plus compacte :

Sub VSAVx()
    Dim x%
    x = CInt(Right(Application.Caller, 1))
    With ActiveSheet.Range("C18")
        Select Case x
            Case 1: .Offset(x * 2) = "VSAV 217 (VSAV BSPP_1_MASS)"
            Case 2: .Offset(x * 2) = "VSAV 148 (VSAV BSPP_2_MASS)"
            Case 3: .Offset(x * 2) = "VSAV 310 (VSAV BSPP_3_MASS)"
        End Select
    End With
End Sub

Même macro affectée à tous les boutons...

Cordialement.

Merci Curulis57,

Cela fonctionne parfaitement.

MFerrand,

Merci pour la version plus rapide mais non réalisable pour moi car j'avais pris en exemple VSAV mais j'ai beaucoup d'autres boutons à créer avec des noms différents.

Cordialement

Mathieu

MFerrand,

Merci pour la version plus rapide mais non réalisable pour moi car j'avais pris en exemple VSAV mais j'ai beaucoup d'autres boutons à créer avec des noms différents.

Je ne vois pas le rapport !