Erreur 9 Bloquante...

Résolu
Le Boulé -  
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:
  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...
  • Erreur s3 bbox - <a href="https://forums.commentcamarche.net/forum/bbox-bouygues-285">Forum Bbox Bouygues</a>
  • Erreur 4101 - <a href="https://forums.commentcamarche.net/forum/carte-graphique-181">Forum Carte graphique</a>
  • Iptv erreur de lecture - <a href="https://forums.commentcamarche.net/forum/tv-video-21">Forum TV & Vidéo</a>
  • Erreur France TV : impossible de lire les vidéos en replay - <a href="https://forums.commentcamarche.net/forum/lecteurs-et-supports-video-245">Forum Lecteurs et supports vidéo</a>
  • Erreur 3000 france tv - <a href="https://forums.commentcamarche.net/forum/lecteurs-et-supports-video-245">Forum Lecteurs et supports vidéo</a>

5 réponses

gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 742
 
Bonjour,

Le diagnostic est très simple, c'est que ton indice dépasse ta table.

Regardes probablement comment tu défini 'TailleTable'.
0
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
 
Bonjour

Sheets("General").

puis
Sheets("generale").
 Michel
0
Le Boulé
 
Effectivement c'est une erreur de syntaxe...
par contre je suis passer en erreur 424 "Objet requis"
0
ccm81 Messages postés 11033 Statut Membre 2 434
 
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
Sheets("generale").Range("A" & LigneCopie).Copy             Sheets("Impresion2").Range("A" & LigneCopie)


Cdlmnt
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Le Boulé
 
J'ai utilisé le code suivant qui fonctionne très bien:
Sheets("General").Range("A" & I).Copy _
Destination:=Worksheets("Impression2").Range("A" & LigneCopie)
0
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
 
Comme te l'as suggéré gentiment CCM81

Il faudrait que tu nous dises sur quelle ligne se produit l'erreur

ou mieux, tout le code
de plus, continue à ne pas dire Merci aux 3 personnes qui essaient de t'aider..;

MERCI
0