title image


Smiley Re: Excel - Word
Eigentlich so:





Private nWrd As New Word.Application





Private Sub DocOpen(Byval PfadDokName As String)

nWrd.Documents.Open PfadDokName



With ActiveDocument

..... Anweisungen

End With



nWrd.Visible = True



ActiveDokument.Saved = True

nWrd.Quiet

Set nWrd = Nothing



End Sub





mfg

Bill



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: