..|| Blog || Produkti/Storitve || MExcel || MDodatki || 300 nasvetov ||..

Makro za shranjevanje dokumenta v Wordu

Pomoč pri izdelavi makrov

Makro za shranjevanje dokumenta v Wordu

OdgovorNapisal/-a sonofagun » Če jul 24, 2014 3:03 pm

Pozdravljeni.

Prosil bi za pomoč, pri naslednjem problemu: v Wordu želim napisati makro, ki bi mi ponudil možnost 'Shrani kot', kjer bi potem lahko izbral mesto in ime nove datoteke. Prebiral sem že zapise na tem forumu (našel sem podobne 'težave' v Excelu) in po ostalih spletnih straneh, ampak nisem prišel do zadovoljive rešitve.

Še najbližje sem bil s to kodo, ki pa samo pokaže pojavno okno, kjer res izbereš mesto in ime, vendar datoteke dejansko ne shraniš:
Koda: Izberi vse
Sub ShowSaveAsDialog()
Dim dlgSaveAs As FileDialog
Set dlgSaveAs = Application.FileDialog(FileDialogType:=msoFileDialogSaveAs)
dlgSaveAs.Show
End Sub

Kateri zapis bi moral dodat, da bi shranil datoteko?

Hvala za pomoč :-)

Lep dan

Gregor
sonofagun
 
Prispevkov: 118
Pridružen: Če mar 26, 2009 11:05 am



Matjazev.NET
 

Re: Makro za shranjevanje dokumenta v Wordu

OdgovorNapisal/-a admin » Če jul 24, 2014 8:02 pm

Pozdravljeni,

In kje v vaši kodi naj bi se datoteka posnela? Saj niste nikjer zahtevali naj se datoteka posname. Vi ste samo odprli in prikazali novo pogovorno okno.

Seveda bi lahko nadaljeval tudi z vašo kodo, vendar pa ima izbrano okno (FileDialog) možnost izbire več datotek..., kar pomeni, da je kar nekaj preverjanja kaj je uporabnik sploh vnesel oz. kaj želi. Lažje je s preprostejšo in povsem samoevidentno kodo:
Koda: Izberi vse
Sub ShraniKot()
  With Application.Dialogs(wdDialogFileSaveAs)
    .Format = wdFormatDocument
    .Show
  End With
End Sub
lp,
Matjaž Prtenjak
Administrator
admin
Site Admin
 
Prispevkov: 3415
Pridružen: Sr jul 20, 2005 10:06 pm

Re: Makro za shranjevanje dokumenta v Wordu

OdgovorNapisal/-a sonofagun » Če jul 24, 2014 11:12 pm

Odlično, točno to sem potreboval :-)

Še enkrat več hvala.

Lp,

Gregor
sonofagun
 
Prispevkov: 118
Pridružen: Če mar 26, 2009 11:05 am


Vrni se na VBA

Kdo je prisoten

Po forumu brska: 0 registriranih uporabnikov in 0 gostov

cron