Cellule noire...

WEIDER · 18 Février 2014

Bonjour à tous,

Pouvez vous m'aider à solutionner ma demande, personnellement je n'y arrive pas.
Tout est dit dans mon fichier joint.

Merci beaucoup

Weider.

Pierrot93 · 18 Février 2014

Re : Cellule noire...

Bonjour,

essaye ceci, à placer dans le module de la feuille concernée, click droit sur l'onglet => visualiser le code.

Code:

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
    If .Count = 1 Then
        With .Interior
            .ColorIndex = IIf(.ColorIndex = 1, 0, 1)
        End With
    End If
End With
End Sub

bon après midi
@+

WEIDER · 18 Février 2014

Re : Cellule noire...

Merci beaucoup Pierrot ! C'est exactement ça !
Par contre pourquoi ça me mets toujours cette fenêtre à chaque sauvegarde ?! Comment ne plus l'avoir ?

Cellule noire...

WEIDER

XLDnaute Impliqué

Pièces jointes

Pierrot93

XLDnaute Barbatruc

WEIDER

XLDnaute Impliqué

Pièces jointes

Discussions similaires

Cellule noire...

WEIDER

XLDnaute Impliqué

Pièces jointes

Pierrot93

XLDnaute Barbatruc

WEIDER

XLDnaute Impliqué

Pièces jointes

Discussions similaires

Privacy & Transparency

Privacy & Transparency