Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Сообщений [ 6 ]
- ba4inskii
- рядовой
- Неактивен
- Зарегистрирован: 07.02.2011
- Сообщений: 5
Тема: Разрыв страницы
Всем привет!
У меня есть проблема со вставкой разрыва страниц.
Вставка происходит на новой строке, и если страница полностью заполнена, то создается пустая страница, что не есть гуд.
Как на автомате сделать чтобы разрыв вставлялся на текущей строке?
Руками удалять не могу, т.к. файл создается автоматически с помощью COM.
Спасибо.

- viter.alex
- Модератор
- Неактивен
- Откуда: Харьков, Украина
- Зарегистрирован: 21.12.2009
- Сообщений: 884
- Поблагодарили: 140
Re: Разрыв страницы
Попробуйте вставлять разрыв не в конце абзаца, который должен быть последним в разделе, а в начале первого абзаца следующего раздела. Например, если второй раздел должен заканчиваться после двадцатого абзаца, то разрыв нужно вставлять перед двадцать первым абзацем, а не после двадцатого.
Ну и было бы неплохо, чтобы вы привели фрагмент кода, отвечающего за вставку разрыва. Даже если код не на VBA
Лучше день потерять — потом за пять минут долететь!
- ba4inskii
- рядовой
- Неактивен
- Зарегистрирован: 07.02.2011
- Сообщений: 5
Re: Разрыв страницы
viter.alex не много не понял(((
Вот код
private void addToWord(StandartExport standart, Word.Application appWord, int locale)
{
Object pageBreak = Word.WdBreakType.wdPageBreak;
Word.TableOfContents toc = null;
object style = GetStyle(standart.Level);
appWord.Selection.set_Style(ref style);
switch (standart.Type)
{
case StandartType.Standart:
appWord.Selection.TypeText(StringConvertor.GetStringByLocale(standart.Description, locale));
appWord.Selection.InsertBreak(ref pageBreak);
#region Оглавление
object useLinks = true;
appWord.Selection.TypeText("ОГЛАВЛЕНИЕ");
toc = appWord.ActiveDocument.TablesOfContents.Add(appWord.Selection.Range,
ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj,
ref useLinks, ref missObj, ref missObj);
#endregion
appWord.Selection.InsertBreak(ref pageBreak); /*Проблема вот тут,
если после обновления оглавления оно занимает ровно страницу*/
break;
case StandartType.StandartCheckList:
addToWordCheckList(standart, appWord, locale);
break;
case StandartType.StandartNode:
/*тут тоже код*/
break;
}
foreach (StandartExport child in standart.ChildsNodes)
addToWord(child, appWord, locale);
// обновление оглавления
if (toc != null)
toc.Update();
}
- ba4inskii
- рядовой
- Неактивен
- Зарегистрирован: 07.02.2011
- Сообщений: 5
Re: Разрыв страницы
Вот скрин того что есть (сверху)
и то что хочется получить (снизу)
Post's attachmentsdoc.png 262.97 Кб, файл не был скачан.
You don't have the permssions to download the attachments of this post.
- ba4inskii
- рядовой
- Неактивен
- Зарегистрирован: 07.02.2011
- Сообщений: 5
Re: Разрыв страницы
Up
Может быть кто-нить в курсе?
- ba4inskii
- рядовой
- Неактивен
- Зарегистрирован: 07.02.2011
- Сообщений: 5
Re: Разрыв страницы
и еще. После отработки блока case StandartType.Standart:
Получается то что на скрине.
Может я что-то не так делаю?
Post's attachmentsUntitled.png 25.71 Кб, файл не был скачан.
You don't have the permssions to download the attachments of this post.
Сообщений [ 6 ]
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Разрыв страницы
Чем мощнее и грандиознее та или иная программа, тем сложнее с ней разобраться. Взять Microsoft Word. На первый взгляд все просто, на второй тоже, на третий, вообще думать не надо, а на четвертый оказывается, что в редакторе уйма скрытых возможностей, о которых мы и не подозревали. Наш сайт о Microsoft Office Word даст ответ про: как в ворде открыть математические символы.
Вы убиваете целый вечер на работу, а коллега сделал ее за час-другой? Как ему это удалось? А легко: он оптимизировал и настроил свой Word. Наш сайт о Microsoft Office Word даст ответ про: как выделить отдельные буквы в тексте.
На сайте и форуме Ворд Эксперт очень много решений, как это сделать. Можно написать макрос для каждой операции, выбрать оптимальную настройку приложения или создать шаблон. На портале о Microsoft Office Word вы узнаете про: как не нумеровать страницы в ворде.
Обсудить достоинства и недостатки их, различные методы работы с текстом, преимущества и изъяны версий вы можете на форуме. Наш сайт о Microsoft Office Word даст ответ про: не наводится курсор в таблице.
Если вы никогда раньше не писали макросы, то не беда, все предельно ясно и доступно, а для пытливого ума ссылка на дополнительную литературу. Наш сайт о Microsoft Office Word даст ответ про: синоним к слову узнать.
Конечно, можно взять чье-то готовое решение, такие тоже выкладывают на Ворд Эксперт в специальном подразделе, а можно просто озвучить проблему и попросить помощи у умельцев в разделе заявок. Наш сайт о Microsoft Office Word даст ответ про: как распечатать документ без рамки правки в ворде.
В общем, у вас есть возможность, посетив форум, сделать свой Ворд еще более легким, приятным и быстрым. На портале о Microsoft Office Word вы узнаете про: удалить сноску word.
Не упускайте ее!