Comment changer cel. active pour la rangé complete dans mon code

Résolu/Fermé

chantalan Messages postés 20 Date d'inscription jeudi 21 janvier 2016 Statut Membre Dernière intervention 21 septembre 2023 - 21 janv. 2016 à 14:17
chantalan Messages postés 20 Date d'inscription jeudi 21 janvier 2016 Statut Membre Dernière intervention 21 septembre 2023 - 25 janv. 2016 à 22:11

Bonjour,

Je vous remercie a l'avance de m'aider.

J'ai trouvé dans le forum le code suivant:

Public old_color, old_sel
Option Explicit

Sub Worksheet_SelectionChange(ByVal sel As range)
If Not old_sel = "" Then range(old_sel).Interior.ColorIndex = old_color
old_sel = sel.Address
old_color = ActiveCell.Interior.ColorIndex
ActiveCell.Interior.ColorIndex = 6

End Sub

Mais ce que je veux c'est voir la rangé complete en jaune quand mon courseur est dans une cellule active. Dans mon tableau, j'ai des cellules en couleur mais je ne veut pas que ca l'efface.

Alors je veux simplement savoir ou je suis dans mon tableau sans rien changé sauf voir la ligne en jaune ou je suis , si mon curseur est dans la case B2, mai la ligne 2 en jaune MAIS ne change rien si ma cellules en en vert quand je vais sortir de ma cellule.

Excel 2010

Merci milles fois

A voir également:

Comment changer cel. active pour la rangé complete dans mon code
Changer dns - Guide
Piratage facebook changer mot de passe - Guide
Changer clavier qwerty en azerty - Guide
Code asci - Guide
Changer code pin - Guide

2 réponses

Réponse 1 / 2

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
21 janv. 2016 à 14:23

Bonjour,

j'ai des cellules en couleur Par MFC ou par changement manuel ?

chantalan Messages postés 20 Date d'inscription jeudi 21 janvier 2016 Statut Membre Dernière intervention 21 septembre 2023
Modifié par chantalan le 21/01/2016 à 14:55

Dans mon tableau les cellules sont déja en couleur car j'avais fait un travail auparavent. Il peut arriver que je sois obligé de mettre une couleur dans une cellule quand je vais arriver sur une ligne active. je ne veux pas que ca change rien dans mon tableau mais seulement que je puisse voir ou je suis rendu en mon tableau volumineux. Il se peut quand je vais etre dans la cellule active que je sois oubligé de la mettre soit en vert ou soit en une autre couleur. Je ne veux pas quelle efface rien surtout pas la couleur qui y était avant. Je voudrais par contre etre capable de mettre une couleur si la cellule est en blanc et pouvoir la garder si je sors de la cellule active merci beaucoup de ton aide. je ne suis pas tres habille. PS c'est moi qui est mis la couleur dans des cellules manuellement. Au départ tout etait en blanc.

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702 > chantalan Messages postés 20 Date d'inscription jeudi 21 janvier 2016 Statut Membre Dernière intervention 21 septembre 2023
21 janv. 2016 à 14:41

Re,

Vous ne repondez pas a la question !!

chantalan Messages postés 20 Date d'inscription jeudi 21 janvier 2016 Statut Membre Dernière intervention 21 septembre 2023 > f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024
21 janv. 2016 à 14:48

Que veut dire MFC ? merci

Re
Mise en Forme Conditionnelle

Ok. Non c'est moi qui a mis de la couleur dans quelques cellules avant de mettre mon code.

Mais je voudrais que la ligne de la cellule active soit en jaune. je doudrais aussi etre capable de mettre une couleur dans la cellule active si je veux mais quelle la garde quand je vais sortir de la cellule active. merci beaucoup
Je me rend compte que mon code change un peu la couleur de mes cellules déja colorées mais je ne veux pas quelle les change!

Réponse 2 / 2

eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 7 214
22 janv. 2016 à 14:56

Bonjour,

Une proposition qui pose une MFC, préserve les couleurs manuelles et les autres MFC.
https://www.cjoint.com/c/FAwn3QCcqmN
eric

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
22 janv. 2016 à 16:10

Bonjour eriic,

C'est chouette le truc!

chantalan Messages postés 20 Date d'inscription jeudi 21 janvier 2016 Statut Membre Dernière intervention 21 septembre 2023
22 janv. 2016 à 17:35

Bonjour Eriic,

Cela fonctionne mais quand j'enregistre mon fichier, la ligne jaune demeure là. Elle ne disparait pas. Je ne veux pas quelle reste affiché un coup mon fichier fermé (ligne active). De plus, est-ce possible de l'activer et/ou deactiver mon code en tout temps sur ma feuille! J'ai entrer le code par développeur visualiser le code et apres exécuter mais je ne sais pas comment arreter sauf si je le supprime mais encore la il laisse la ligne jaune.

merci beaucoup de votre aide c'est précieux pour moi!

eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 7 214
22 janv. 2016 à 19:34

mais quand j'enregistre mon fichier, la ligne jaune demeure là. Elle ne disparait pas.
Si, si tu mets tout le code. Il y en a dans ThisWorkbook, tu le vois dans le texte de Feuil1 que j'ai mis là surtout pour ça.

De plus, est-ce possible de l'activer et/ou deactiver mon code en tout temps sur ma feuille!
Ajour une case à cocher ActiveX sur la feuille et remplace :
If Target.Count > 1 Then Exit Sub
par :
If Target.Count > 1 Or Not CheckBox1 Then Exit Sub

chantalan Messages postés 20 Date d'inscription jeudi 21 janvier 2016 Statut Membre Dernière intervention 21 septembre 2023 > eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024
25 janv. 2016 à 22:10

Merci beaucoup cela fonctionne tres bien!

Merci beaucoup a toi aussi c'est apprécié

Discussions similaires

input signal out of range

code d'activation GTA 5 steam

Discussions similaires

Newsletters