Mitenkä onnistuisi sellainen versiointi tallennus, että työkirjasta jäisi talteen viisi viimeiseksi tallennettua tyyliin MunTaulukko-hh-mm.xls? Eli versiot erottaisi toisistaan nimeen lisätyn kellonajan mukaan (tai vaikka juokseva nrointi)? Eikä se nyt pahasti haittais vaikka tallentuisi enemmänkin versiota, mutta varmaankin viis viimeisintä aina riittäisi.
Versiointi/ välitallennus
Varmasti talteen vaiheet
1
355
Vastaukset
tolla nyt alkuun. Muuta polku ja tiedostonnimi itsellesi sopivaksija muista tehda tallennuskansio polku osoitteeseen.
ThisWorkbook moduuliin...
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Const Polku = "C:\Varmuuskopiot\"
Dim Tiedostonnimi As String
Dim Laskuri As Long
Dim JoTallennettu As Boolean
On Error Resume Next
Application.EnableEvents = False
Laskuri = 1
Do
Tiedostonnimi = Polku & "MunTaulukko-" & Format(Laskuri, "0000") & ".xls"
JoTallennettu = Len(Dir(Tiedostonnimi))
If Not JoTallennettu Then
ActiveWorkbook.SaveAs Filename:=Tiedostonnimi
End If
Laskuri = Laskuri 1
Loop Until Not JoTallennettu
Application.EnableEvents = True
Cancel = True
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Duunarit hylkäsivät vasemmistoliiton, siitä tuli feministinaisten puolue
Pääluottamusmies Jari Myllykoski liittyi vasemmistoliittoon, koska se oli duunarien puolue. Sitä samaa puoluetta ei enää2055104Olen väsynyt tähän
En osaa lopettaa ja koen huonoa omaatuntoa tästä. Kaikki on muutenkin turhaa ja tekemisesi sattuvat. Tunteita on vain hy414565Oppiiko vasemmistolaiset valehtelun jo kotonaan?
Sillä vasemmistolaiset/äärivasemmistolaiset valehtelee ja keksii asioita omasta päästään todella paljon. Esim. joku vas2012748Seuraava hallituspohja - Kokoomus, kepu, persut + KD
Kokoomus saa ainakin 20% kannatuksen ensi vaaleissa, keskusta sanoisin noin 15%, persut todennäköisesti enemmän, ehkä 171352328- 611952
Maailman laiskin eläin: persu
Persu ei ole eläessään laittanut rikkaa ristiin itsensä elättämiseen. Luonnossa tuollainen ei olisi mahdollista, mutta s1121841- 671794
- 2081674
Miksi et voi tutustua minuun irl?
Vastaa yleisellä tasolla/ympäripyöreästi, jos pelkäät tunnistamisia.1521232Martina tienaa itse rahansa
Ei tarvitse anella elättäjältään rahaa, ruokaa ja laukkuja.241964