Word 2007 - makro pro vložení textu do názvu

Programy pro práci s textem, tabulkami, prezentacemi

Moderátor: Moderátoři Živě.cz

Odeslat příspěvekod Thor94 2. 11. 2018 20:25

Ahoj,
jako totální laik jsem poslepoval následující makro, které v dokumentu najde příslušné mergefield pole, zkopíruje text do clipboardu, soubor pošle na tiskárnu (PdfCreator) a posune se na další záznam.

Sub Makro1()
'
' Makro1 Makro
'
'
Selection.GoTo What:=wdGoToBookmark, Name:="Školený"
With ActiveDocument.Bookmarks
.DefaultSorting = wdSortByName
.ShowHidden = False
End With
Selection.Copy
ActivePrinter = "PDFCreator2"
Application.PrintOut FileName:=""
ActiveDocument.MailMerge.DataSource.ActiveRecord = wdNextRecord
End Sub

Nemůžu přijít na úpravu, která by k názvu souboru připojila textový řetězec z clipboardu.

Pomůže prosím někdo? Děkuji.
Chytří se učí z vlastních chyb. Ti nejchytřejší z chyb ostatních, nejlépe pak těch prvních.
Thor94
Kolemjdoucí
Uživatelský avatar

Kdo je online

Uživatelé procházející toto fórum: Žádní registrovaní uživatelé a 0 návštevníků