modifier couleur du curseur...

Le
Philippe MERY
Bonjour.
XL 97

est il possible de modifier la couleur de la cellule active ?


merci

Cordialement.
Philippe MERY
**pour m'écrire perso**
mery-ph -serveur- ifrance.com
www.freymille.com
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
JPMonnier
Le #17315001
Bonjour,
Je ne sais pas si ça fonctionne sur Excel 97
A tester
A placer dans le code de la feuille désirée

Public ADR

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveCell.Interior.ColorIndex = 6
Range(ADR).Interior.ColorIndex = xlNone
ADR = ActiveCell.Address
End Sub
--
Cordialement


"Philippe MERY" news:48d8e38c$0$854$
Bonjour.
XL 97

est il possible de modifier la couleur de la cellule active ?


merci

Cordialement.
Philippe MERY
**pour m'écrire perso**
mery-ph -serveur- ifrance.com
www.freymille.com



Philippe MERY
Le #17315591
"JPMonnier"
Bonjour,
Je ne sais pas si ça fonctionne sur Excel 97
A tester
A placer dans le code de la feuille désirée

Public ADR

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveCell.Interior.ColorIndex = 6
Range(ADR).Interior.ColorIndex = xlNone
ADR = ActiveCell.Address
End Sub
--
Cordialement




oui ca marche... trop... :-))
toutes les cellules "visitées" reste en couleur alors que je voudrais juste
la cellule active (ou bien le tour -je ne sais comment l'appeler-)

merci
JB
Le #17316601
Bonjour,

http://boisgontierjacques.free.fr/pages_site/mfc.htm#CurseurCouleur

http://boisgontierjacques.free.fr/fichiers/jb-Curseur.xls

JB

On 23 sep, 14:39, "Philippe MERY" wrote:
Bonjour.
XL 97

est il possible de modifier  la couleur de la cellule active ?

merci

Cordialement.
 Philippe MERY
 **pour m'écrire perso**
 mery-ph -serveur- ifrance.com
 www.freymille.com


JP25
Le #17317351
Ca fonctionne sur Excel 2000
as-tu bien déclaré Public ADR dans ta feuille ou se trouve la
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
?
--
Cordialement



"Philippe MERY" news: 48d8f953$0$873$
"JPMonnier"
Bonjour,
Je ne sais pas si ça fonctionne sur Excel 97
A tester
A placer dans le code de la feuille désirée

Public ADR

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveCell.Interior.ColorIndex = 6
Range(ADR).Interior.ColorIndex = xlNone
ADR = ActiveCell.Address
End Sub
--
Cordialement




oui ca marche... trop... :-))
toutes les cellules "visitées" reste en couleur alors que je voudrais
juste la cellule active (ou bien le tour -je ne sais comment l'appeler-)

merci



Philippe.R
Le #17318481
Bonjour,
Une mise en forme conditionnelle appliquée à la plage considérée, avec : si
la formule est :

=ET(COLONNE()ÎLLULE("colonne");LIGNE()ÎLLULE("ligne"))

couleur de ton choix ; et dans le code de la feuille :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Calculate
End Sub

--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"Philippe MERY" news:48d8e38c$0$854$
Bonjour.
XL 97

est il possible de modifier la couleur de la cellule active ?


merci

Cordialement.
Philippe MERY
**pour m'écrire perso**
mery-ph -serveur- ifrance.com
www.freymille.com



Publicité
Poster une réponse
Anonyme