Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

petit souci avec Worksheet_SelectionChange

  • Initiateur de la discussion Initiateur de la discussion egman
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

egman

XLDnaute Occasionnel
Bonjour à tous,

une fois de plus je viens faire appel à votre savoir.

Dans une feuille(Sommaire) j'ai fait un sommaire avec des liens hypertextes.

Sur une autre feuille(Feuil1) j'ai plusieurs tableaux les uns à la suite des autres espacés de 10 lignes par exemple.

Sur ma feuille(Sommaire) je vais pointer grace aux liens les premieres cellules de mes tableaux en (Feuil1) Jusque là çà và.

Sur la Feuil1 où j'ai tous mes tableaux j'ai mis un bout de code afin que chaque début de tableau se trouve en haut de page sans pour cela voir les autres.

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
ActiveWindow.ScrollRow = Target.Row
End Sub


Mon petit souci est que lorsque je suis dans un de mes tableaux mon code agit toujours. En fait il faudrait que je puisse une fois dans ma Feuil1 , annuler Ma Sub Worksheet... afin d'effectuer mes modifications sans remonter en haut de page a chaque clic de cellule et qu'à mon retour à ma page Sommaire la Feuil1 retrouve sa fonction Worksheet....

Est ce possible ?

D'avance merci
 
Re : petit souci avec Worksheet_SelectionChange

Bonjour egman
Il est toujours difficile de répondre à des problèmes de ce genre sans support.
A défaut, essayez une structure de ce genre :
Code:
[COLOR="DarkSlateGray"]Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
   If Not Intersect(Target, Range(X)) Is Nothing Then
      ActiveWindow.ScrollRow = Target.Row
   End If
End Sub[/COLOR]
X décrit la plage de cellules qui doivent provoquer l'exécution de la ligne suivante.​
ROGER2327
#1947
 
Re : petit souci avec Worksheet_SelectionChange

Bonjour Egmann, Roger

Sinon il y a pour désactiver les événements le:

Code:
Application.EnableEvents = false

Et le remettre à true quand on veut activer les évènements.

Un petit bouton sur la barre d'outils avec Marche/arrêt et le tour est joué.
 
Re : petit souci avec Worksheet_SelectionChange

Bonjour egman, Roger, le Forum,

Sans fichier c'est difficile de répondre mais je tenterai bien le drapeau qu'on lève (ou abaisse) une fois la l'action réalisée avec une variable booléenne
Voir en PJ

A+

Ouupps pas vu MJ13, faudra que je tente car c'est peut être plus simple...
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
7
Affichages
1 K
Réponses
27
Affichages
2 K
W
Réponses
4
Affichages
987
Willmaz
W
L
  • Résolu(e)
Réponses
3
Affichages
712
lionel340
L
V
Réponses
3
Affichages
1 K
V
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…