pozdravljeni
kako bi se glasil makro in sicer,ki bi mi ustvaril mapo z imenom poletje,
ki bi se nahajala v isti mapi kot xls datoteka z makrom.
za odgovor se zahvaljujem.
lp
ustvarjanje mape vba
Makro se bi glasil takole:
Koda: Izberi vse
Sub Ustvari_mapo()
Dim fso
Dim Mapa As String
Mapa = Application.ActiveWorkbook.Path & "\Poletje"
Set fso = CreateObject("Scripting.FileSystemObject")
If Not fso.FolderExists(Mapa) Then
fso.CreateFolder (Mapa)
Else
MsgBox "Mapa --> " & Mapa & " <-- že obstaja!", _
vbExclamation, "Opozorilo"
End If
End Sub
lp,
cedra
cedra
pozdravljen,
makro mi lepo deluje,za kar se vam iskreno zahvaljujem.me veseli,da ste me razumeli,kar sem napisal,bi pa še nekaj pri tem potreboval(nisem hotel dva vprašanja postavljat naenkrat),ker bi bilo preveč zakomplicirano
za razumevanje.in sicer:da bi mi vse datoteke xls ki se nahajajo v isti mapi kot mapa poletje preneslo v mapo poletje.
vidite,že povedati je težko.
za vašo nadaljno pomoč se iskreno zahvaljujem.
lp
makro mi lepo deluje,za kar se vam iskreno zahvaljujem.me veseli,da ste me razumeli,kar sem napisal,bi pa še nekaj pri tem potreboval(nisem hotel dva vprašanja postavljat naenkrat),ker bi bilo preveč zakomplicirano
za razumevanje.in sicer:da bi mi vse datoteke xls ki se nahajajo v isti mapi kot mapa poletje preneslo v mapo poletje.
vidite,že povedati je težko.
za vašo nadaljno pomoč se iskreno zahvaljujem.
lp
Sicer ne vem zakaj nebi datotek zvrstili po vrstah in nato izrezali želene datoteke in jih nato prilepili v mapo "Poletje"
No naj bo kakor pač je, tu je rešitev...
Pa še nekaj, vaši problemi bodo veliko preglednejši, če boste malo bolj pazili na SLO slovnico, predvsem na to, da je za vejico presledek. Pa brez zamere...
No naj bo kakor pač je, tu je rešitev...
Koda: Izberi vse
Sub Premik_izbranih_datotek()
Dim fso
Dim StaraMapa As String, NovaMapa As String
StaraMapa = Application.ActiveWorkbook.Path
NovaMapa = Application.ActiveWorkbook.Path & "\Poletje"
Set fso = CreateObject("Scripting.FileSystemObject")
On Error Resume Next
fso.MoveFile (StaraMapa & "\*.xls"), NovaMapa
End Sub
lp,
cedra
cedra
pozdravljeni,
najprej bi se vam zahvalil za vašo pomoč, čeprav mi zadnji makro,
ki ste ga napisali ne stori ničesar, torej ne premakne mi xls datoteke
v mapo poletje.ali jih vam premakne?
torej, xls datoteka z makrom je v isti mapi, kot je
mapa poletje.ali delam kaj narobe?
za odgovor se zahvaljujem.
ps: kar se tiče preglednosti pisanja in vejic sprejmem kritiko in
se mi zdi ta na mestu.v bodoče se bom bolj trudil, moram si prebrati
tudi kakšno pravilo.vesel sem, da ste me na to opozorili.
najprej bi se vam zahvalil za vašo pomoč, čeprav mi zadnji makro,
ki ste ga napisali ne stori ničesar, torej ne premakne mi xls datoteke
v mapo poletje.ali jih vam premakne?
torej, xls datoteka z makrom je v isti mapi, kot je
mapa poletje.ali delam kaj narobe?
za odgovor se zahvaljujem.
ps: kar se tiče preglednosti pisanja in vejic sprejmem kritiko in
se mi zdi ta na mestu.v bodoče se bom bolj trudil, moram si prebrati
tudi kakšno pravilo.vesel sem, da ste me na to opozorili.
Hm, ne vem, kje bi lahko bil problem, da vam makro ne deluje?:(
Sam sem ga preizkusil kar nekajkrat, v različnih mapah in direktoriju. Vedno mi je delal brez napak. Morda pa vaše ime ni točno "Poletje", morda je kaj drugega, kak odvečen presledek? Najbolje, da napravite neko novo prazno mapo in vanjo daste zvezek z obema makroma, ki sem vam jih napisal in nekaj testnih xls datotek, ki se bodo prestavile v "Poletje" Nato pa najprej sprožite makro, ki vam ustvari mapo "Poletje" in nato še drugi makro, ki vam bo xls datoteke prestavil v "Poletje" V obeh makrih pa je važno ime "Poletje" Zvezek z makroma pa ostane, kjer je...
Kot sem že dejal, meni stvar funkcionira brez vsakega problema. OFFICE 2000!
Sam sem ga preizkusil kar nekajkrat, v različnih mapah in direktoriju. Vedno mi je delal brez napak. Morda pa vaše ime ni točno "Poletje", morda je kaj drugega, kak odvečen presledek? Najbolje, da napravite neko novo prazno mapo in vanjo daste zvezek z obema makroma, ki sem vam jih napisal in nekaj testnih xls datotek, ki se bodo prestavile v "Poletje" Nato pa najprej sprožite makro, ki vam ustvari mapo "Poletje" in nato še drugi makro, ki vam bo xls datoteke prestavil v "Poletje" V obeh makrih pa je važno ime "Poletje" Zvezek z makroma pa ostane, kjer je...
Kot sem že dejal, meni stvar funkcionira brez vsakega problema. OFFICE 2000!
lp,
cedra
cedra
Prav zanimivo, kaj sem ugotovil
Drugi makro, ki prestavi xls datoteke, prestavi samo tiste datoteke, ki so po abecedi pred imenom zvezka v katerem sta makra. Torej, če se zvezek, kjer imate makra imenuje npr. "Nek zvezek", vam bo makro prestavil tiste xls datoteke, ki se imenujejo na črko, ki je po abecedi pred "Nek zvezek". Pa tudi s šumniki ima teževe in jih ne prepozna. Torej, zvezkov ne bo prestavil, če se njegovo ime začne na Č, Š in Ž! Sicer vse nisem probal, za Š sem prepričan! Torej zvezek z makroma poimenujte npr "ZZZNek zvezek", potem pa bo šlo.
Lahko je to pač en hrošček. Ker ga lahko pretentamo tako, kot sem vam napisal zgoraj, tudi nisem iskal druge rešitve...
Kako je pa ime vašega zvezka z makroma. Lahko, da je ime vzrok nedelovanja!
Drugi makro, ki prestavi xls datoteke, prestavi samo tiste datoteke, ki so po abecedi pred imenom zvezka v katerem sta makra. Torej, če se zvezek, kjer imate makra imenuje npr. "Nek zvezek", vam bo makro prestavil tiste xls datoteke, ki se imenujejo na črko, ki je po abecedi pred "Nek zvezek". Pa tudi s šumniki ima teževe in jih ne prepozna. Torej, zvezkov ne bo prestavil, če se njegovo ime začne na Č, Š in Ž! Sicer vse nisem probal, za Š sem prepričan! Torej zvezek z makroma poimenujte npr "ZZZNek zvezek", potem pa bo šlo.
Lahko je to pač en hrošček. Ker ga lahko pretentamo tako, kot sem vam napisal zgoraj, tudi nisem iskal druge rešitve...
Kako je pa ime vašega zvezka z makroma. Lahko, da je ime vzrok nedelovanja!
lp,
cedra
cedra