Soucis de bordures qui s'efface
Bonsoir a tous et toutes, forum bonsoir
Je n'arrive a dessiner des bordures dans mon programme a cause d'une ligne de code
qui m'efface les bordures dès que les dessinent.
Voir svp le fichier ci-joint ou j'ai mis quelques explications.
Merci d'avance pour l'aide apporter, bonne soirée a tous.
Cdlt Ray
Lien vers fichier.
Bonsoir,
en effet, cela : Cells.Borders().LineStyle = xlNone
efface les bordures de votre plage !
Normale puisque CELLS désigne toutes les cellules de la feuille !
Il faudrait savoir ce qui est "dans " Target et ce que vous voulez faire pour la correction.
Sinon il vous suffit de supprimer la ligne, non ?
@ bientôt
LouReeD
Salut LouReeD,
Merci pour ta réponse, c'est sympa.
J'ai mis en remarque la ligne qui m'ennuie, ça fonctionne toujours mais quand je clic cela m'affiche bien le curseur
mais cela n'efface pas l'ancien curseur.
Du coup a chaque clic 2 curseurs, essaie d'isoler la ligne "Celles.Borders" et tu verra.
Merci pour ton aide, bonne soirée.
Cdlt Ray
Ok alors on efface tout puis on remet les bordures sur votre zone :
Range("A1:J2").Borders().LineStyle = xlContinuous
Ou un truc comme ça
@ bientôt
LouReeD
Salut LouReeD,
Merci pour ta réponse et pour la modification du code.
J'ai adapter a mon petit programme de test que j'ai poster et ça fonctionne.
J'ai donc adapter a mon programme initial "code identique" et la ça fonctionne plus
j'ai déplacer la ligne de code que tu a faites, mais non, rien ni fait.
Du coup, je me suis pencher sur tout le code de mon programme afin de détecter éventuellement un autre intrus
mais la encore je n'ai pas trouver, semblerai que la ligne "Celles.Borders" soit bien la seule coupable.
Si on pouvais faire un autre code qui ferais la même chose c'est a dire entourage des
bordures du curseur actif en rouge.
Ca pourrai sans doute régler mon soucis d'effacement des bordures dans mon programme original.
Merci pour ton aide, bonne journée a toi.
Cdlt Ray
Bonsoir,
au vu de votre dernier message tout est plus clair !
Vous voulez mettre "en bordure" la cellule active afin de mieux la repérer et ceci sans effacer les bordure de votre plage en haut de la feuille.
L'idée : une variable de type Range qui prend les caractéristiques de la cellule sélectionnée, on lui applique les bordures.
Vous cliquez ailleurs, du coup on a toujours en mémoire l'ancienne cellule, c'est la variable de type Range, du coup on lui enlève à elle seule les bordures, et on met en mémoire la nouvelle sélection et on lui applique les bordures.
Il faut juste faire un test de position de la sélection afin que cela n'affecte pas la plage en haut de la feuille.
@ bientôt
LouReeD
Salut LouReeD,
Merci pour la réponse et pour les deux codes.
Donc ça fonctionne bien avec les deux macros.
Mais deux questions svp:
1) Macro(1), Quand on clic le curseur se dessine bien MAIS il y a un petit trait fin rouge qui se dessine aussi.
Q) Peut t'on svp supprimer ou rendre invisible ce petit trait ???
2) Macro(1), qui me semble bien complète.
Q) Serait t'il svp possible d'optimiser le code ???
PS: Tenir compte aussi que je compte mettre des bordures vertes plage A1:J2 et bordures noires plage A3:J100
Merci a toi pour ton aide, bon W-end et bonne journée.
Cdlt Ray