Erreur automation dans un fichier Excel
Bonjour,
Je rencontre une erreur d'automation sur un fichier qui fonctionnait bien jusque là.
L'erreur est la suivante :
Citation:
Erreur d'exécution '-2147319767 (80028029)' :
Erreur Automation
Référence future non valide, ou référence à un type non compilé
Ca arrive sur mes différentes macro, dont celle-ci, toute simple :
Code:
1 2 3 4 5 6
| Private Sub Workbook_AfterSave(ByVal Success As Boolean)
Sheets("Cartouche").Cells(4, 7).Value = Now
Sheets("Cartouche").Cells(4, 7).NumberFormat = "dd/mm/yyyy"
End Sub |
Ou, dans cet extrait d'une macro un peu plus longue, dès le démarrage (le tableau en question, nommé Tab_VRP est filtré, pour voir si la "défiltration" fonctionne) :
Code:
1 2 3 4 5 6 7 8 9 10 11 12
| Sub Transfert()
Dim Tournée As String, ToDo As String
' DEFILTRAGE TABLEAU RECAP
With Sheets("SuiviAVP")
If .AutoFilterMode Then
.Cells.AutoFilter
End If
End With
[...] |
L'erreur arrive à la ligne "If . AutoFilterMode Then".
Auriez-vous des pistes pour moi ? D'avance, je vous remercie.