Discussion :

[lucas-18]

Bonjour,

J'aimerais transférer un état via excel dans Mes documents.

Pour l'instant, j'utilise une macro SendObject qui transfère mon état en fichier excel mais qui me l'incorpore dans une page mail (Outlook).

Mais j'aimerais savoir comment transférer un état via excel sur mon PC dans "Mes documents".

Merci d'avance,

[naphta]

Bonjour,

Il faut utiliser la méthode OutputTo :

Code :

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

1
2
3
 
 
docmd.OutputTo(Type Objet, NomObjet, FormatDeSortie, FichierSortie, DémarrageAuto, FichierModèle, Chiffrement, QualitéSortie)

pour le répertoire "contextuel" Mes documents" ici in ze FAQ :

http://access.developpez.com/faq/?pa...p#rep_speciaux

a+

[lucas-18]

Peut-on m'aider svp ? Le problème je pense se situe au niveau du répertoire. Je n'arrive pas à trouver le chemin du répertoire "My Documents".

J'ai en effet le message suivant :

CTX can't save the output data to the file you've selected.

Voici mon code :

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
Private Sub Command49_Click()
On Error GoTo Err_Command49_Click
 
    Dim stDocName As String
 
stDocName = "rpt_fails"
DoCmd.OpenReport stDocName, acNormal
 
DoCmd.OutputTo acOutputReport, "rpt_fails", acFormatXLS, "\\VPBEFAP00101\userdata1\TM14LD\Home\My Documents\ReportCTX\Fails"
 
Exit_Command49_Click:
    Exit Sub
 
Err_Command49_Click:
    MsgBox Err.Description
    Resume Exit_Command49_Click
 
End Sub

[lucas-18]

J'ai bien réussi mais pas dans Mes Documents :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Command61_Click()
On Error GoTo Err_Command61_Click
 
DoCmd.OutputTo acOutputReport, "rpt_liquidation1", acFormatXLS, "Y:\Contentieux\Bad Debt & Arrears\CTX\Legal procedures\Liquidation\Liquidation" & Fails & ".xls"
 
Exit_Command61_Click:
    Exit Sub
 
Err_Command61_Click:
    MsgBox Err.Description
    Resume Exit_Command61_Click
 
End Sub

J'ai lu le tuto avec les répertoires spéciaux mais je n'ai pas compris ; j'implore votre aide svp