Je soutiens Excel Downloads
Connexion
S'inscrire
Effectuez une recherche sur Excel Downloads...
Effectuez une recherche sur Excel Downloads...
Rechercher dans les titres uniquement
Par:
FORUMS
Nouveaux messages
Rechercher dans les forums
TÉLÉCHARGEMENTS
POUR LES PROFESSIONNELS
Gestion commerciale
Gestion de projets
Gestion du personnel
Tableaux de bord
Comptabilité
Immobilier
Bourse
POUR LES PARTICULIERS
Budgets et comptes
Plannings et calendriers
UTILITAIRES
LEÇONS ET TUTORIAUX
Fonctions Excel
Vba
RESSOURCES PEDAGOGIQUES
Rechercher une ressource
ACTUALITÉS
TUTOS
EXCEL
FORMULES ET FONCTIONS
VBA
POWER QUERY
POWER PIVOT
POWER BI
AUTRES APPLICATIONS
Recherche de tutos vidéos
Connexion
S'inscrire
Quoi de neuf
Effectuez une recherche sur Excel Downloads...
Effectuez une recherche sur Excel Downloads...
Rechercher dans les titres uniquement
Par:
Nouveaux messages
Rechercher dans les forums
Menu
Connexion
S'inscrire
Installer l'application
Installer
FORUMS
Questions
Forum Excel
Macro désactivé
JavaScript est désactivé. Pour une meilleure expérience, veuillez activer JavaScript dans votre navigateur avant de continuer.
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
.
Répondre à la discussion
Message
<blockquote data-quote="farid" data-source="post: 20461552" data-attributes="member: 203450"><p>Bonjour,</p><p><strong>je vais essayé d'expliquer mon souci.</strong></p><p><strong>j'ai cette macro sur le classeur TEST qui fonctionne très bien en cliquant sur une des cellules de la colonne j'ouvre bien le classeur B qui se trouve dans le dossier Archive-2021.</strong></p><p>Private Sub Worksheet_BeforeDoubleClick(ByVal target As Range, Cancel As Boolean)</p><p>noligne = target.Row</p><p>If Not Intersect(target, Range("A:A")) Is Nothing Then</p><p>If target.Value = "" Then Exit Sub</p><p>Range("BB1") = target.Row</p><p>nom = target.Value</p><p>rep = ActiveWorkbook.Path & "\Archive-2021\"</p><p>Workbooks.Open rep & nom & ".xlsm"</p><p>End If</p><p>End Sub</p><p></p><p><strong>Lorsque je ferme le classeur B via une macro , je reviens sur le classeur A, jusqu'ici tous fonctionne bien .</strong></p><p><strong>mon souci , lorsque je reclique sur une des cellules de la colonne A du classeur test le curseur clignote et je ne peux pas ouvrir le classeur. Pour ce faire je dois cliquer sur le bouton reset de la macro</strong></p><p>Sub Reset()</p><p>Application.EnableEvents = True</p><p>End Sub</p><p></p><p><strong>et ensuite je peux a nouveau cliquer dans l'une des cellules de la colonne A du classeur TEST et ouvrir a nouveau le classeur B dans le dossier Archive-2021.</strong></p><p><strong></strong></p><p><strong>La question :</strong></p><p><strong>serait-il possible d'éviter a chaque fois de faire une reset pour que la macro Private Sub Worksheet_BeforeDoubleClick(ByVal target As Range, Cancel As Boolean) </strong></p><p><strong>soit fonctionnelle , ou alors est-ce possible d'intégrer reset ?</strong></p><p></p><p>merci pour votre retour</p></blockquote><p></p>
[QUOTE="farid, post: 20461552, member: 203450"] Bonjour, [B]je vais essayé d'expliquer mon souci. j'ai cette macro sur le classeur TEST qui fonctionne très bien en cliquant sur une des cellules de la colonne j'ouvre bien le classeur B qui se trouve dans le dossier Archive-2021.[/B] Private Sub Worksheet_BeforeDoubleClick(ByVal target As Range, Cancel As Boolean) noligne = target.Row If Not Intersect(target, Range("A:A")) Is Nothing Then If target.Value = "" Then Exit Sub Range("BB1") = target.Row nom = target.Value rep = ActiveWorkbook.Path & "\Archive-2021\" Workbooks.Open rep & nom & ".xlsm" End If End Sub [B]Lorsque je ferme le classeur B via une macro , je reviens sur le classeur A, jusqu'ici tous fonctionne bien . mon souci , lorsque je reclique sur une des cellules de la colonne A du classeur test le curseur clignote et je ne peux pas ouvrir le classeur. Pour ce faire je dois cliquer sur le bouton reset de la macro[/B] Sub Reset() Application.EnableEvents = True End Sub [B]et ensuite je peux a nouveau cliquer dans l'une des cellules de la colonne A du classeur TEST et ouvrir a nouveau le classeur B dans le dossier Archive-2021. La question : serait-il possible d'éviter a chaque fois de faire une reset pour que la macro Private Sub Worksheet_BeforeDoubleClick(ByVal target As Range, Cancel As Boolean) soit fonctionnelle , ou alors est-ce possible d'intégrer reset ?[/B] merci pour votre retour [/QUOTE]
Insérer les messages sélectionnés…
Vérification
Répondre
FORUMS
Questions
Forum Excel
Macro désactivé
Texte copié dans le presse-papier
