Discussion :

[E.Zelie]

Bonjour,

Je rencontre actuellement un problème qui se produit sur un ordinateur mais pas sur un autre.
J'ai une macro dans Excel qui sert à exporter des données de Excel vers Word et également à supprimer des lignes d'un tableau dans Word.
La partie export des données vers le document word marche très bien.
Le bug se produit à l'étape de suppression de la ligne dans le tableau dans word.
Le message suivant apparaît : Erreur 5941 le membre de la collection requis n'existe pas

Le code en question est le suivant :
WordDoc.Tables(7).Rows(6).Delete

Lorsque je fais fonctionner la macro "pas à pas" cela fonctionne et supprime bien la ligne en question. Mais lorsque je la lance en cliquant sur un bouton ça ne fonctionne pas et m'affiche le message d'erreur.


Par ailleurs, ce problème se produit uniquement sur un PC et pas sur les autres.
La version d'excel est bien la même il s'agit de 2010 32 bits sur tous les postes et le système d'exploitation de 64 bits
Même référence outlook Microsoft office 14.0 Object library.

Je vous remercie par avance pour vos réponses.

[Invité]

Bonjour,

Avez-vous essayé de décompter le nombre de tables et de lignes sur le document où vous constatez le problème ?

Ce code vous donnera le nombre de lignes pour chaque table du document dans la fenêtre d'exécution :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Sub EssaiTables()
 
Dim I As Integer
 
    With ActiveDocument
        For I = 1 To .Tables.Count
            Debug.Print "Table(" & I & ") : Nombre de lignes : " & .Tables(I).Rows.Count
        Next I
    End With
 
End Sub

Il vous faut vérifier également que les tableaux sont bien séparés par une ligne autre qu'un format tableau.

[E.Zelie]

Bonjour,

J'ai bien vérifié la table 7 contient 6 lignes. D'ailleurs, sur d'autres pc cela supprime très bien cette ligne.

Qu'entendez vous par : "tableaux sont bien séparés par une ligne autre qu'un format tableau."?

Je vous remercie par avance pour votre retour

Bien cordialement.

[Invité]

Qu'entendez vous par : "tableaux sont bien séparés par une ligne autre qu'un format tableau."?

Cela veut dire que si deux tables ne sont séparés par aucune ligne Word, les deux tables seront considérées comme une seule.
Avez-vous testé le code transmis ?

[E.Zelie]

Oui j'ai bien testé votre code.

Ci-dessous le résultat :

Table(1) : Nombre de lignes : 4
Table(2) : Nombre de lignes : 6
Table(3) : Nombre de lignes : 6
Table(4) : Nombre de lignes : 3
Table(5) : Nombre de lignes : 5
Table(6) : Nombre de lignes : 1
Table(7) : Nombre de lignes : 6
Table(8) : Nombre de lignes : 1
Table(9) : Nombre de lignes : 1
Table(10) : Nombre de lignes : 1
Table(11) : Nombre de lignes : 1

[Invité]

OK. J'imagine que vous avez placé ce code juste avant la ligne de code supprimant la ligne 6.
Sinon, y a-t-il un nombre variable de lignes supprimées selon les PC ? Si oui, y a t-il d'autres lignes supprimées avant la ligne 6 sur le PC ? Si oui, commencer la suppression par la fin du tableau.
Peut-être devriez-vous tester le contenu d'une cellule de la ligne 6 juste avant sa suppression sur deux PC pour voir les écarts.
Sinon désolé, je ne vois pas.

Bon courage.