Erreur 9 Bloquante...
Résolu
Le Boulé
-
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
J'ai une erreur 9 "L'indice n'appartient pas à la sélection, et j'ai beau essayer plein de chose je bloque...
Voici le code:
L'erreur ce produit sur la ligneSheets("General")...
Si vous avez une petite idée car la je suis face à un mur.
Je vous remercie Cdl
J'ai une erreur 9 "L'indice n'appartient pas à la sélection, et j'ai beau essayer plein de chose je bloque...
Voici le code:
For I = 1 To TailleTable
'Test Ligne utilisé ou pas
If Sheets("General").Range("B" & I).Value = "" Or ActiveSheet.Range("B" & I).Value = "0" Then
Sheets("generale").Range("A" & LigneCopie).Select.Copy
Sheets("Impresion2").Range("A" & LigneCopie).Paste
LigneCopie = LineCopie + 1
End If
Next I
L'erreur ce produit sur la ligneSheets("General")...
Si vous avez une petite idée car la je suis face à un mur.
Je vous remercie Cdl
A voir également:
- Erreur 9 Bloquante...
- Iptv erreur de lecture - Forum TV & Vidéo
- 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
5 réponses
Bonjour,
Le diagnostic est très simple, c'est que ton indice dépasse ta table.
Regardes probablement comment tu défini 'TailleTable'.
Le diagnostic est très simple, c'est que ton indice dépasse ta table.
Regardes probablement comment tu défini 'TailleTable'.
Bonjour à tous
Il faudrait que tu nous dises sur quelle ligne se produit l'erreur
Peut être comme ceci (tout sur la même ligne de code
Cdlmnt
Il faudrait que tu nous dises sur quelle ligne se produit l'erreur
Peut être comme ceci (tout sur la même ligne de code
Sheets("generale").Range("A" & LigneCopie).Copy Sheets("Impresion2").Range("A" & LigneCopie)
Cdlmnt
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
J'ai utilisé le code suivant qui fonctionne très bien:
Sheets("General").Range("A" & I).Copy _
Destination:=Worksheets("Impression2").Range("A" & LigneCopie)
