Votre question

Sauvegarde + chemin + nom

Tags :
  • format
  • Programmation
Dernière réponse : dans Programmation
30 Juillet 2008 14:28:09

Bonjour à vous tous,

Ca fais plusieurs que je me creuse la tete et mon programme a trop d'erreurs pour marcher !

J'ai un classeur ("Fiche d'intervention.xls") et dans ce classeur une feuille ("Fiche d'intervention") que je voudrais copier et enregistrer dans un nouveau classeur.

Le classeur ("Fiche d'intervention.xls") est dans :
G:\Common\ASTREINTES

La feuille contient la date d'écriture de la fiche. J'aimerais creer un dossier par année (que le dossier se creer automatiquement lors du changement d'année) pour enregistrer mes sauvegardes dans :
G:\Common\ASTREINTES\Sauvegardes\ + année

et nommer mon classeur automatiquement :
"Fiche d'intervention n° " & [B5] & " du " & Format(Range("B11"), "dd.mm.yy") & " à " & Format(Range("B12"), "hh:mm") & ".xls"

Si vous trouvez la solution à mon probleme ca m'aiderait beaucoup !

Merci d'avance,

Bonne journee! :) 

Autres pages sur : sauvegarde chemin nom

31 Juillet 2008 09:17:00

Si vous manquez d'informations n'hésitez pas !

Voici ce que j'ai écrit et mes erreurs !

  1. Sub Sauvegarde_Click()
  2.  
  3. 'increment de ma sauvegarde
  4. [B5] = [B5] + 1
  5. Range("C11").Value = Format(Range("B11"), "yy")
  6.  
  7. 'enregistrement
  8. Dim Fichiersauvegardes As String
  9. Dim Chemin As String
  10. Dim adressedossier As String
  11.  
  12. Chemin = "G:\Common\ASTREINTES\Sauvegardes"
  13. Chemin = Chemin & "\"
  14. Fichiersauvegarde = ActiveWorkbook.name
  15. Workbooks.Add
  16. DoEvents
  17. Workbooks("Fiche d'intervention.xls").Worksheets("Fiche d'intervention").Copy _
  18. Before:=ActiveWorkbook.Sheets(1)
  19. Fichiersauvegarde = "Fiche d'intervention n° " & [B5] & " du " & Format(Range("B11"), "dd.mm.yy") & " à " & Format(Range("B12"), "hh:mm") & ".xls"
  20. DoEvents
  21. [color=#ff1c00] ActiveWorkbook.SaveAs Filename:= _
  22. Chemin & Fichiersauvegarde[/color]
  23. ActiveWorkbook.Close
  24.  
  25. End Sub


L'erreur dans mon code est en rouge!
de plus je souhaiterais créer différents dossiers pour enregistrer mes sauvegardes par annee !

merci d'avance

bonne journee

Tom's guide dans le monde
  • Allemagne
  • Italie
  • Irlande
  • Royaume Uni
  • Etats Unis
Suivre Tom's Guide
Inscrivez-vous à la Newsletter
  • ajouter à twitter
  • ajouter à facebook
  • ajouter un flux RSS