Содержание
- 1 Как сохранить каждую страницу ворд документа в отдельный файл
- 2 Как сохранить отдельные страницы в Word?
- 3 Как в ворде сохранить каждую страницу отдельно?
- 3.1 Как в ворде сохранить одну страницу?
- 3.2 Как разбить Word файл на несколько частей?
- 3.3 Как правильно разделить страницы в Word?
- 3.4 Как в Ворде вставить лист из другого документа?
- 3.5 Как сохранить отдельные листы пдф?
- 3.6 Как скопировать рамку в ворде на другую страницу?
- 3.7 Как разделить файл ворд на 4 части?
- 3.8 Как правильно сохранить документ в ворде?
- 3.9 Как сделать разделение страниц в Word Pad?
- 3.10 Как в ворде сделать расстояние между страницами?
- 3.11 Для чего разрыв страницы в ворде?
- 3.12 Как вставить лист из одного документа в другой?
- 3.13 Как вставить лист из одного документа в другой Excel?
- 3.14 Как вставить свой титульный лист в ворде?
Как сохранить каждую страницу ворд документа в отдельный файл
Сообщение было отредактировано: 27 июл 07, 01:00
автор |
‘————-Begin—————— Sub doc_splitter() ‘ Copyright by W. Polmann ‘ Use at your own risk |
Dim Mldg, Titel, Voreinstellung, Batches
Mldg = "Number of batches?"
Titel = "Freeware by www.ecm-e.de, W. Polmann."
Voreinstellung = "1" ‘ Voreinstellung festlegen.
‘ Meldung, Titel und Standardwert anzeigen.
Batches = InputBox(Mldg, Titel, Voreinstellung)
Prozentsprung = 100 / Batches
For x = 1 To Batches
ActiveDocument.SaveAs FileName:="Teil_" & x & "_" & origdoc & ".doc", _
FileFormat:=wdFormatDocument, LockComments:=False, Password:="", _
AddToRecentFiles:=True, WritePassword:="", ReadOnlyRecommended:=False, _
EmbedTrueTypeFonts:=False, SaveNativePictureFormat:=False, SaveFormsData _
:=False, SaveAsAOCELetter:=False
EndeProzentsprung = Prozentsprung * x
AnfangProzentsprung = EndeProzentsprung — Prozentsprung
Selection.GoTo What:=wdGoToPercent, Which:=wdGoToNext, Count:=AnfangProzentsprung, Name:=""
Anfang = Selection.Start
Selection.GoTo What:=wdGoToPercent, Which:=wdGoToNext, Count:=EndeProzentsprung, Name:=""
‘ Bis zur nächsten Absatzmarke hoch
Selection.Find.ClearFormatting
With Selection.Find
.text = "^p"
.Replacement.text = ""
.Forward = True
.Wrap = wdFindAsk
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute
Selection.MoveRight Unit:=wdCharacter, Count:=1
Ende = Selection.End
Set Range = ActiveDocument.Range(Anfang, Ende)
Selection.WholeStory
Selection.Delete Unit:=wdCharacter, Count:=1
Selection.Paste
ActiveDocument.Save
ActiveDocument.Close
Documents.Open FileName:=origdoc, _
ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
wdOpenFormatAuto
Sub mr_ZM()
Dim wrd As Object, doc As Object, x As Range, y As Range
Set wrd = CreateObject("word.application")
‘wrd.Visible = True
For Each x In Range(Range("A2"), Range("A1").End(xlDown))
Set doc = wrd.Documents.Open(Filename:="c:\temp\mr_ZM шаблон1.doc", ConfirmConversions:= _
False, ReadOnly:=True)
For Each y In Range(x, x.End(xlToRight))
With doc.Range.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "#" & y.End(xlUp) & "#"
.Replacement.Text = y
.Forward = True
.Wrap = 1 ‘wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.Execute Replace:=2 ‘wdReplaceAll
End With
Next
doc.SaveAs "C:\temp\output\" & x & "_" & x.Offset(0, 1)
doc.Close 0
Next
wrd.Quit
работает как надо но не копирует колонтитулы.. Что можно дописать?
Сообщение было отредактировано: 10 май 15, 10:20
[b][b]как можно в этом макросе [/b][/b]
Модератор: Учимся использовать тэги оформления кода — FAQ |
[b][b]добавить такую функцию, которая сохраняла бы все файлы в тхт?[/b][/b]
Сообщение было отредактировано: 12 май 15, 16:47
Как сохранить отдельные страницы в Word?
Допустим, я хочу сохранить 3, 7 и 10 страницы. Ворд может распечатать эти страницы в файл, однако, только в формате prn. Можно ли сохранить определенный список страниц в doc или pdf?
можно сохранить отдельные страницы в Word путем самой программы Word, можно с помощью скринов, копированием отдельных документов и вставки их в вышеуказанную программу. Можно и сохранить в формате PDF, только вам следует обновить программу Word/
Скопируйте нужные листы в отдельный файл, выделив предварительно их. Можно и каждую в отдельном файле сохранить. Только смотрите на начало и конец текста на каждой странице, чтобы не было разорванных предложений.
Есть такая возможность в самом Ворде. Если это ворд 2003 года, то вкладка сервис и там статистика. Выскакивает отдельное окно, и там будет указано количество символов с пробелами и без. Если ворд 2007 или 2010, то данная функция находится на вкладке рецензирование, в левой части, где написано правописание. Кнопка с цифрами 1, 2, 3 и первыми английскими буквами. Это очень удобно при выполнении заказов на биржах (если требуется определенное количество символов без пробелов).
Как правило, никакой разницы между понятиям "документ Word" и "файл Word" нет. Хотя в программе Word можно готовить далеко не только документы, а также, письма, рассказы, схемы, фоторепортажи и т.п. — их все же принять условно называть документами, т.к. это самое распространенное применение программы. Документы Word хранятся в формате .DOC или .DOCX.
И все же Word может обрабатывать не только файлы с документами. В нем, например, можно готовит шаблоны документов (файлы с расширением .DOT), которые содержат описание стилей оформления документов. Это файлы являются файлами Word, но не называются документами.
Также Word может сохранять документы в форматах, отличных от .DOC и .DOCX, например, в .RTF. или .PDF. Это все равно документы, но их не вполне корректно называть "файлами Word" т.к. эти форматы разработаны не специально для него.
Для того, чтобы создать круг в Word, необходимо выбрать раздел "Вставка". Там, подразделе "Иллюстрации" есть пункт "Фигуры". Список фигур большой, и среди основных фигур находится Овал.
Его и выбираем. Для того, чтобы получился именно круг, а не овал, при растягивании объекта на листе удерживаем клавишу Shift. При изменении размера также стоит удерживать Shift, дабы пропорции были сохранены.
Затем, выбрав круг, мы видим в левой верхнем меню кнопку — "Изменить текст". Нажимаем на нее и можно писать текст в фигуре. В последствии полученный текст можно редактировать и выравнивать по центру/краям. При необходимости текст можно и повернуть.
Создать отдельный текстовый файл с нужным вам содержанием и отправить. Зачем же себе жизнь усложнять? Или я как-то неправильно понял ваш вопрос? Тогда опишите вашу ситуацию поподробнее пожалуйста и я постараюсь помочь.
Когда копируют текст из интернета в Microsoft Word многие удивляются, почему получается "кривой" документ — в нем присутствуют большие пробелы между словами, невозможно применить команды по форматированию параграфа, да и ссылки на сайты тоже не плохо было бы удалить. Для того, чтобы это все удалить, необходимо включить в закладке Home/главная команду Показать/скрыть (show/hide). эта команда покажет на экране все скрытые символы. Следующее действие — удалить эти символы. Как это сделать — в этом видео.
Как в ворде сохранить каждую страницу отдельно?
Как в ворде сохранить одну страницу?
Открыть «Файл»; Выбрать «Сохранить как»; Ввести имя файла, нажать «Сохранить»; В выпадающем списке указать расширение «Документ Word 97-2003» и изменить на «.
Как разбить Word файл на несколько частей?
Разделите документ Word на отдельные файлы каждые 10 или n страниц с удивительной функцией
- Нажмите Kutools Plus > Трещина, см. …
- В появившемся диалоговом окне установите следующие операции, как вам нужно, см. …
- После завершения настроек нажмите OK, и весь документ будет разделен на несколько файлов для каждой страницы, см.
Как правильно разделить страницы в Word?
Вставка разрыва страницы в Word
- Установите курсор там, где нужно завершить одну страницу и начать новую.
- Выберите Вставка > Разрыв страницы.
Как в Ворде вставить лист из другого документа?
- Щелкните или нажмите место, куда нужно вставить содержимое существующего документа.
- На вкладке «Вставка» выберите стрелку рядом с объектом .
- Выберите текст из файла.
- Найдите нужный файл и дважды щелкните его.
- Чтобы добавить содержимое других документов Word, повторите эти действия.
Как сохранить отдельные листы пдф?
Разделение файла PDF
- Откройте документ PDF в Acrobat DC.
- Выберите «Упорядочить страницы» > «Разделить».
- Выберите способ разделения для одного или нескольких файлов.
- Введите имя и сохраните файл. …
- Разделите файл PDF. …
- Сохраните документ как новый файл.
Как скопировать рамку в ворде на другую страницу?
Ведь любая рамка представляется в виде фигуры, поэтому ее можно вырезать и вставлять в другое место. Достаточно нажать на этот элемент правой кнопкой мыши и выбрать из выпадающего меню пункт «Вырезать» (или «Скопировать»). В данном случае рамка в «ворде» поступит в буфер обмена.
Как разделить файл ворд на 4 части?
Чтобы разделить страницу на 4 части, вы можете вставить таблицу для выполнения задания.
- Поместите курсор в левый верхний угол страницы, затем щелкните Вставить > Настольные, выберите Стол 2×2.
- Таблица была вставлена, затем перетащите правый угол таблицы, чтобы изменить ее размер по своему усмотрению.
Как правильно сохранить документ в ворде?
Чтобы сохранить определённую часть текста внутри Microsoft Word в отдельном документе, не нужно знать никаких хитростей, касающихся работы с этим текстовым редактором. Просто выделяем блоком эту часть текста, копируем её в одном документе и вставляем в другом. Затем сохраняем новый DOCX-файл.
Как сделать разделение страниц в Word Pad?
Добавление принудительного разрыва страницы
- Кликните левой кнопкой мышки по месту, в котором необходимо разделить страницу, то есть, начать новый лист.
- Перейдите во вкладку “Вставка” и нажмите на кнопку “Разрыв страницы”, расположенную в группе “Страницы”.
- Разрыв страницы будет добавлен в выбранном месте.
Как в ворде сделать расстояние между страницами?
Выполните следующие действия.
- Нажмите Кнопку Microsoft Office, а затем нажмите кнопку Параметры Word.
- В левой области нажмите кнопку настроить.
- В списке выбрать команды из выберите Все команды.
- Щелкните Пустое пространство между страницами, нажмите кнопку Добавитьи нажмите кнопку ОК.
Для чего разрыв страницы в ворде?
Применение разрыва страницы сделает главы в одном документе независимыми. Новая глава будет начинаться с новой страницы и правка предыдущей главы не повлияет на вторую. Она всегда будет начинаться с начала страницы.
Как вставить лист из одного документа в другой?
Копирование страницы в одностраничном документе
- Нажмите клавиши CTRL+A, чтобы выделить весь текст в документе. Совет: Для этого также можно установить курсор в левом поле и быстро щелкнуть левую кнопку мыши три раза подряд.
- Нажмите клавиши CTRL+C, чтобы скопировать весь выделенный фрагмент.
Как вставить лист из одного документа в другой Excel?
Перемещение и копирование листа Excel в другую книгу
- Щелчок правой кнопкой мышки по ярлычку листа вызываем контекстное меню.
- Выбираем опцию «Переместить или скопировать».
- 3 В появившимся диалоговом окне из выпадающего списка выбираем файл в который мы хотим скопировать лист. После чего нам доступен список его листов.
Как вставить свой титульный лист в ворде?
Добавление титульной страницы
- На вкладке Вставка в группе Страницы выберите элемент Титульная страница.
- Выберите макет титульной страницы из коллекции. Добавив титульную страницу, вы можете заменить текст образца собственным вариантом. Для этого щелкните, чтобы выделить определенную область страницы (например, заголовок), и введите своей текст.