Novo

Forum kao aplikacija na telefonu

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

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

  • 9 odgovora
  • 8.205 pregleda

Najnovija ↓

[Excel]kako da u SAVE AS automatski unesem naziv iz celije 18.09.2006. u 22:17 · pre 244 meseca #1


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 .
Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije 19.09.2006. u 08:39 · pre 244 meseca #2
Probaj nesto nalik sledecem:

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

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

Pozdrav
Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije 19.09.2006. u 08:40 · pre 244 meseca #3
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
Potpis
Nije to loše Rembrante, samo što ne bi dodao još malo boje?
Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije 20.03.2008. u 13:32 · pre 226 meseci #5
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!
Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije 21.03.2008. u 23:35 · pre 226 meseci #7
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...
Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije 22.03.2008. u 02:35 · pre 226 meseci #8
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
Re: [Excel]kako da u SAVE AS automatski unesem naziv iz celije 22.03.2008. u 23:12 · pre 226 meseci #10
!!!
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
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme