bjr je cherche a sauvegarder un fichier via une macro affectée à un bouton . Mon code actuel me fait bien une sauvegarde du fichier avec le nom et la date me permettant ainsi de conserver mon fichier original ...Jusqu'ici tout va bien ....le probleme est que cette macro modifie le nom de la feuille ou se trouve le bouton perturbant mes références a cette feuille
Dim strDate As String
Count = Len(ActiveWorkbook.Name)
Name = Left(ActiveWorkbook.Name, Count - 4)
strDate = Format(Date, 'dd-mm-yy') & ' ' & Format(Time, 'h-mm-ss')
ThisWorkbook.SaveCopyAs Filename:=Name & strDate & '.xls'