Enregistrement commande

bonnandr -  
m@rina Messages postés 27623 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,
Je voudrais enregistrer avec un bouton, a partir d'un fichier mère sous word 2003 "commande"un fichier qui aurait comme nom la date et l'heure et qui s'enregistrerais dans un dossier situé : C:\Documents and Settings\proprietaire\Mes documents/Commandes/archives
Merci de votre aide.
Configuration: Windows XP
Firefox 3.0.11

1 réponse

  1. m@rina Messages postés 27623 Date d'inscription   Statut Modérateur Dernière intervention   11 563
     
    Bonjour,

    Voici la macro à mettre dans ton modèle :

    Sub enregistrement()
    Dim madate, monheure, chemin
    madate = Format(Now, "d-mmmm-yy")
    monheure = Format(Now, "hh-mm")
    chemin = "C:\Documents and Settings\proprietaire\Mes documents/Commandes\archives\"
    
    ActiveDocument.SaveAs FileName:=chemin & madate & "-" & monheure & ".doc"
    
    End Sub


    Il faut que tu affectes cette macro à un bouton situé sur la barre d'outils du modèle. Il peut remplacer le bouton d'enregistrement.

    m@rina

    0