Bonjour,

J'ai créé une macro qui récupère certaines informations dans un classeur pour les transposer dans un autre classeur (tableau de suivi). La macro fonctionne très bien sur mon poste, mais quand mon collègue l’exécute sur le sien, il y a le message d'erreur suivant :

Erreur d'exécution '1004' :

La méthode 'Open' de l'objet 'Workbooks' a échoué.

Nous avons la même version d'Excel (à savoir 2003).

Voici la macro :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Sub transpose_NC()
 
 
'Atteindre le formulaire et mémoriser les données
Sheets("Accusé").Select
Range("AS1:AS8").Select
Selection.Copy
 
'Ouvre le fichier tableau NC
 
Workbooks.Open Filename:="G:\QUALITE\4 - DOCUMENTS OPERATIONNELS\Tableau NC 2010-2011.xls"
 
Sheets("Données Recla").Select
 
 
'teste et sélectionne la première ligne vide du tableau données recla
 
Cells(Range("A1").End(xlDown).Row + 1, 1).Select
 
'mémorise le n° de la ligne où coller les données
ligne_active_base = ActiveCell.Row
'collage avec transposition
Range("A" & ligne_active_base).Select
Selection.PasteSpecial Paste:=xlPasteValues, _
operation:=xlNone, skipblanks:=False, Transpose:=True
 
Workbooks("Tableau NC 2010-2011.xls").Close SaveChanges:=True
 
 
'retourner dans le tableau
Range("Accusé!G43").Select
 
End Sub
Si quelqu'un a une explication je suis preneur, personnellement je sèche depuis hier.

Merci