Sauvegarde automatique à partir d'une macro

Fermé
Homer - 21 avril 2008 à 11:27
Ivan-hoe Messages postés 433 Date d'inscription dimanche 17 février 2008 Statut Membre Dernière intervention 17 octobre 2008 - 23 avril 2008 à 10:49
Bonjour,


Débutant en macro, je suis en train de faire une macro visant à enregistrer les différents onglets d'un fichier excel dans des fichiers spécifiques à chacun d'eux

Ainsi,
mon onglet A est enregistré dans un fichier nommé "A - semaine 16.xls"
mon onglet B est enregistré dans un fichier nommé "B - semaine 16.xls"
.......

Comment puis-je faire pour que la macro me demande quel numéro de semaine doit être affecté à l'enregistrement. En clair, la semaine prochaine, il faudra que les enregistrements se fassent sous "A - semaine 17"

Merci de votre aide

1 réponse

Ivan-hoe Messages postés 433 Date d'inscription dimanche 17 février 2008 Statut Membre Dernière intervention 17 octobre 2008 309
23 avril 2008 à 10:49
Bonjour Homer,
tu peux très simplement utiliser une InputBox.
définis au préalable une variable numero de semaine, que tu utiliseras ensuite pour composer ton nom de fichier

Dim NumeroSemaine As String
NumeroSemaine = InputBox("Quelle semaine ?")

Si tu fais "Annuler", prévois une porte de sortie :
If NumeroSemaine = Empty Then Exit Sub '(par exemple)

Tu peux aussi faire en sorte que ton Inputox te propose par défaut le numéro de semaine en cours
NumeroSemaine = InputBox("Quelle semaine ?", , Application.WorksheetFunction.WeekNum(Date))

I.
1