Odpiranje Word dokumenta iz Excel-a

Pomoč pri izdelavi makrov
Odgovori
dragopre
Prispevkov: 81
Pridružen: To Dec 11, 2012 11:46 pm

Odpiranje Word dokumenta iz Excel-a

Odgovor Napisal/-a dragopre »

Pozdravljeni

Za Excel zvezek sem napisal navodilo v Word-u, v Ecel-u pa z gumbom poženem makro za odpiranje navodila.
Koda je naslednja:

Koda: Izberi vse

Sub Navodilo()
  Dim appWD As Word.Application
  Dim cMapa As String
  cMapa = ThisWorkbook.Path

  On Error GoTo NavodiloNapaka1
  Set appWD = CreateObject("Word.Application")
  On Error GoTo 0
  
  appWD.Visible = True
  appWD.Activate
                                                            
  On Error GoTo NavodiloNapaka2
  appWD.Documents.Open Filename:=cMapa & "\Navodilo.docx", _
                       ReadOnly:=True
  On Error GoTo 0
  GoTo NavodiloKonec
NavodiloNapaka1:
  MsgBox "Napaka. Ne morem zagnati aplikacije ""WORD"". "
  GoTo NavodiloKonec
NavodiloNapaka2:
  appWD.Quit
  MsgBox "Napaka. Ne najdem datoteke: """ & cMapa & "\Navodilo.docx" & """."
NavodiloKonec:
End Sub
Sicer deluje. Vendar Wordov dokument ni vedno takoj viden. Običajno se pojavi le v statusni vrstici.
V tem primeru uporabnik običajno ponovno pritisne tipko "Navodilo", to pa povzroči, da se dokument ponovno odpre ( spet samo v opravilni vrstici).
Vprašanji imam dve:
- Kako dosežem, da bo Word takoj viden oziroma v prvem planu
- Kako preprečim ponovno odpiranje istega Word dokumenta

Hvala za pomoč in lep pozdrav,
Drago
admin
Site Admin
Prispevkov: 3583
Pridružen: Sr Jul 20, 2005 10:06 pm

Re: Odpiranje Word dokumenta iz Excel-a

Odgovor Napisal/-a admin »

Pozdravljeni,
dragopre napisal/-a: - Kako dosežem, da bo Word takoj viden oziroma v prvem planu
Preprosto se ne trudite z zaganjanjem aplikacije, temveč preprosto odprite dokument s funkcijo Shell.
dragopre napisal/-a: - Kako preprečim ponovno odpiranje istega Word dokumenta
To pa bo precej težje in menim, da se ne izplača truditi. Če ga bo uporabnik odprl večkrat ga naj pač odpre večkrat...
lp,
Matjaž Prtenjak
Administrator
dragopre
Prispevkov: 81
Pridružen: To Dec 11, 2012 11:46 pm

Re: Odpiranje Word dokumenta iz Excel-a

Odgovor Napisal/-a dragopre »

Hvala za odgovor. Že deluje.
Predlagana rešitev praktično rešuje tudi drugo vprašanje.
Večkratno odpiranje Worda (navodila) je bilo predvsem posledica minimiziranega okna ob predhodnem odpiranju.

Hvala in uspešno in srečno Novo leto Vam želim.
Drago
Odgovori