Печать без полей из MS Word for MAC 2011 (14.5.1)

  • Автор темы Автор темы ~RA~
  • Дата начала Дата начала
Статус
Закрыто для дальнейших ответов.

~RA~

Одарённая.
Топикстартер
12 лет на форуме
Сообщения
12 697
Реакции
3 740
В документе картинки и таблицы, а кое-где и текст, слегка вылезают за поля документа.
Я печатаю на Adobe PDF (Save as Adobe PDF) и эти "вылезания" зарезаются (не печатаются).
Как сделать так, чтобы печатались?

Скриншот 2015-06-03 13.45.16.png
 
Ворд честно предупреждает :)
Снимок экрана 2015-06-03 в 14.05.27.jpg


Но он их под маской оставляет.
Если ее снять - все отображается :).
 
Да, но я не хочу менять поля (всё поползёт), я хочу напечатать как есть.
 
Вопрос решён, всем спасибо.
Скриншот 2015-06-03 14.13.08.png


Не по теме:
Долбаный Word, мало того, что интерфейс испоганили, фиг чего найдёшь, так и с полями каку подложили.
 
  • Спасибо
Реакции: garif
И второй, маленький вопросик, (недостойный отдельной темы): а как спечатать несколько файлов разом на кастомную бумагу?
 
И второй, маленький вопросик, (недостойный отдельной темы): а как спечатать несколько файлов разом на кастомную бумагу?
Сам не пробовал, но проверьте - вдруг получится:
1) установить в системе нужный принтер по умолчанию;
2) в его настройках выбрать нужную бумагу (после установки проверить, что она действительно установилась, не сбросилась);
3) в окне Ворда "Открыть" выделить необходимые файлы;
4) в том же окне выбрать "Сервис" - "Печать" (окно настроек при этом не вылезает, всё печатается на дефолтный принтер с дефолтными настройками).
 
  • Спасибо
Реакции: ~RA~
@LeonidB, спасибо, но не выйдет. :(
1. В OS X теперь нельзя поставить Adobe PDF как принтер. Безопасность превыше удобства, считают некоторые.
2. —
3. Это можно.
4. В том же окне нет "Сервис" - "Печать".
 
@LeonidB, спасибо, но не выйдет. :(
1. В OS X теперь нельзя поставить Adobe PDF как принтер. Безопасность превыше удобства, считают некоторые.
...4. В том же окне нет "Сервис" - "Печать".

@~RA~, жаль.
Тогда для Маков не знаю. С 2001 года на них не работал :)
 
А если нужны pdf'ы, то, может, попробовать через Combine Files в Акробате? А настройки с нужной бумагой установить в Дистиллере?
 
Да, нет, мне просто лень много раз cmd+p жать.
 
Тогда сделать макрос: распечатать текущий файл, закрыть окно и т. д.
Открыть кучу файлов и запустить макрос :)
 
А как в нём указать кастом формат бумаги?

Может, так?
Код:
  With Selection.PageSetup
  .TopMargin = CentimetersToPoints(0)
  .BottomMargin = CentimetersToPoints(0)
  .LeftMargin = CentimetersToPoints(0)
  .RightMargin = CentimetersToPoints(0)
  .PageWidth = CentimetersToPoints(14.8)
  .PageHeight = CentimetersToPoints(21.0)
  End With

Итого что-то типа:

Код:
Sub Макрос11()

    With Selection.PageSetup
        .LineNumbering.Active = False
        .Orientation = wdOrientPortrait
        .TopMargin = CentimetersToPoints(0)
        .BottomMargin = CentimetersToPoints(0)
        .LeftMargin = CentimetersToPoints(0)
        .RightMargin = CentimetersToPoints(0)
        .Gutter = CentimetersToPoints(0)
        .HeaderDistance = CentimetersToPoints(0)
        .FooterDistance = CentimetersToPoints(0)
        .PageWidth = CentimetersToPoints(14.8)
        .PageHeight = CentimetersToPoints(21)
        .FirstPageTray = wdPrinterDefaultBin
        .OtherPagesTray = wdPrinterDefaultBin
        .SectionStart = wdSectionNewPage
        .OddAndEvenPagesHeaderFooter = False
        .DifferentFirstPageHeaderFooter = False
        .VerticalAlignment = wdAlignVerticalTop
        .SuppressEndnotes = True
        .MirrorMargins = False
        .TwoPagesOnOne = False
        .BookFoldPrinting = False
        .BookFoldRevPrinting = False
        .BookFoldPrintingSheets = 1
        .GutterPos = wdGutterPosLeft
    End With
    Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
        wdPrintDocumentWithMarkup, Copies:=1, Pages:="", PageType:= _
        wdPrintAllPages, Collate:=True, Background:=False, PrintToFile:=False, _
        PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
        PrintZoomPaperHeight:=0
End Sub
 
Последнее редактирование:
  • Спасибо
Реакции: ~RA~
  • Спасибо
Реакции: LeonidB
Статус
Закрыто для дальнейших ответов.