Macro et enregistrement

Fermé
Lentz - 1 sept. 2011 à 14:55
f894009 Messages postés 17217 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 27 décembre 2024 - 1 sept. 2011 à 17:36
Bonjour,

Je cherche a faire une macro qui me permettrai d'avoir le 'pop-up' de "Enregistrer sous" après a mwa de décider le nom de l'enregistrement ainsi que l'emplacement,

Cordialement,
A voir également:

3 réponses

f894009 Messages postés 17217 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 27 décembre 2024 1 712
1 sept. 2011 à 16:28
Bonjour,

FichierCible = Application.GetSaveAsFilename

Devrait convenir.
0
Merci ;)

Je l'utilise apres avoir une nouvelle feuille excel

Et par exemple apres je souhaite naviguer entre les deux feuille,

Comment faire pour que dans mon

windows("nom du fichier").activate

le nom du fichier soit remplacé celui que j'ai enregistré avant !
0
f894009 Messages postés 17217 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 27 décembre 2024 1 712
1 sept. 2011 à 17:10
RE,
Je ne vous comprends pas dans vos explications.
De quelles feuilles parlez-vous???
0
Enfaite la situation est simple:

Je suis sur une feuille nommé Février

et avec une macro je crée le mois suivant (dans l'exemple mars) que je peux enregistré sous juillet si je le souhaite vu qu'avec votre fonction je décide du nom

et pars la suite je navigue entre février et mars (donc les deux fichiers) en faisant diverse opération

mais est-il possible de remplacé les noms de

windows("février.xls").activate
et
windows("mars.xls").activate

afin d'automatisé toutes les opérations que je dois réaliser d'un mois à l'autre?
0
f894009 Messages postés 17217 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 27 décembre 2024 1 712
Modifié par f894009 le 1/09/2011 à 17:47
RE,
Une feuille est dans un classeur. Un classeur est ce que vous appelez un fichier.
Pour le reste, le nom du classeur vous pouvez le recuperer de cette facon:

x = ThisWorkbook.Name & ".xls"

ou

x = ThisWorkbook.Name

a tester parce que ".xls" n'est pas utile dans tous les cas


et vous remplacez windows("février.xls").activate

par windows(x).activate
0