Shranjevanje DZ

Pomoč pri izdelavi makrov
Odgovori
Stenly
Prispevkov: 223
Pridružen: Sr Jul 27, 2005 11:29 pm

Shranjevanje DZ

Odgovor Napisal/-a Stenly »

Pozdravljeni

Imam nek DZ za obdelavo in izpis. Na koncu bi želel shraniti le gol DZ (torej le stran izpisa, brez makrojev in brez form).

Nekaj takega

Koda: Izberi vse

    
...odstranitev modulov, odstranitev form
.
.
ActiveWorkbook.SaveAs Filename:= _
        "C:\P3000.xls"
Lep pozdrav
admin
Site Admin
Prispevkov: 3687
Pridružen: Sr Jul 20, 2005 10:06 pm

Re: Shranjevanje DZ

Odgovor Napisal/-a admin »

Rešite stvvar drugače. Liste, ki jih želite shraniti, prekopirajte v nov delovni zvezek in shranite tisti DZ. Lepa, čista in trivialna rešitev, pa še koda je abotno preprosta:

Koda: Izberi vse

    Sheets(Array("List1", "List2")).Copy
    ActiveWorkbook.SaveAs Filename:="C:\P3000.xls", FileFormat:=xlNormal, _
        Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
        CreateBackup:=False
lp,
Matjaž Prtenjak
Administrator
Stenly
Prispevkov: 223
Pridružen: Sr Jul 27, 2005 11:29 pm

Re: Shranjevanje DZ

Odgovor Napisal/-a Stenly »

Pozdravljeni

Res preprosto. Moram rečt, da sem to rešitev tudi sam najprej mel, a sem se zapletel najprej z dodajanjem WB, pol se je pojavil problem z listi (nekdo ma enega, nekdo več,...).
Hvala za rešitev in zelo hitri odgovor.
Odgovori