[RESOLU] Erreur d'exécution 4605

[smallville]

Bonjour à tous,

Comme vous l'aurez compris j'ai un message "Erreur d'exécution 4605, cette commande n'est pas disponible"

Ma macro copie des lignes qui forment un tableau depuis Excel et le colle à des signets dans Word, j'aimerais qu'au moment des le coller, que les colonnes correspondent à celle du tableau déjà présent dans Word (le tableau copié est collé juste en dessous du tableau déjà présent...

Si quelqu’un à une idée pour corriger cette erreur !

PS: j'utilise cette commande "Selection.PasteAppendTable" pour coller le tableau, c'est elle qui génère l'erreur
mais voyez plutôt avec les pièces jointes

Merci d'avance.

 

[john]

Re : Erreur d'exécution 4605

Bonjour,

Voilà un fichier, si j'ai bien compris ton soucis.

John

 

[smallville]

Re : Erreur d'exécution 4605

Bonjour John,

Merci pour ton aide, c'est exactement ce que je recherchais.

Mais il y à quand même un dernier petit soucis dans la macro. Quand, dans la colonne ou on fait le test pour chercher le nombre "21", quand il tombe sur un autre nombre il copie quand même la ligne avant de s’arrêter....
De plus il ne teste plus toutes les lignes utilisées, je ne sais pas pourquoi. Quand il trouve 21 il continu et dès qu'il trouve autre chose il s’arrête complètement même si après ces quelques lignes il y en a encore certaine qui contienne "21" dans la colonne.

Regarde le doc Excel tu comprendras peut être mieux qu'avec mes explications ....

 

[john]

Re : Erreur d'exécution 4605

Re,

Ok j'ai vu, une petite erreur dans le code, mais là ça marche

John

 

[smallville]

Re : Erreur d'exécution 4605

re Jhon,

Un énorme Merci pour ton aide, tout fonctionne parfaitement. J'avais trouvé une solution en ajoutant la ligne:
Else: NumLig = NumLig + 1
mais je vais plutôt garder ta solution !

Merci encore je n'y serais pas arriver sans ton aide!
a+

 

[john]

Re : [RESOLU] Erreur d'exécution 4605

no soucis
Bonne journée.
@ la prochaine