Problème d'enregistrement

N

nounbxl76

XLDnaute Occasionnel

• 10 Novembre 2013

• #2

Re : Problème d'enregistrement

Bonsoir,

Je ne suis pas sûr d'avoir compris mais peut-être voir la fonction DernièreSauvegarde() + la gestion des évènements de M. Boisgontier.

Gestion des événements

Cliquez pour agrandir...

Fonction à mettre dans une cellule bien entendu.

Bonne soirée.

 

Vote positif 0 Vote négatif

N

nounbxl76

XLDnaute Occasionnel

• 10 Novembre 2013

• #3

Re : Problème d'enregistrement

Sinon voici un code qui donne le nom du classeur en A1 et puis la date + l'heure en A2

Sub nomclasseur()
Dim nom As String
nom = Left(ThisWorkbook.Name, Len(ThisWorkbook.Name) - 4)
Range("A1") = nom
With Format(Date, "dd/mm/yyyy")
Range("A2") = "Le " & Date & " à " & Time
End With
End Sub

Cliquez pour agrandir...

Avec quelques lignes des gestion des évènements en +, ça devrait le faire !

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 10 Novembre 2013

• #4

Re : Problème d'enregistrement

Bonjour à tous,

Peux-tu essayer avec :

Sub Sauve()
ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & Format(Date, "dd-mm-yyyy") & ".xls"
End Sub

Cliquez pour agrandir...

A+ à tous

 

Vote positif 0 Vote négatif

N

nounbxl76

XLDnaute Occasionnel

• 10 Novembre 2013

• #5

Re : Problème d'enregistrement

Ah oui ! je comprends maintenant... on voit la différence entre moi qui, après avoir gracieusement sollicité de l'aide, tente d'aider les autres et un vrai connaisseur 😀

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 10 Novembre 2013

• #6

Re : Problème d'enregistrement

Bonjour à tous,
Salut Noun,

Désolé pas rafraîchi...

Intervient quand tu veux, c'est un Forum d'Entraide.

A++
A+ à tous

 

Vote positif 0 Vote négatif

M

M.D

XLDnaute Occasionnel

• 10 Novembre 2013

• #7

Re : Problème d'enregistrement

Bonsoir,

Merci à vous pour ces différentes solutions

Bonne soirée

M.D

 

Vote positif 0 Vote négatif