ustvarjanje mape

[rick]

pozdravljeni

kako bi na C disku ustvaril mapo(z makrom),ki bi bila shranjena pod današnjim datumom in trenutnim časom???
nekako takole:

c:/mapa 27.1.2009 10:09:17

upam,da ni pretežko....

za odgovor se najlepše zahvaljujem

[admin]

Dvopičij ne morete imeti v imenu mape, zato sem čas ločil z minusom, vi si pač izberite poljubno oznako - dvopičja, kot rečeno pa ne morete - ga ne dovolijo Okna!

Koda: Izberi vse

MkDir "c:\mapa " & Format(Now, "dd.mm.yyyy hh-nn-ss")

[rick]

pozdravljeni

najprej najlepša hvala za odgovor,ki je zelo uporaben,glede dvopičij,mi je pa tako vseeno.imel bi na to temo še eno podvprašanje.

v mapi c:/imena imam štiri datoteke:

ana.doc
lina.doc
miha.doc
ema.doc

rad bi kopiral te datoteke in jih prilepil v :

MkDir "c:\mapa " & Format(Now, "dd.mm.yyyy hh-nn-ss")

mislil sem ,da bom zmogel sam,očitno pa ne bo šlo brez vaše pomoči.
za odgovor se iskreno zahvaljujem.

lp rick

[admin]

Spodaj je koda, ki naredi natanko tisto, kar želite:

Sub kopiraj()
Dim novaMapa

novaMapa = "c:\mapa " & Format(Now, "dd.mm.yyyy hh-nn-ss")

MkDir novaMapa
FileCopy novaMapa & "\"

FileCopy "c:\imena\ana.doc", novaMapa & "\ana.doc"
FileCopy "c:\imena\lina.doc", novaMapa & "\lina.doc"
FileCopy "c:\imena\miha.doc", novaMapa & "\miha.doc"
FileCopy "c:\imena\ema.doc", novaMapa & "\ema.doc"
End Sub

[rick]

pozdravljeni

najprej hvala za odgovor.
datoteke imam na "c\imena" ,vendar se makro ustavi na:

FileCopy novaMapa & "\"

in napiše:

compile error:

argument not ptional

a morda delam kaj narobe

za odgovor se iskreno zahvaljujem.
lp rick

[kljuka13]

Zagotovo nimate mape v

"c\imena"

ampak

"c:\imena"

Lahko je tukaj napaka.

[rick]

pozdravljeni

seveda imam mapo na "c:\imena" ,tisto je moja napaka...
torej na C-ju v mapi,ki se imenuje imena so datoteke.doc.
ko jih skušam prekopirati v novo mapo,kot je napisana koda,mi javi napako,
ki sem jo zgoraj opisal.
morda veste vi kje grešim?

za odgovor se zahvaljujem.
lp rick

[kljuka13]

Jah seveda je napaka. Pomislite malo. Če kopiramo neko datoteko moramo navesti kje je datoteka in kam jo bomo kopirali. Potrebujemo torej 2 argumenta. Zatorej je tista vrstica

Koda: Izberi vse

FileCopy novaMapa & "\" 

napačna.

[rick]

pozdravljeni

torej napisal sem:

FileCopy novaMapa & "c:\"

pa zopet nič

kje točno je napaka?
a jo vi vidite???
lp rick

[kljuka13]

Saj sem vam povedal napako. Tista vrstica ne naredi nič zato jo lahko izbrišete. Makro je sledeč

Koda: Izberi vse

Sub kopiraj()
Dim novaMapa

novaMapa = "c:\mapa " & Format(Now, "dd.mm.yyyy hh-nn-ss")

MkDir novaMapa

FileCopy "c:\imena\ana.doc", novaMapa & "\ana.doc"
FileCopy "c:\imena\lina.doc", novaMapa & "\lina.doc"
FileCopy "c:\imena\miha.doc", novaMapa & "\miha.doc"
FileCopy "c:\imena\ema.doc", novaMapa & "\ema.doc"
End Sub

[rick]

pozdravljen kljuka13

in hvala in še enkrat hvala.
treba je mal brat,sicer res neveš zakaj se gre.
lp rick

[rick]

pozdravljen

no,kopiranje v nove mape mi lepo deluje,za kar se vam zahvaljujem.
bi pa še nekaj vprašal,morda bi vedel kljuka13 in sicer:
ko izvedem makro mi shrane datoteke v mapo na primer:
mapa 27.1.2009 19-45-16
se pravi vsako sekundo lahko ustvarim novo mapo.
no to je ok.

zanima me ,kako je možno tudi nazaj kopirati,se pravi grem v katerokoli mapo z datumom in časom in te datoteke prekopiram nazaj v mapo imena.
kakšen bi bil makro glede na to ,da se ime mape vedno spreminja?

a je to sploh izvedljivo???

za odgovor se zahvaljujem.
lp rick

[admin]

Ja pač preprosto vpišete v katero mapo želite kopirati. Za vaš primer torej:

Koda: Izberi vse

  FileCopy "c:\imena\ana.doc", "c:\mapa 27.1.2009 19-45-16\ana.doc" 

[rick]

pozdravljeni

nismo se najbolj razumeli,nekako takole bom opisal:
nahajam se v kateri koli mapi,kako bi potem kopiral datoteke iz te mape v mapo imena.
recimo iz active directorij v mapo imena. to je samo domneva...

a ste me razumeli zakaj gre?

imena map se v kateri se nahajam se spreminja,zato bi moral tudi
makro vseskozi spreminjati.
za odgovor se zahvaljujem.
lp rick

[admin]

nahajam se v kateri koli mapi,kako bi potem kopiral datoteke iz te mape v mapo imena.

Kako se nahajate v tej mapi? Excel/Word/... boste zagnali iz te mape ali kako se mislite 'nahajati' v neki mapi?