Erreur d'execution '1004' sur un FTP

Françoise -  
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,

j'ai changé de version excel (de 2002 sp3 on est passé à 2003 sp3) et depuis j'ai un problème sur les transfert ftp :

Erreur d'execution '1004'
Microsoft Office Excel ne peut accéder au fichier :
" ftp://serveur/repertoire/nom_fic"

cette macro fonctionnait très bien en vesion 2002 et plus en version 2003.
par le ftp normal j'y arrive sans souci, sous macro non

manque t-il quelque chose à l'instal ?

Françoise
A voir également:

2 réponses

pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 768
 
Bonjour,
Dans :
" ftp://serveur/repertoire/nom_fic"
nom_fic est une variable?
Si oui alors il faut utiliser :
" ftp://serveur/repertoire/" & nom_fic
0
Françoise
 
merci Pijaku pour ta réponse

voici mon code :
Workbooks.OpenText Filename:="ftp://CLST5" & monCode, Origin _
:=xlMSDOS, StartRow:=1, DataType:=xlFixedWidth, FieldInfo:=Array(0, 1), TrailingMinusNumbers:=True

& monCode étant mon nom de fichier.

je penche de plus en plus vers un pb d'install car cette macro fonctionne bien avec ma version précédente.
l'inconvénient est que je ne trouve pas où le bat blesse ! (et cela me prend la tête !)
0
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 768
 
Bonjour,
Essaye un simple :
Workbooks.OpenText Filename:="ftp://CLST5" & monCode
Attention toutefois à bien vérifier que tout, j'ai bien tout est bon dans la variable monCode.
Elle doit :
- être déclarée As String
- comporter tous les éléments du chemin, y compris le "/" qui doit suivre le nom de répertoire CLST5

exemple :
NE FONCTIONNE PAS :
Dim monCode As String 
monCode = "NomDuFichier.doc" 
Workbooks.OpenText Filename:="ftp://CLST5" & monCode

FONCTIONNE :
Dim monCode As String 
monCode = "NomDuFichier.doc" 
Workbooks.OpenText Filename:="ftp://CLST5" & "/" & monCode

Ok?
0