shranjevanje pod določenim imenom

[rick]

pozdravljeni

zanima me kako bi v makro zapisal(ko shranjujem delovni zvezek)

neko_ime&("a1").xls

torej,da bi shranil zvezek pod nekim imenom in tistim kar bo v celici
"a1".v celici a1 bo datum.

za odgovor se zahvaljujem.

lp rick

[Matija]

Pozdravljeni

Za shranjevanje delovnega zvezka napišite:

Koda: Izberi vse

ActiveWorkbook.SaveAs Filename:="C:\Moji dokumenti\Test " & Cells(1, 1).Value & ".xls"

"C:\Moji dokumenti\" zamenjajte z ustrezno potjo, kjer želite imeti shranjen delovni zvezek, "Test" pa je ime delovnega zvezka.

Lep pozdrav
Matija

[rick]

pozdravljen

ha....,tko enostavno...zadeva deluje
in sem jo že uporabil.
hvala za vaš trud

lp rick

[tic]

jaz bi pa rabil da se mi shranjuje pod tistim imenom kar je v A1 in D2
A1 je na primer ime na računu
D2 pa je številka računa
A je to sploh mogoče?
LP
Tic

[GoldZ]

Pozdravljeni!

Za vrednost celice A1 uporabite:

Koda: Izberi vse

Cells(1,1).Value

Za vrednost celice D2 pa:

Koda: Izberi vse

Cells(2,4).Value

Kako kodo uporabiti v imenu datoteke, pa Vam je opisal že Matija

[tic]

Nikakor mi ne rata vključit še tega drugega pogoja v macro.
Lepo prosim če mi hočete napisati celo pot kot je zgoraj v primeru z vključenim tem drugim pogojem, se pravi da mi pri shranjevanju upošteva 2 pogoja in sicer celico C4 in pa celico C8 poti si bom pa že spremenil če bom potreboval

Najlepša hvala že za prejšnji odgovor.

LP
Tic

[cedra]

Koda: Izberi vse

Private Sub Workbook_BeforeClose(Cancel As Boolean)

    ActiveWorkbook.SaveAs Filename:="C:\Moji dokumenti\Test\ " _
    & Cells(4, 3).Value & " " & Cells(8, 3).Value & ".xls"
    
End Sub

Ta koda vam bo zvezek pred izhodom shranila z imenom, ki ga imate v celici C4 in C8! Med vrednostma v celicah je še presledek; npr. C4 = Nek, C8 = zvezek, vam bo shranilo kot: Nek zvezek.xls Bo v redu?

[tic]

Super dela! Točno tako kot sem si zamislil.
Ne vem kako se vam naj zahvalim, saj ste mi rešili velik problem in mi pomagate kar na dveh koncih.
Še enkrat najlepša hvala

LP
Tic

P.S.
Če pa kdaj hodite okoli Celja, pa zelo rad dam za kakšno pico in pivo!
F3@email.si