CommandButton1_Click transparent

[Nonno 94]

Bonjour le Forum,

je vous souhaite tout d'abord de joyeuses fêtes de fin d'année.

Ensuite, j'aimerais que vous m'indiquiez comment faire pour qu'un bouton dont le Backstyle est "transparent" ne reste pas opaque lorsque l'on a cliqué dessus mais redevienne transparent.
Voici le code que j'utilise :

Private Sub CommandButton1_Click()


    Sheets("Prévisions (Précision)").Select
    
        ActiveSheet.Unprotect
     Range("A493:A496").Select
        With Selection.Interior
            .ColorIndex = 40
            .Pattern = xlSolid
        End With
        ActiveSheet.Protect
    
        Range("A500").Select
        
         ActiveWindow.ScrollRow = 487
    ActiveWindow.ScrollRow = 488
    ActiveWindow.ScrollRow = 489
    ActiveWindow.ScrollRow = 490
    ActiveWindow.ScrollRow = 491
    ActiveWindow.ScrollRow = 492
        
End Sub

Avec mes remerciements.
Cordialement.

Nonno 94.

 

[Pierrot93]

Re : CommandButton1_Click transparent

Bonjour,

mets peut être la propriété "TakeFocusOnClick" du bouton à "False".

bonne journée
@+

 

[Nonno 94]

Re : CommandButton1_Click transparent

Bonjour Pierrot93 et MERCI pour cette nouvelle réponse aussi Pertinente que les précédentes.

Nonno 94.