[VBA] Probleme pour sauvegarder un classeur

Probleme pour sauvegarder un classeur [VBA] - VB/VBA/VBS - Programmation

Marsh Posté le 12-01-2006 à 10:58:50    

Bonjour,
 
j'ai un souci pour sauvegarder mon nouveau classeur excel avec un nom deja formaté
 

Code :
  1. Sub Enregist()
  2. Dim MyBook As Workbook
  3. Dim Newbook As Workbook
  4. Dim NomDuFichier As Variant
  5. Set MyBook = ThisWorkbook
  6. Set Newbook = Workbooks.Add(xlWBATWorksheet)
  7. NomDuFichier = "[" & UserForm1.TextBoxNom.Value & "][" & UserForm1.TextBoxDate.Value & "]"
  8. Workbooks(MyBook.Name).Sheets("Base" ).Copy Before:=Workbooks(Newbook.Name).Sheets(1)
  9. Application.DisplayAlerts = False
  10. Workbooks(Newbook.Name).Sheets("Feuil1" ).Delete
  11. ActiveWorkbook.SaveAs Filename:=NomDuFichier
  12. Workbooks(MyBook.Name).Activate
  13. End Sub


http://img299.imageshack.us/img299/824/untitled1copy8wd.th.jpg
 
NomDuFichier = [Julien][19/07/1980].xls par exemple  
 


Message édité par sakuraba le 12-01-2006 à 15:34:35
Reply

Marsh Posté le 12-01-2006 à 10:58:50   

Reply

Marsh Posté le 12-01-2006 à 11:06:30    

À l'exécution NomDuFichier contient quelle valeur ?

Reply

Marsh Posté le 12-01-2006 à 11:18:31    

N'oublies pas de remettre ton Application.DisplayAlerts à True à la fin de ta macro...


---------------
Proverbe chinois: il vaut mieux apprendre à pêcher à un mendiant que de lui donner du poisson...
Reply

Marsh Posté le 12-01-2006 à 11:20:15    

Est-ce qu'il ne faut pas mettre NomDuFichier en String plutôt qu'en Variant ? Ca passerait peut être mieux ?


---------------
Proverbe chinois: il vaut mieux apprendre à pêcher à un mendiant que de lui donner du poisson...
Reply

Marsh Posté le 12-01-2006 à 11:21:50    

Si on avait aussi le message d'erreur ou le symptôme exact ça serait mieux... parce que « j'ai un souci » est un peu vague.


Message édité par tegu le 12-01-2006 à 11:22:30
Reply

Marsh Posté le 12-01-2006 à 15:38:46    

voila j'ai rajouter l'erreur

Reply

Marsh Posté le 12-01-2006 à 16:11:41    

ton problème vient des [ et des ]et des / il ne sont pas admis pour le nom d'un fichier :)  
 
et dans ta macro ta variable NomDuFichier doit avoir cette forme :
 "c:\rep1\...\nomdufichier.xls"
@+ :D


---------------
Je bidouillle c'est sur... Mais j'essaye de faire en sorte que ça marche ;-)
Reply

Marsh Posté le 12-01-2006 à 16:42:44    

Mets plutôt un titre du style : julien_1980_07_19.xls
 
En plus, c'est plus facile à trier dans l'ordre croissant...


---------------
Proverbe chinois: il vaut mieux apprendre à pêcher à un mendiant que de lui donner du poisson...
Reply

Marsh Posté le 13-01-2006 à 11:12:53    

ok c est fait merci

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed