Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Re bonsoir,
J'ai repris ton code modifié avec Timer.
Effectivement il y a un toujours un dépassement de la capacité de la pile.
J'essaye de la contourner en gérant l'erreur de la manière suivante:
Sub Lanceur()
On Error GoTo ErreurPile
...
...
ErreurPile:
If Err.Number = 28 Then...
J'ai étudié ta procédure avec application.ontime. Elle fonctionne bien, mais le mouvement des segments est moins lissé, c'est pourquoi j'avais essayé avec Timer qui permet de descendre l'incrément de temps en-dessous de la seconde.
Comme tu l'as suggéré, j'ai mis le code dans un module. Il est...
Bonsoir,
Voici mon fichier.
J'ai désactiver la partie qui intercepte le message d'erreur.
J'ai créer 2 boutons pour démarrer et arréter le programme récursif en cas de problème
Depuis ce matin, j'ai longuement utiliser mon classeur. En réalité il ne fonctionne pas si bien que cela. Excel...
Merci Yeajou, ton idée m'a permis de résoudre mon problème😁.
Bien que je ne sache toujours pas pourquoi je ne peux modifier l'objet!:(
Voici ma sub Lanceur modifiée:
Sub Lanceur()
'Procédure récursive qui permet d'appeler FiweSegment tous les Delta seconde
On Error GoTo ErreurClavier...
Bonjour Yeahou,
Mon but est de rendre fixe par rapport à l'écran les segments d'un tableau structuré quand on le consulte via les flèches du clavier ou de la souris.
J'ai presque réussi avec les programmes suivants, mais gros bémol, quand je veux modifier le contenu d'une cellule j'ai un message...
Bonjour,
Est-il possible de détecter l'appuie sur n'importe qu'elle touche du clavier lorsque l'on est sur une feuille de calcul?
Je pense à utiliser Keypress, mais je ne sais pas comment m'y prendre.
Merci
Bonjour,
y a t il un moyen de détecter si la molette de la souris est activée?
Si c'est le cas il est possible de laisser en permanence les segments à l'écran
Bonjour,
J'ai trouvé une solution qui passe par ActiveWindow.VisibleRange.
La voici (Il y a 4 segments concernés):
Sub Worksheet_SelectionChange(ByVal Target As Range)
'Cale les segments prédéfinis sur la première ligne visible de l'écran
'Pour un gain de temps, aucune vérification d'existence...
Bonsoir,
Effectivement cela fonctionne, mais ce n'est pas top.
Il faudrait connaitre en permanence la première ligne visible à l'écran d'une feuille excel, ou bien positionner un segment non pas à partir d'une cellule mais à partir du bord supérieur de l'écran.
Est ce possible?
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.