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

XL 2019 Erreur exécution 9

M

matmac

XLDnaute Occasionnel
Bonjour,

J'avais posté à la suite d'un premier post concernant le même fichier et un autre bug (résolu depuis), mais je n'ai pas eu de réponse, je créé donc un nouveau post.
J'ai donc un bug sur le fichier joint : lorsque je lance le chrono sur la feuille "Chrono + Classement" en cliquant sur l’icône triangle, puis que j'ouvre un autre un autre fichier excel en parallèle, le chrono s'arrête et j'ai un message d'erreur "erreur d'exécution '9' l'indice n'appartient pas à la sélection". J'ai fait une capture d'écran de la boite de dialogue de débogage, avec la ligne surlignée en jaune.
Je met en pj la capture d'écran et le fichier.

Merci par avance
Mat
 

Pièces jointes

  • Capture d’écran 2021-10-20 085222.png
    98.1 KB · Affichages: 28
  • Run&Bike OT V21.3.2.xlsm
    161.1 KB · Affichages: 5
Solution
Bonsoir Matmac, le forum

Votre commande se référe au classeur actif
Quand vous ouvrez un nouveau classeur, il devient le classeur actif, et comme il ne contient pas la feuille "chrono+classement", ça plante !
remplacez votre ligne par celle ci qui cible pour la feuille le classeur contenant la macro exécutée.

Bien cordialement, @+
VB: 
ThisWorkbook.Sheets("Chrono+Classement").Range("O2").Value = Time - depart + (ThisWorkbook.Sheets("Chrono+Classement").Range("T2").Value / 1440)

ou en reprenant la macro avec un with en n'oubliant pas les points devant les range
VB: 
Public Sub go_Chrono()
    'Programmation de l'évènement toutes les secondes
    temps = Now + TimeValue("00:00:01")
    Application.OnTime temps, "go_Chrono"
    With...
Trier par date Trier par votes

Bernard_XLD

XLDnaute Barbatruc
Membre du Staff
Supporter XLD
Bonsoir Matmac, le forum

Votre commande se référe au classeur actif
Quand vous ouvrez un nouveau classeur, il devient le classeur actif, et comme il ne contient pas la feuille "chrono+classement", ça plante !
remplacez votre ligne par celle ci qui cible pour la feuille le classeur contenant la macro exécutée.

Bien cordialement, @+
VB: 
ThisWorkbook.Sheets("Chrono+Classement").Range("O2").Value = Time - depart + (ThisWorkbook.Sheets("Chrono+Classement").Range("T2").Value / 1440)

ou en reprenant la macro avec un with en n'oubliant pas les points devant les range
VB: 
Public Sub go_Chrono()
    'Programmation de l'évènement toutes les secondes
    temps = Now + TimeValue("00:00:01")
    Application.OnTime temps, "go_Chrono"
    With ThisWorkbook.Sheets("Chrono+Classement")
        .Range("O2").Value = Time - depart + (.Range("T2").Value / 1440)
    End With
End Sub
 
Vote positif 0 Vote négatif
Solution
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

M
  • Résolu(e)
Microsoft 365 [Résolu] Bouton nommé par exemple C qui va chercher les mots commençants par C dans une colonne
Réponses
13
Affichages
275
Marboi
M
S
  • Question
Microsoft 365 Problème chrono dans un fichier excel lorsque 2 fichiers sont ouverts
2
Réponses
15
Affichages
830
steph67
S
A
  • Question
Microsoft 365 zones nommées qui ne respectent pas les limites données
2
Réponses
20
Affichages
601
Staple1600
F
  • Question
XL 2021 création d'un fichier "xlsm"
Réponses
5
Affichages
308
flag06
F
K
  • Question
Microsoft 365 Valeur cible manquant
Réponses
2
Affichages
365
kapo
K
C
  • Résolu(e)
XL 2021 Colonne décalée dans une requête
Réponses
2
Affichages
405
cgpa
C
R
  • Question
XL 2021 Erreur 6 dépassement de capacité
Réponses
5
Affichages
255
patricktoulon
T
  • Question
Microsoft 365 Macro archivage
Réponses
9
Affichages
510
Phil69970
R
  • Question
Microsoft 365 Erreur d'exécution '9': L'indice n'appartient pas à la selection
Réponses
1
Affichages
355
ChTi160
E
  • Question
XL 2021 Création simulateur
Réponses
2
Affichages
364
ElodieFo
E
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…