Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

[Excel]kako da u SAVE AS automatski unesem naziv iz celije

[es] :: Office :: Excel :: [Excel]kako da u SAVE AS automatski unesem naziv iz celije

[ Pregleda: 4532 | Odgovora: 9 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

konislav

Član broj: 52073
Poruke: 520
62.162.225.*



+228 Profil

icon [Excel]kako da u SAVE AS automatski unesem naziv iz celije18.09.2006. u 21:17 - pre 154 meseci


Pitanje glasi :

Kako bi glasio macro koji bi automatski ( startovanjem macro-a ) vrsio snimanje dokumenta
pod nazivom ( imenom ) koje je u datoj celiji .
Primer :
startujem macro , macro startuje SAVE AS i u FILE NAME ubacuje naziv iz celije B5 ili bilo koje druge koju ja definisem .
 
Odgovor na temu

timmy
Jovan Timotijevic

Moderator
Član broj: 37087
Poruke: 630

Sajt: www.e-tim.net


+89 Profil

icon Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije19.09.2006. u 07:39 - pre 154 meseci
Probaj nesto nalik sledecem:

txtIme = "c:\...\" & Range("B5") & ".xls"

ActiveWorkbook.SaveAs Filename:= _
txtIme, FileFormat:= xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, reateBackup:=False

Pozdrav
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2063
212.200.27.*

Sajt: www.gowi.rs


+77 Profil

icon Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije19.09.2006. u 07:40 - pre 154 meseci
U osnovnoj verziji ovako:
Code:

Sub MySave()
Dim unos As String
 unos = Sheets(1).Range("B5").Text
 ActiveWorkbook.SaveAs Filename:=unos
End Sub


Na taj način se snima se aktivna Excel radna sveska pod imenom koje je upisano u ćeliju B5 na prvom listu u fasciklu My Document. Naravno dodavanjem putanje promenljivoj unos može se promeniti fascikla u kojoj se snima dokument.

Ako već postoji dokument pod tim imenom ispisaće se upozorenje. Ukoliko želiš da izbegneš upozorenje stavi na početku
Code:

Application.DisplayAlerts = False

Ne zaboravi na kraju da vratiš
Code:

Application.DisplayAlerts = True

Nije to loše Rembrante, samo što ne bi dodao još malo boje?
 
Odgovor na temu

konislav

Član broj: 52073
Poruke: 520
62.220.220.*



+228 Profil

icon Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije20.09.2006. u 00:16 - pre 154 meseci

Hvala na odgovorima , zavrsicu posao na malo drugaciji nacin , ali o tome kad ga zavrsim .
 
Odgovor na temu

Buck
Branko Rodic
Novi Sad

Član broj: 2312
Poruke: 42
*.beogrid.net.



Profil

icon Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije20.03.2008. u 12:32 - pre 136 meseci
Kako da iz svoje VB aplikacije nakon goreopisane Save As metode Excel unloudujem iz memorije!?
Probao sam sa: xlApp.Quit ali ne vredi, stalno ga vidim u Task Manageru.
Unapred hvala!
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2063
*.bisinter.net.

Sajt: www.gowi.rs


+77 Profil

icon Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije20.03.2008. u 17:50 - pre 136 meseci
U principu trebalo bi Application.Quit da zatvori Excel. Pogledaj ovde http://www.dbforums.com/archive/index.php/t-973449.html - na dnu stanice.



Nije to loše Rembrante, samo što ne bi dodao još malo boje?
 
Odgovor na temu

Buck
Branko Rodic
Novi Sad

Član broj: 2312
Poruke: 42
195.252.77.*



Profil

icon Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije21.03.2008. u 22:35 - pre 136 meseci
Resenje koje se tamo sugerira podrazumeva da zapravo promenim ogromne blokove rutina u svojoj aplikaciji, konkretno tamo gde je stojalo WITH, da to izbacim i zamenim sa odgovarajucom referencom.
Sugerirano je i da setujem .CutCopyMode = False, sto je i logicno jer tokom pravljenja makroa covek moze da zaboravi da je negde nesto ostalo selektovano...
Naravno sve to treba uraditi i posle se pomoliti dali ce se Excel spustiti na xlapp.quit komandu...
Trenutak istine se blizi pa cu javiti ishode...
 
Odgovor na temu

Buck
Branko Rodic
Novi Sad

Član broj: 2312
Poruke: 42
195.252.77.*



Profil

icon Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije22.03.2008. u 01:35 - pre 136 meseci
Citat:
Jpeca: U principu trebalo bi Application.Quit da zatvori Excel. Pogledaj ovde http://www.dbforums.com/archive/index.php/t-973449.html - na dnu stanice.



Citat:
Buck: Resenje koje se tamo sugerira podrazumeva da zapravo promenim ogromne blokove rutina u svojoj aplikaciji, konkretno tamo gde je stojalo WITH, da to izbacim i zamenim sa odgovarajucom referencom.
Sugerirano je i da setujem .CutCopyMode = False, sto je i logicno jer tokom pravljenja makroa covek moze da zaboravi da je negde nesto ostalo selektovano...
Naravno sve to treba uraditi i posle se pomoliti dali ce se Excel spustiti na xlapp.quit komandu...
Trenutak istine se blizi pa cu javiti ishode...



Nazalost nije uspela operacija.
Iz svih rutina sam izbacio WITH i ubacio pune reference...(nekoliko stotina minucioznih izmena)
Odradio Save As metodu i na kraju:

xlApp.CutCopyMode = False
xlApp.Quit
Set xlApp = Nothing

I nista (Excel ostade u memoriji
 
Odgovor na temu

Ivek33

Član broj: 66174
Poruke: 2761

Sajt: www.ic.ims.hr


+55 Profil

icon Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije22.03.2008. u 11:11 - pre 136 meseci
Hi,
ne pišem Macro-e ali sam naišao na jednu web stranicu pa rekoh možda ti može pomoći
evo linka http://www.cpearson.com/excel/ExcelShutdown.htm
 
Odgovor na temu

Buck
Branko Rodic
Novi Sad

Član broj: 2312
Poruke: 42
195.252.77.*



Profil

icon Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije22.03.2008. u 22:12 - pre 136 meseci
!!!
Citat:
Ivek33: Hi,
ne pišem Macro-e ali sam naišao na jednu web stranicu pa rekoh možda ti može pomoći
evo linka http://www.cpearson.com/excel/ExcelShutdown.htm


Hvala druze, pregledao sam to duz i popreko ali tu nema 'issues' koje se odnose na ovaj moj problem!
Ima, naime, jedno parce koda 'dll', koje daje povratnu informaciju o tome da je neki workbook zatvoren medjutim, meni treba pomoc oko zatvaranja
kompletne aplikacije Excel...
Svejedno, puno hvala
 
Odgovor na temu

[es] :: Office :: Excel :: [Excel]kako da u SAVE AS automatski unesem naziv iz celije

[ Pregleda: 4532 | Odgovora: 9 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.