Erreur d'exécution 1004
flobod
Messages postés
3
Statut
Membre
-
flobod Messages postés 3 Statut Membre -
flobod Messages postés 3 Statut Membre -
Bonjour je vous appelle à la rescousse car j'ai une erreur sur un fichier excel qui gère un tournoi ATP en cours avec mes élèves.
Lorsque que je rentre un résultat l'erreur s'affiche à chaque fois que je valide.
Je suis nul en informatique je ne sais pas quoi faire.
Merci d'avance
Lorsque que je rentre un résultat l'erreur s'affiche à chaque fois que je valide.
Je suis nul en informatique je ne sais pas quoi faire.
Merci d'avance
A voir également:
- Erreur d'exécution 1004
- Erreur 0x80070643 - Accueil - Windows
- Erreur 4101 france tv - Forum Lecteurs et supports vidéo
- Erreur 4201 france tv ✓ - Forum Réseaux sociaux
- Code erreur f3500-31 ✓ - Forum Bbox Bouygues
- Erreur upes 1025 - Forum Téléviseurs
2 réponses
Bonsoir,
comment te venir en aide sans voir le code ou mieux le fichier sans note confidentielle qu'il est possible de déposer à partir de ce lien
https://www.cjoint.com/
comment te venir en aide sans voir le code ou mieux le fichier sans note confidentielle qu'il est possible de déposer à partir de ce lien
https://www.cjoint.com/
Voici le lien.
Merci d'avance: http://cjoint.com/data3/3AgsMgVckmx.htm
L'erreur se présente qd sur la feuille de résultats je click sur attribuer les points.
Merci d'avance: http://cjoint.com/data3/3AgsMgVckmx.htm
L'erreur se présente qd sur la feuille de résultats je click sur attribuer les points.
Voici l'erreur telle quelle est présentée quand je click sur débogage:
If avec = 2 Then GoTo Suite
MyTab.Cells(1, 9).Select
Do
ActiveCell.Offset(1, 0).Select
If ActiveCell.Value = a Then
ActiveCell.Offset(0, -2).Select
ActiveCell.Value = ActiveCell.Value + 1
Exit Do
End If
C'est la ligne ActiveCell.Offset(1, 0).Select qui est surlignée en jaune.
If avec = 2 Then GoTo Suite
MyTab.Cells(1, 9).Select
Do
ActiveCell.Offset(1, 0).Select
If ActiveCell.Value = a Then
ActiveCell.Offset(0, -2).Select
ActiveCell.Value = ActiveCell.Value + 1
Exit Do
End If
C'est la ligne ActiveCell.Offset(1, 0).Select qui est surlignée en jaune.