Discussion :

[kitty2006]

Bonjour,

je ne connais pas le VBScript mais je dois modifier une commande dans un classeur Excel.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub transfert()
ActiveWorkbook.SaveAs Filename:= _
        "\\lugano\sap\P07_BW\TOR\TW1\AExclure.csv", FileFormat:= _
        xlCSV, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
        , CreateBackup:=False
 
MsgBox ("Votre fichier est bien déposé sur le serveur BW, l'indicateur d'émargement sera rechargé vers 13h.")
 
 
Application.DisplayAlerts = False
ActiveWorkbook.Close
Application.DisplayAlerts = True
 
End Sub

Le problème c'est que j'ai l'erreur 1004 qui s'affiche

Impossible d'accéder au document en lecture seule 'AExclure.csv

Pouvez-vous m'aider pourquoi ai-je cette erreur?

D'avance merci

[CodeFacile]

A priori , ça doit être une erreur d'accès à la ressource "\\lugano\sap\P07_BW\TOR\TW1\" ou alors , il n'y a pas de fichier ouvert .
Ou une protection en ecriture ...

Exécute la commande manuelle , tu auras plus d'infos sur le pb.

PS : je n'ai pas d'info sur l'erreur 1004.