Novo

Forum kao aplikacija na telefonu

Dodajte forum na početni ekran i koristite ga kao aplikaciju, sa menijem na dnu ekrana.

Snimanje excel fail po datumima i vremenu (nesto kao baza podataka)

  • 1 odgovor
  • 2.327 pregleda

Najnovija ↓

Snimanje excel fail po datumima i vremenu (nesto kao baza podataka) 20.08.2012. u 16:45 · pre 172 meseca #1
Pozdrav svima....
Stvar je sledeca.Recimo imam jedan Excel Fajl u kome konstantno upusujem i menjam podatke svakodnevno po nekoliko puta,isti taj fajl koristi mi kao baza podataka.Primer kako da uradim posle obavljenog upisa kada pritisnem na dugme ,,save,, da mi automatski paralelno sacuva podatke u originalnom fajlu(nesto kao normalna stvar ) a ujedno da taj isti fajl snimi pod istim nazivom sa momentalnom datumom i vremenu u sasvim drugi Folder ( Folder gde bi se snimali i sacuvali svi excel fajlovi sa zadatim datumima i vremenima kada je postupak snimanja obavljen...nesto kao bazu podataka za nedaj boze)

Pozdrav
Re: Snimanje excel fail po datumima i vremenu (nesto kao baza podataka) 21.08.2012. u 12:28 · pre 172 meseca #2
Sub izvestaj()
Dim adresa As String
Dim fascikla As String
adresa = "C:\Orders\"
fascikla = Dir(adresa, vbDirectory)
If (fascikla = "") Then MkDir (adresa)
ActiveWorkbook.SaveCopyAs adresa & ActiveWorkbook.Name & " " & Format(Now(), "yyyy.mm.dd_hh.mm") & ".xls"
ActiveWorkbook.Save
End Sub
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme