Sujet Précédent Sujet Suivant

Excel

patrick -  
zahr kall Messages postés 63 Statut Membre -
Bonjour, j'ai inséré une macro pour colorer la(les) cellule active.J'ai réussi à colorer mes cellules actives mais lorsque j'enregistre mon dossier en fin de journée la cellule active colorée s'enregistre colorée et le lendemain lorsque j'ouvre mon dossier active ou pas cette cellule reste colorée ........à la fin mon tableau sera tout rouge!
merci de m'aider

3 réponses

Réponse 1 / 3
zahr kall Messages postés 63 Statut Membre 10
 
Bonjour,

essaie ta macro avec Sub Worksheet_Selectionchange

Bonne journée.
0
patrick
 
voici ma macro et cela garde toujours la cellule active (qui est colorée) de la veille:

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 = 3

End Sub

merci de m'aider
0
Réponse 2 / 3
zahr kall Messages postés 63 Statut Membre 10
 
Dans ton ThisWorkbook, essaie ceci :

Private Sub Workbook_Open()

ActiveSheet.Select 'définir la zone qui t'intéresse
Selection.Interior.ColorIndex = xlNone

End Sub

est-ce que cela t'aiderai?
0
patrick
 
je ne sais pas ou l'insérer?merci
0
Réponse 3 / 3
zahr kall Messages postés 63 Statut Membre 10
 
Bonjour,

il faut que tu ailles dans l'éditeur de Microsoft Visual Basic.
Pour cela, lorsque tu as ouvert ton fichier Excel, tu tapes "alt" + "F11".
Dans l'arborescence à gauche, tu trouveras ton fichier.
Si tu cliques dessus, il y aura un ou plusieurs dossiers qui apparaitront.
Là, tu choisis celui qui s'appelle "Microsoft Excel Objets".
Dedans, tu trouveras "ThisWorkbook".
Double-clique dessus pour l'ouvrir, et insères le code :

Private Sub Workbook_Open()

ActiveSheet.Select 'définir la zone qui t'intéresse
Selection.Interior.ColorIndex = xlNone

End Sub

Normalement, tu devrais t'en sortir.
0