Macro pour meilleure lisibilité Excel

Bonjour à toute et à tous,

Tout d'abord sachez que je n'ai aucune connaissance en VBA ou programmation. Quelques notions sur le fonctionnement mais aucune sur les commandes.

Voila j'expose mon problème, J'ai d'immenses base de données EXCEL à travailler qui référence plusieurs milliers de produits, je passe mes journées à ça et ça fait mal aux yeux à force. Alors j'ai eu l'idée de mettre en relief par une couleur la cellule que je sélectionne pour ne pas me tromper dans mon travail. Seulement voila j'ai trouvé des macros qui fonctionnent super bien, mais lorsque je repasse sur mes cellules avec le curseur de sélection la couleur s'efface. Je me demandais si il y avait un moyen que cela ne se produise pas ? Peut etre en ajoutant des lignes à la macro ou en figeant les couleurs de cellule ?

Voila si qqn à dejà eu ce problème et possède la solution merci de poster un messageç cela pourra peut être aider beaucoup de gens ! Merci encore et bon week end !

Bonjour,

ci dessous une proposition de formule qui peut être glissé vers le bas

=SI(ESTERREUR(RECHERCHEV(L2;$A$2:$A$121;1;FAUX));"admis";"non admis")

bien cordialement

Bonsoir,

Veux-tu dire que tu utilises une macro qui te colore la cellule active au fil de tes déplacements ?

Bonjour,

plutôt que de modifier une macro qui ne te satisfait pas décris plutôt précisément ton besoin et le fonctionnement voulu dans le détail.

eric

Bonjour alors j'expose mon souhait,

J'aimerais que dans un fichier excel blanc je puisse me déplacer avec le curseur de sélection de cellules tout en mettant en avant la cellule sélectionné avec une couleur par exemple. Pour ce problème j'ai pu avoir des macros sur d'autres forums. Mais voila si je souhaite colorer une cellule car il y a un problème et que je souhaite y revenir plus tard je dois désactiver la macro. Et si par exemple je passe par dessus une cellule déjà colorié cela passe en blanc.

Merci de votre aide

Bonjour à tous,

A tout le moins ... tu n'as pas fourni l'effort d'explciation qu' eriiic t'a demandé ...

Pour rester dans le vague et le 'générique' ...tu peux tester la macro suivante :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  If Target.Interior.Pattern = xlNone Then
    Target.Interior.Color = vbRed
  Else
    Target.Interior.Pattern = xlNone
  End If
  Cancel = True
End Sub

En espèrant que cela puisse t'aider ...

Bonjour,

même conclusion que james, tu ne dis rien des conditions quand appliquer ou supprimer ce marquage...

Et même solution que james : marquage et démarquage par un double-clic sur une cellule.

Seule différence : recouvre d'autres éventuelles MFC présentes.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Dim fc As FormatCondition, ok As Boolean
    Cancel = True
    For Each fc In Target.FormatConditions
        If fc.Formula1 = "=VRAI" Then
            fc.Delete
            ok = True
        End If
    Next fc
    If Not ok Then
        With Target
            .FormatConditions.Add Type:=xlExpression, Formula1:="=VRAI"
            .FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
            With .FormatConditions(1).Interior
                .PatternColorIndex = xlAutomatic
                .Color = 65535
                .TintAndShade = 0
            End With
            .FormatConditions(1).StopIfTrue = True
        End With
    End If
End Sub

eric

Edit : autre proposition dans le fichier joint.

Choix de la couleur, applicable sur une plage de plusieurs cellules.

Clic-droit sur la sélection pour appliquer.

Couleur blanche : supprimer marquage