Bonjour, je débute depuis quelque temps en VBA et jusque là j'ai réussi à me débrouiller tout seul mais là je suis face à un problème qui m'énerve depuis quelques jours c'est pourquoi je viens de m'inscrire pour demander votre aide :
J'ai un classeur par année, pour l'instant en fait j'en ai qu'un seul dont le nom est "2014.xlsm" , grâce à un bouton, je génère l'année suivante. Donc dans mon code j'ai :
Dim Sh As Worksheet
Dim classeur2 As String
Dim classeur1 As String
classeur1 = ActiveWorkbook.Name
ancienneannee = ActiveWorkbook.Sheets(12).Range("Y2").Formula (qui me retourne : "2014")
ensuite j'ai du code qui m'exporte toutes mes macros dans un dossier temporaire
Workbooks.Add
classeur2 = ActiveWorkbook.Name
puis du code qui remplit les cellules des feuilles de mon nouveau classeur comme je le désire
et bien sur l'importation des macros et effacement du dossier temporaire
jusqu'ici tout marche nickel et bien sûr le nouveau classeur créé porte un nom du type "Classeur " suivi d'un nombre (comme par défaut ds Excel)
Et là patatra, je veux sauvegarder ce nouveau classeur sous le nom de l'année suivante (donc ici : 2015) dans le même dossier que 2014.xlsm :
j'ai tenté plusieurs choses voilà ou j'en suis :
Dim chemin As String
Dim nomfichier As String
chemin = ThisWorkbook.Path
nom = Format(ancienneannee + 1, Text)
nomfichier = chemin & "\" & nom & ".xlsm"
Workbooks(classeur2).SaveAs nomfichier
et là je comprends pas, non seulement, il me sauvegarde rien et il garde ce nouveau classeur avec un nom "classeur" n mais il me retourne aucune erreur et quand je lance une recherche d'un éventuel fichier "2015.xlsm" sur tous mes hdd : rien !!!!
Qu'est ce qui m'échappe
D'avance merci pour votre aide