Cytat:
W pliku worda chce umiescic klawisz makra poprzez, ktory bedzie wywolywane drukowanie innego pliku worda z okreslonej lokalizacji
Ojejejej....Postaraj się pisać na drugi raz zgodnie z regułami logiki, bo Twoje tłumaczenie jest niezwykle chaotyczne i dodatkowo nieczytelne ze względu na alternatywny sposób potraktowania zasad interpunkcji.
Po drugie stosuj znaczniki kodu, wówczas kod będzie czytelniejszy.
Twój kod mógłby wyglądać tak:
Sub Makro1()
Dim oDoc As Document
Set oDoc = Documents.Open(FileName:="C:\Documents and Settings\Andrzej\Pulpit\147.doc", ConfirmConversions:=False, ReadOnly:= _
False, AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:= _
"", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:="", _
Format:=wdOpenFormatAuto)
oDoc.PrintOut
oDoc.Close
Set oDoc = Nothing
End Sub
Jaki masz poziom zabezpieczeń w Wordzie? Ustaw średni lub niski. |