Discussion :

[frodon33]

Bonsoir à tous,

Voici mon petit soucis: je dois exporter des données Access vers un fichier Excel se trouvant sur un chemin réseau différent de ma dorsale : voici le code que j'ai écrit:

Code :

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

1
2
3
Public Function TransfertExcelAàC()
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Requête_Export_p210ABL_Excel", "M:\n06lbth\Patients rés A à C new.xls", True, "Feuil1"
End Function

Cela fonctionne mais je souhaiterais écrire plutôt ceci:

Code :

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

1
2
3
Public Function TransfertExcelAàC()
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Requête_Export_p210ABL_Excel", "\\Chu01nasbur6\n06lbth\Patients rés A à C new.xls", True, "Feuil1"
End Function

Cette ligne de commande m'avertit que le fichier Excel est ouvert en lecture seule ou n'est pas accessible!!!.
Comment récupérer le chemin réseau pour qu'il soit possible d'exporter de n'importe quel poste connecté sans avoir à mentionner la lettre du lecteur logique ( M:\ ou P:\)??
Merci d'avance de votre compréhension, je n'écris pas souvent sur ce forum. Merci de vos réponses éclairées

[marot_r]

Bonjour.

Je viens de faire une petit test et cela semble fonctionner.

Code :

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

1
2
    DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Table1", "C:\MonChemin\Table1.xls"
    DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Table1", "\\MonServeur\MonChemin\Table1.xls"

Vérifie que le chemin d'accès est bon.

Essaye avec

Code :

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

debug.print dir("\\Chu01nasbur6\n06lbth\*.*")

Il se peut que M: ne soit pas mappé sur la racine du disque mais sur un sous-répertoire.

A+

[micniv]

bonjour,
Marot_r a raison : tu as remplacé M par le seul nom du serveur, il manque le nom du partage

Cdlt

[frodon33]

Bonsoir Marot R,
J'ai bien lu ton message: en faisant un" Debug.print dir sur le chemin du serveur "\\Chu01nasbur6\" le sous-répertoire et le joker "*.*" pour avoir le nom du fichier, dans le fenêtre de la console ce fichier apparaît bien , donc le chemin est reconnu. Mais en le déclarant comme je l'ai fait j'ai toujours le même message d'erreur: "Impossible d'ouvrir le fichier car déjà ouvert ou en lecture seule"???? Je ne comprends pas d'autant plus que j'utilise ce chemin de serveur pour d'autres procédure dont une sauvegarde. C'est à n'y rien comprendre.
Avez-vous d'autres solutions à me proposer?
D'avance merci pour ta réponse. Bien cordialement.

[micniv]

Je me permets d'insister :
as-tu vérifié quel est le mappage de M: (c'est toujours de la forme \\serveur1\partage1) ?

cdlt