Erreur 9 Bloquante...

Résolu

Le Boulé -
michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention - 17 mars 2017 à 12:22

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 0x80070643 - Accueil - Windows
Erreur 0x80070643 Windows 10 : comment résoudre le problème de la mise à jour KB5001716 - Accueil - Windows
Erreur 4201 france tv ✓ - Forum Réseaux sociaux
J'aime par erreur facebook notification - Forum Facebook
Erreur lors de l'enregistrement du contact - Forum Xiaomi

5 réponses

Réponse 1 / 5

gbinforme Messages postés 14946 Date d'inscription Statut Contributeur Dernière intervention 4 724

Bonjour,

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

Regardes probablement comment tu défini 'TailleTable'.

Réponse 2 / 5

michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention 3 313

Bonjour

Sheets("General").

puis
Sheets("generale").
Michel

Réponse 3 / 5

Le Boulé

Effectivement c'est une erreur de syntaxe...
par contre je suis passer en erreur 424 "Objet requis"

Réponse 4 / 5

ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention 2 433

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

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

Posez votre question

Réponse 5 / 5

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)

michel_m Messages postés 16602 Date d'inscription Statut Contributeur Dernière intervention 3 313

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

Discussions similaires

Voxbone ? qui est-ce ?

Erreur 3005 sur France TV

Code erreur 3000

Problème streaming France 2

Panne T32 sur telecommande Orange

Votre réponse

Discussions similaires