Bonjour à tous,
J'ai fichier où une de mes macros doit m'enregistrer le fichier ouvert dans un emplacement et avec nom prédéfini par la macro. Mais pour l'instant, la macro qui fonctionne correctement, m'enregistrer tout le classeur et je ne parviens pas à trouver le bout de code qui me permettrait de n'enregistrer que la feuille active (cet à dire "Feuil(1)").
Voici mon code :
Sub Enregistrer_Classeur()
Dim chemin As String, fichier As String, datedu_jouR As String
' "datedu_jouR" est la date que l'on va manipuler pour l'insérer dans le nom du fichier à sauvegarder
datedu_jouR = Format(Range("Y10"), "yyyy.mm.dd")
If Range("Y10") = "" Then
MsgBox ("Date du Virement ?")
Exit Sub
End If
chemin = "\monchemin\"
fichier = chemin & Range("X8") & " " & Range("X9") & "-" & datedu_jouR & ".xlsm"
ActiveWorkbook.SaveAs Filename:=fichier
End Sub
Si l'un d'entre vous connait la solution, je suis preneur.
D'avance, merci et bon week-end à tous.