Ligne du jour en interior color 17

Bonjour le forum

Me voici revenu!!!

Problème Call derniereligne est réglé

Dans fichier joint (tata) hier j'ai tapé 3 et c'est venu en couleur 17 (c'est normal)

Ce matin j'aurais du retrouver mon fichier comme toto (fichier joint)

Je pense que c'est un problème après minuit ça devrait passer en couleurs normales (fichier toto)

Macro ThisWorkbook je pense mais où?

Je rappelle que ce fichier est SANS MFC

Merci à vous

Bonjour

Sinon pour répondre à ta question, pas besoins de VBA, les formules conditionnels font très bien le taf !! , regarde le fichier joint.

Pour info n'utilise pas =MAINTENANT() mais plutot =DATE() à cause des formats générés par Excel

Bonjour le forum

Personne pour faire des essais?

Cordialement

Bonjour le forum

Pas de "caïd" du vba pour faire des essais?

Peut-être une seule MFC pour la date?

Cordialement

Il faut que tu explique mieux tes attentes, la ou les causes qui entraînerons une ou plus conséquence... Ce contenter de dire qu'il y à un problème de couleur, c'est flou !

Bonjour GGautier

Ce matin je voulais retrouver mon fichier toto ainsi avec ces couleurs normales et non comme fichier tata

Lorsque demain matin je vais taper 3 ma ligne du fichier toto va passer en couleur 17 comme celle du fichier tata de ce jour

Assez compliqué en vba

Sans MFC ou 1 peut-être MFC?

Si trop compliqué on stop tout

Cordialement

Voir les 2 fichiers

Mais c'est quoi les conditions pour que tes cellules changes de couleurs ?

Re GGautier

La condition c'est de taper 3 autre nombre ou texte la ligne vient en interior color 17

Mais le lendemain je veux la ligne suivante avec mes couleurs normals

Cordialement

al87 a écrit :

La condition c'est de taper 3 autre nombre ou texte la ligne vient en interior color 17

Mais le lendemain je veux la ligne suivante avec mes couleurs normals

Sérieux, c'est vraiment pas clair, fait moi des phrases "Sujet, verbe complément". J'ai l'impression que même toi tu as du mal à comprendre ce que tu veux... Je ne veux pas être méchant, surtout le prend pas mal. Je penses que ton problème est tout bêtes mais je n'arrive pas à suivre ton raisonnement...

Bonjour GGautier

Tu ouvres le fichier toto de hier est tu verras ce que je veux!!!

Tu tapes 3 et tu verras la ligne 20 en couleur 17 aujourd'hui.

Cordialement

Bonjour le forum

Personne ne veut s'y coller

Cordialement

Bonjour le forum

Toujours pas résolu mon problème

Comment puis-je faire effacer la couleur interior color 17 ligne 21 à l'ouverture du fichier

Si je tape 3 cellule B22 la ligne repasse en interior color 17 ça elle le fait bien.

Toujours SANS MFC mais peut-être mettre macro dans feuille de chaque mois?

Cordialement

Bonjour,

Vires ta barre d'outils perso car personnellement ça me gonfle quand un fichier modifie l'apparence d'Excel sur mon PC sans le demander au préalable. J'ai ouvert ton fichier et quand j'ai vu la barre dans l'onglet Complément, je l'ai mis à la poubelle sans regarder plus loin et de même pour la barre. Si au moins elle disparaissait à la fermeture !

Bonjour Theze

Plus là en principe

Cordialement

Toto 2 est mieux toto avait un bug

Elle est toujours là mais bon, passons !

Tu veux faire quoi au juste, que le ligne ne se colore pas en colorindex 17 si on est dimanche ?

C'est ici, que se produit la coloration de la ligne :

If Not cel Is Nothing Then

    Range(Cells(cel.Row, 1), Cells(cel.Row, Plage.Columns.Count)).Interior.ColorIndex = 17
    J = cel.Row - 1

End If

Il te suffit de créer une condition comme par exemple :

If Format(cel.Value, "dddd") <> "dimanche" Then

comme ceci :

If Not cel Is Nothing Then

    If Format(cel.Value, "dddd") <> "dimanche" Then

        Range(Cells(cel.Row, 1), Cells(cel.Row, Plage.Columns.Count)).Interior.ColorIndex = 17
        J = cel.Row - 1

    End If

End If

Bonjour theze

Non le samedi dimanche ou jours fériés n'a rien à voir.

Ce matin j'ai interior color 8 ligne 22 (fichier toto2)

Si je tape 3 elle vient en interior color 17 ( ce jour) (toto3)

Demain matin elle doit retrouver la couleur interior color 8

Et si je tape 3 interior color 17

Ainsi de suite

Cordialement

Bonjour Theze

Moi je n'ai plus ma barre personnalisée

Cordialement

Bonjour le forum

Je clos le sujet

Merci à vous tous

Cordialement

Bonjour le forum

Voilà ça tourne

Cordialement