[ my name is bond @ 26.05.2008. 00:09 ] @
Kada otvorim neki excel fajl ,npr tabela 1a, nešto je editujem i uradim "save as tabela 2a " kako da se to ime koje sam joj dodelio ( tabela 2a ) pojavi u toj tabeli 2a kao tekst u nekoj ćeliji npr C3 ?
[ Gix_ @ 27.05.2008. 08:37 ] @
Code:
Sub ime_RadneSveske()
Sheets("Sheet1").Range("C3").Value = ActiveWorkbook.Name
End Sub
[ 3okc @ 28.05.2008. 11:43 ] @
Nije neophodan makro za ovu opciju:
=CELL("filename") daje ime aktivnog dokumenta sa putanjom
=INFO("directory") daje putanju aktivnog dokumenta

kombinovanjem dobijamo željenu opciju, npr:
Code:
=IF(CELL("filename")=""; "tabela nije snimljena";
MID(CELL("filename"); LEN(INFO("directory"))+1;
LEN(CELL("filename"))-LEN(INFO("directory"))))


[ my name is bond @ 04.06.2008. 21:22 ] @
Citat:
Gix_:
Code:
Sub ime_RadneSveske()
Sheets("Sheet1").Range("C3").Value = ActiveWorkbook.Name
End Sub

Ovo je to što mi treba ,samo imam par pitanja.Ako osnovi fajl zovem npr "123456 elitesecurity" i uradim neki edit pa "save as " pokretanjem ovog makroa dobijam novi fajl koji dobija ime u ćeliji C3 "novi 123456 elitesecurity.xls" .Kako to .xls da izbacim iz naslova tj .imena pa da mi ostane samo "novi 123456 elitesecurity" .I drugo da li sam taj naslov može da se podeli u 2 ćelije ,npr novi 123456 u ćeliju C3 a ostatak imena
elitesecurity da bude u ćeliji red ispod C4.E ako to može ...
[ Gix_ @ 05.06.2008. 10:40 ] @
Re,
koliko je meni poznato .XLS nemozes izbaciti iz imena jer time unistavas type od faila
znaci koriscenjem komande dolazi do greske.
Ime od faila je takodje fiksna stvar koju nemozes podeliti na vise nacina drugacije receno ono stosi
zamislio je neizvodljivo, toje moje misljenje.

Pozdrav