Macro fermeture un seul fichier

Résolu/Fermé
jéjé - 13 juin 2010 à 12:27
 jéjé - 14 juin 2010 à 18:20
Bonjour,

J'ai créé une macro (sur un bouton) qui "enregistre sous" d'après le nom et la date et je voudrais fermé le fichier enregistré et non le "modèle".
Quel code dois-je entrer?
J'en suis là:

mydir = "E:\...\"
mystr = mydir & [k18] & " " & [k14] & ".xls"

ActiveWorkbook.SaveAs Filename:=mystr, FileFormat:=xlNormal


Merci pour votre aide =)
A voir également:

1 réponse

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 776
14 juin 2010 à 02:26
Quand tu enregistre sous, ton modèle devient le fichier enregistré

Essaye :


Dim MyWbk As Excel.Workbook

mydir = "E:\..\"
mystr = mydir & [k18] & " " & [k14] & ".xls"

MyFileName = ActiveWorkbook.FullName

ActiveWorkbook.SaveAs Filename:=mystr, FileFormat:=xlNormal

Set MyWbk = ActiveWorkbook

Application.Workbooks.Open Filename:=MyFileName

MyWbk.Close savechanges:=False



Patrice
0
tip top merci beaucoup!
0