Macro raz

RENAUDER

Nous a quitté

Repose en paix

• 20 Avril 2009

• #2

Re : Macro raz

Bonjour,
Le code associé à ton bouton

Code:

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

 

Vote positif 0 Vote négatif

F

flo65000

XLDnaute Occasionnel

• 20 Avril 2009

• #3

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?

 

Vote positif 0 Vote négatif

F

flo65000

XLDnaute Occasionnel

• 20 Avril 2009

• #4

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

 

Vote positif 0 Vote négatif

RENAUDER

Nous a quitté

Repose en paix

• 20 Avril 2009

• #5

Re : Macro raz

Bonjour,

Fichier joint

 

Pièces jointes

• RAZ.xls

  35 KB · Affichages: 77
• RAZ.xls

  35 KB · Affichages: 69
• RAZ.xls

  35 KB · Affichages: 60

Vote positif 0 Vote négatif

F

flo65000

XLDnaute Occasionnel

• 20 Avril 2009

• #6

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

 

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 21 Avril 2009

• #7

Re : Macro raz

Bonsoir,

Code:

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

 

Vote positif 0 Vote négatif

F

flo65000

XLDnaute Occasionnel

• 21 Avril 2009

• #8

Re : Macro raz

cc
merci sa fonctionne
merci beaucoup

 

Vote positif 0 Vote négatif