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

"Save as" macro iz text box-a

[es] :: Office :: Word :: "Save as" macro iz text box-a

[ Pregleda: 2340 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

omega009
kompj. adm.
skopje, makedonija

Član broj: 218226
Poruke: 12
77.28.41.*



Profil

icon "Save as" macro iz text box-a15.10.2009. u 13:45 - pre 143 meseci
Imam dokumenat u Word-u. Kako da u SAVE AS automatski unesem naziv iz text box-a na odredjenu lokaciju u My documents?
Kako bi glasio macro koji bi automatski ( startovanjem macro-a, ili shortkey-a ) vrsio snimanje dokumenta pod nazivom (imenom ) koje je u text box-u?
Primer :
startujem macro , macro startuje SAVE AS i u FILE NAME ubacuje naziv iz text box-a .
Hvala unapred
What doesn't kill me, costs me money!
 
Odgovor na temu

timmy
Jovan Timotijevic

Moderator
Član broj: 37087
Poruke: 632

Sajt: www.e-tim.net


+89 Profil

icon Re: "Save as" macro iz text box-a15.10.2009. u 23:47 - pre 143 meseci
Probaj da u formi iskoristis sledeci kod (recimo da je textbox Text1):

Code:

    ChangeFileOpenDirectory Environ$("USERPROFILE") & "\My Documents"
    ActiveDocument.SaveAs FileName:=Text1.Text


Pozdrav
 
Odgovor na temu

omega009
kompj. adm.
skopje, makedonija

Član broj: 218226
Poruke: 12
77.28.37.*



Profil

icon Re: "Save as" macro iz text box-a16.10.2009. u 08:43 - pre 143 meseci
Mislila sam na textbox iz Drawing toolbar-a!
What doesn't kill me, costs me money!
 
Odgovor na temu

timmy
Jovan Timotijevic

Moderator
Član broj: 37087
Poruke: 632

Sajt: www.e-tim.net


+89 Profil

icon Re: "Save as" macro iz text box-a16.10.2009. u 11:23 - pre 143 meseci
Onda umesto textbox1.text koristi

Code:

ActiveDocument.Shapes("Text Box 1").TextFrame.TextRange.Text


Naravno moras da znas kako se zove tvoj TextBox. Da ga identifikujes probaj sledece:

1. Selektuj TextBox
2. Pritisni Alt+F11
3. Pritisni Ctrl+G (da otvoris Immediate prozor)
4. Otkucaj

Code:
? ActiveWindow.Selection.ShapeRange.Name


Pozdrav
 
Odgovor na temu

omega009
kompj. adm.
skopje, makedonija

Član broj: 218226
Poruke: 12
77.28.38.*



Profil

icon Re: "Save as" macro iz text box-a21.10.2009. u 11:10 - pre 143 meseci
Timmy, napravila sam kako si rekao; ubacila sam code:

Code:

Sub save_as()
    ChangeFileOpenDirectory Environ$("USERPROFILE") & "\My Documents"
    ActiveDocument.Shapes("Text Box 1").TextFrame.TextRange.Text
End Sub

i u Immediate Window:

Code:

? ActiveWindow.Selection.ShapeRange.Name

... i Message Box mi javlja error:
Compile error:
Invalid Use of Property

Gde sam pogresila?

Hvala i pozdrav

What doesn't kill me, costs me money!
 
Odgovor na temu

[es] :: Office :: Word :: "Save as" macro iz text box-a

[ Pregleda: 2340 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

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