Renommer et duppliquer
Bonjour à vous ,
je sollicite vos conseils car pour le moment je coince totalement.
J'ai un fichier que je souhaite dupliquer et renomer .
je m' explique je dois utiliser ce tableau tous les jours , du coup je souhaite via VBA ( surement en utilisant une boucle) que le fichier me duplique à la chaine en faisant l'opération suivante :
jour ( en cellule A2) = jour + 1
enregistrer le fichier avec le nom + la date ( la nouvelle date du coup )
l'idée c est que je puisse faire une boucle et les passer en grande série ( exemple du 1 au 30 de tel mois, si je dois faire mois par mois c est pas un soucis) ... mais avec mon code ça ne veut absolument pas marcher :
Sub EnregistrerSous()
Dim Chemin, nom
Chemin = "C:\Users\Desktop\Aout"
For L = 1 To 30
Range("a2") = Range("a2") + 1
ActiveWorkbook.SaveAs Filename:=Chemin & "TEST" & Range("a2")
Next
End Sub
je met le fichier en pièce jointe si quelqu'un a une idée je suis preneur
Merci à vous pour votre aide.
Bonjour,
pas testé mais si tu enregistre avec une date dans le nom du fichier cela ne fonctionnera pas
utilise format(range("a2"),"yyyy-mm-dd") au lieu de range("a2")
Bonjour,
j'ai testé mais j'ai toujours cette même erreur ....
Bonjour,
avant d'enregistrer, fais un msgbox avec le nom du fichier et donne nous une copie d'écran
je pense aussi qu'il manque un \ derrière chemin
j'ai un doute pour afficher le nom c est :
msgbox(wb.name) ?
C' est bon j' ai réussi
Tu avais raison en fait il manquait effectivement un / dans le chemin ...
Merci beaucoup pour ton aide
Le principal est que tu aies trouvé par toi-même. C'est comme cela que l'on progresse.
Utilise aussi debug.print et fais Ctrl+G dans le fenêtre VBA pour mettre au point tes programmes.