Macro raz

[flo65000]

Bonjour,
je cherche à remettre à zero juste les cases bleues.
comment puis je faire à l'aide d'une macro
Regarde la pièce jointe RAZ.xls

merci de répondre.
cordialement

 

[RENAUDER]

Re : Macro raz

Bonjour,
Le code associé à ton bouton

Private Sub CommandButton1_Click()
    Sheets(1).UsedRange.Select
    For Each cell In Selection
        If cell.Interior.ColorIndex = 8 Then
            cell.Interior.ColorIndex = 2
        Else
        End If
    Next cell
End Sub

 

[flo65000]

Re : Macro raz

merci beaucoup,
j'arrive pas a la faire fonctionner. pourriez vous m'envoyer le fichier avec la maco s'il vous plait?

 

[flo65000]

Re : Macro raz

ce que je souhaiterais
Pendant le tournoi je mets les scores dans les cases bleues. Apres le tournoi je voudrais effacer les scores comment dois je faire avec une macro.
merci de repondre

 

[RENAUDER]

Re : Macro raz

Bonjour,

Fichier joint

 

[flo65000]

Re : Macro raz

BONJOUR,
désolé mais je desire que les scores s'efface et non pas la couleur ( la couleur c'était pour vous indiquer qu'est ce vous deviez faire).

merci de repondre

 

[kjin]

Re : Macro raz

Bonsoir,

Private Sub CommandButton1_Click()
Range("C9:D14,C19:D24,C29:D34,C39:D44").ClearContents
End Sub

Ce que tu aurais obtenu en utilisant l'enregistreur de macros
A+
kjin

 

[flo65000]

Re : Macro raz

cc
merci sa fonctionne
merci beaucoup