Word application вставить текст

Купить диплом специалиста на выгодных условиях. http://origenaldiplom.com/

Для
создания абзацев в документе можно
использовать коллекцию Paragraphs объекта
Document, представляющую собой набор абзацев
данного документа. Добавить новый абзац
можно с помощью метода Add этой коллекции:

Арр.ActiveDocument.Paragraphs.Add;

Для
вставки собственно текста в документ
применяется не объект Paragraph, а объект
Range, представляющий любую непрерывную
часть документа (в том числе и вновь
созданный абзац). Этот объект может быть
создан разными способами. Например,
можно указать начальный и конечный
символы диапазона (если таковые имеются
в документе):

var

Rng : Variant;

…

Rng :=
App.ActiveDocument.Range(2, 4);

//
со 2-го по 4-й символы

Можно также указать
номер абзаца (например, только что
созданного):

Rng
:= Арр.ActiveDocument.Paragraphs.Item(1).Range;

Кроме того, можно
указать несколько последовательных
абзацев:

Rng
:= Арр.ActiveDocument.Range

(Арр.ActiveDocument.Paragraphs.Item(3).Range.Start,

App.ActiveDocument.Paragraphs.Item(5).Range.End)

Вставить текст
можно с помощью методов InsertBefore (перед
диапазоном) или InsertAfter (после диапазона)
объекта Range, например:

Rng.InsertAfter(‘Это
вставляемый текст’);

Помимо
объекта Range текст можно вставлять с
помощью объекта Selection, являющегося
свойством объекта Word.Application и представляющего
собой выделенную часть документа (этот
объект создается, если пользователь
выделяет часть документа мышью, и может
быть создан также с помощью
приложения-контроллера). Сам объект
Selection можно создать, применив метод
Select к объекту Range, например:

var

Sel : Variant;

Арр.ActiveDocument.Paragraphs.Item(3).Range.Select;

В
приведенном выше примере в текущем
документе выделяется третий абзац.

Если
необходимо вставить строку текста в
документ либо вместо выделенного
фрагмента текста, либо перед ним, это
можно сделать с помощью следующего
фрагмента кода:

var

Sel: Variant;

Sel
:= Арр.Selection;

Sel.TypeText(‘Этo
текст, которым мы заменим выделенный
фрагмент’);

Отметим,
что если свойство Options.ReplaceSelection объекта
Word.Application равно True, выделенный текст
будет заменен новым (этот режим действует
по умолчанию); если же нужно, чтобы текст
был вставлен перед выделенным фрагментом,
а не вместо него, следует установить
это свойство равным False:

Арр.Options.ReplaceSelection
:= False;

Символ конца абзаца
при использовании объекта Selection может
быть вставлен с помощью следующего
фрагмента кода:

Sel.TypeParagraph;

К объекту Selection,
так же как и к объекту Range, можно применить
методы InsertBefore и InsertAfter. В этом случае, в
отличие от предыдущего, вставляемый
текст станет частью выделенного фрагмента
текста.

С
помощью объекта Selection, используя его
свойство Font и свойства объекта Font, такие
как Bold, Italic, Size и другие, можно отформатировать
текст. Например, таким образом можно
вставить строку, выделенную полужирным
шрифтом:

Sel.Font.Bold := True;

Sel.TypeText(‘Этo текст,
который выделен полужирным шрифтом.’);

Sel.Font.Bold
:= False;

Sel.TypeParagraph;

Для наложения на
вставляемый текст определенного заранее
стиля можно использовать свойство Style
объекта Selection, например:

Sel.Style := ‘Heading 1;

Sel.TypeText(‘Это текст,
который станет заголовком’);

Sel.TypeParagraph;

      Большинству операций, выполняемых программным способом, есть эквиваленты в пользовательском интерфейсе (UI), доступные как команды в меню и на панелях инструментов. Также существует нижележащая архитектура, обеспечивающая поддержку команд, выбираемых из UI. Всякий раз, когда вы создаете новый документ Word, он базируется на каком-либо шаблоне; расширение файлов шаблонов «.dot», а файлы документов – «.doc». Шаблон Word может содержать текст, код, стили, панели инструментов, элементы автотекста, комбинации клавиш для быстрого доступа к командам. Новый документ связывается с шаблоном и получает полный доступ к его элементам. Если вы не указываете конкретный шаблон, новый документ создается на основе стандартного шаблона «Normal.dot», который устанавливается при установке Word).

      Шаблон Normal.dot является глобальным, он доступен любому документу, который вы создаете. Вы могли бы при желании поместить весь свой код в Normal.dot и создавать все документы в своей среде на основе собственного шаблона Normal (Обычный). Но тогда его файл мог бы стать чрезмерно большим, поэтому более эффективное решение для многих разработчиков — создание собственных шаблонов для конкретных приложений. В документах, создаваемых на основе вашего шаблона, код из стандартного шаблона Normal по-прежнему будет доступен. При необходимости можно связывать документ с несколькими шаблонами в дополнение к шаблону Normal.

      Для работы с приложением Microsoft Word в .NET, используется объект Application, который является предком всех остальных объектов. Получив на него ссылку, вы можете работать с его методами и свойствами. Этот объект предоставляет большой набор методов и свойств, позволяющих программным путем управлять Microsoft Word. Код инициализации нового объекта Application, представлен ниже.

Microsoft.Office.Interop.Word.Application winword = 
  new Microsoft.Office.Interop.Word.Application();

Чтобы открыть существующий документ или создать новый, необходимо создать новый объект Document.

object missing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Document document =
     winword.Documents.Add(ref missing, ref missing, ref missing, ref missing);

      Выполняя какую-либо операцию в пользовательском интерфейсе Word (например, добавляя верхний колонтитул), вы выделяете соответствующую секцию, используя объект «Selection», определяющий текущую позицию «невидимого» курсора и применяете к ней новый параметр форматирования с использованием объекта «Range». Данный объект представляет область в документе и может включать в себя все что угодно — от пары символов, до таблиц, закладок и много другого. Вы не ограничены одним объектом «Range» — в одном документе можно определить сразу несколько таких объектов.

//Добавление верхнего колонтитула
foreach (Microsoft.Office.Interop.Word.Section section in document.Sections)
{                   
    Microsoft.Office.Interop.Word.Range headerRange = 
    section.Headers[Microsoft.Office.Interop.Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
    headerRange.Fields.Add(headerRange, Microsoft.Office.Interop.Word.WdFieldType.wdFieldPage);
    headerRange.ParagraphFormat.Alignment = 
    Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter;
    headerRange.Font.ColorIndex = Microsoft.Office.Interop.Word.WdColorIndex.wdBlue;
    headerRange.Font.Size = 10;
    headerRange.Text = "Верхний колонтитул" + Environment.NewLine + "www.CSharpCoderR.com";
}

//Добавление нижнего колонтитула
foreach (Microsoft.Office.Interop.Word.Section wordSection in document.Sections)
{                   
    Microsoft.Office.Interop.Word.Range footerRange =
   wordSection.Footers[Microsoft.Office.Interop.Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
    
    footerRange.Font.ColorIndex = Microsoft.Office.Interop.Word.WdColorIndex.wdDarkRed;
    footerRange.Font.Size = 10;
    footerRange.ParagraphFormat.Alignment = 
    Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter;
    footerRange.Text = "Нижний колонтитул" + Environment.NewLine + "www.CSharpCoderR.com";
}

Чтобы добавить текст в документ, необходимо указать позицию для вставки и сам текст.

//Добавление текста в документ
document.Content.SetRange(0, 0);
document.Content.Text = "www.CSharpCoderR.com" + Environment.NewLine;

Так же вы можете применить к тексту определенный стиль.

//Добавление текста со стилем Заголовок 1
Microsoft.Office.Interop.Word.Paragraph para1 = document.Content.Paragraphs.Add(ref missing);
object styleHeading1 = "Заголовок 1";
para1.Range.set_Style(styleHeading1);
para1.Range.Text = "Исходники по языку программирования CSharp";
para1.Range.InsertParagraphAfter();

      В классе Microsoft.Office.Interop.Word.Document, присутствует коллекция «Tables», которая позволяет добавить таблицу в документ с использованием метода Add.

//Создание таблицы 5х5
Table firstTable = document.Tables.Add(para1.Range, 5, 5, ref missing, ref missing);

firstTable.Borders.Enable = 1;
foreach (Row row in firstTable.Rows)
{
    foreach (Cell cell in row.Cells)
    {
        //Заголовок таблицы
        if (cell.RowIndex == 1)
        {
            cell.Range.Text = "Колонка " + cell.ColumnIndex.ToString();
            cell.Range.Font.Bold = 1;
            //Задаем шрифт и размер текста
            cell.Range.Font.Name = "verdana";
            cell.Range.Font.Size = 10;                                                     
            cell.Shading.BackgroundPatternColor = WdColor.wdColorGray25;
            //Выравнивание текста в заголовках столбцов по центру
            cell.VerticalAlignment = 
                 WdCellVerticalAlignment.wdCellAlignVerticalCenter;
            cell.Range.ParagraphFormat.Alignment = 
                 WdParagraphAlignment.wdAlignParagraphCenter;
        }
        //Значения ячеек
        else
        {
            cell.Range.Text = (cell.RowIndex - 2 + cell.ColumnIndex).ToString();
        }
    }
}

       Для функционирования описанного выше кода, необходимо добавить к текущему проекту объектную библиотеку MS Word. Перейдите в меню «Проект» и выберете команду «Добавить ссылку» или в обозревателе решений, найдите пункт «Ссылки» и сделайте клик правой клавишей мыши по нему, из появившегося контекстного меню выберете соответствующий пункт.

      В открывшемся окне «Добавить ссылку», перейдите на вкладку «COM» и выберете «Microsoft Word 14.0 Object Library» из предложенного списка библиотек.

В обозревателе решений у вас появится ссылка на данную библиотеку.

      Перейдите в конструктор главной формы и добавьте из панели элементов, командную кнопку «Button». Данный элемент необходим для запуска процесса создания документа и вызов MS Word для отображения.

      Сделайте двойной клик левой клавишей мыши по элементу «Button» и вы перейдете в автоматически созданный метод события «button1_Click». Добавьте в него приведенный ниже код.

try
{               
    Microsoft.Office.Interop.Word.Application winword = 
        new Microsoft.Office.Interop.Word.Application();
    
    winword.Visible = false;

    //Заголовок документа
    winword.Documents.Application.Caption = "www.CSharpCoderR.com";

    object missing = System.Reflection.Missing.Value;

    //Создание нового документа
    Microsoft.Office.Interop.Word.Document document =
        winword.Documents.Add(ref missing, ref missing, ref missing, ref missing);

    //добавление новой страницы
    //winword.Selection.InsertNewPage();

    //Добавление верхнего колонтитула
    foreach (Microsoft.Office.Interop.Word.Section section in document.Sections)
    {                   
        Microsoft.Office.Interop.Word.Range headerRange = section.Headers[
        Microsoft.Office.Interop.Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
        headerRange.Fields.Add(
       headerRange, Microsoft.Office.Interop.Word.WdFieldType.wdFieldPage);
        headerRange.ParagraphFormat.Alignment = 
       Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter;
        headerRange.Font.ColorIndex = 
       Microsoft.Office.Interop.Word.WdColorIndex.wdBlue;
        headerRange.Font.Size = 10;
        headerRange.Text = "Верхний колонтитул" + Environment.NewLine + "www.CSharpCoderR.com";
    }

    //Добавление нижнего колонтитула
    foreach (Microsoft.Office.Interop.Word.Section wordSection in document.Sections)
    { 
        //
        Microsoft.Office.Interop.Word.Range footerRange =
wordSection.Footers[Microsoft.Office.Interop.Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
        //Установка цвета текста
        footerRange.Font.ColorIndex = Microsoft.Office.Interop.Word.WdColorIndex.wdDarkRed;
        //Размер
        footerRange.Font.Size = 10;
        //Установка расположения по центру
        footerRange.ParagraphFormat.Alignment = 
            Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter;
        //Установка текста для вывода в нижнем колонтитуле
        footerRange.Text = "Нижний колонтитул" + Environment.NewLine + "www.CSharpCoderR.com";
    }

    //Добавление текста в документ
    document.Content.SetRange(0, 0);
    document.Content.Text = "www.CSharpCoderR.com" + Environment.NewLine;

    //Добавление текста со стилем Заголовок 1
    Microsoft.Office.Interop.Word.Paragraph para1 = document.Content.Paragraphs.Add(ref missing);
    object styleHeading1 = "Заголовок 1";
    para1.Range.set_Style(styleHeading1);
    para1.Range.Text = "Исходники по языку программирования CSharp";
    para1.Range.InsertParagraphAfter();

    //Создание таблицы 5х5
    Table firstTable = document.Tables.Add(para1.Range, 5, 5, ref missing, ref missing);

    firstTable.Borders.Enable = 1;
    foreach (Row row in firstTable.Rows)
    {
        foreach (Cell cell in row.Cells)
        {
            //Заголовок таблицы
            if (cell.RowIndex == 1)
            {
                cell.Range.Text = "Колонка " + cell.ColumnIndex.ToString();
                cell.Range.Font.Bold = 1;
                //Задаем шрифт и размер текста
                cell.Range.Font.Name = "verdana";
                cell.Range.Font.Size = 10;                                                     
                cell.Shading.BackgroundPatternColor = WdColor.wdColorGray25;
                //Выравнивание текста в заголовках столбцов по центру
                cell.VerticalAlignment =
                WdCellVerticalAlignment.wdCellAlignVerticalCenter;
                cell.Range.ParagraphFormat.Alignment = 
                WdParagraphAlignment.wdAlignParagraphCenter;
            }
            //Значения ячеек
            else
            {
                cell.Range.Text = (cell.RowIndex - 2 + cell.ColumnIndex).ToString();
            }
        }
    }
    winword.Visible = true;
}
catch (Exception ex)
{
    MessageBox.Show(ex.Message);
}

      Запустите ваш проект, нажав на клавиатуре, клавишу «F5». Нажмите на единственную кнопку, расположенную на главной форме вашего проекта. У вас автоматически откроется документ Microsoft Word с заполненным верхним и нижним колонтитулом, обычным и с применением стиля текстом, а так же заполненной таблицей.

      Для сохранения документа в определенной директории, добавьте приведенный ниже код, после строки «winword.Visible = true;».

//Сохранение документа
object filename = @"d:temp1.docx";
document.SaveAs(ref filename);
//Закрытие текущего документа
document.Close(ref missing, ref missing, ref missing);
document = null;
//Закрытие приложения Word
winword.Quit(ref missing, ref missing, ref missing);
winword = null;

      При работе с приложением Word в памяти компьютера создается отдельный процесс, если его не закрыть или не вывести созданный документ на экран, то он будет работать до выключения компьютера. Так же при постоянной работе с такими документами, их процессы будут накапливаться незаметно для пользователя, что может привести к зависанию компьютера или другим последствиям.

Продолжение былинной саги про Office.Interop.Word. Самый простой способ вставить кусок текста в нужную часть Word-шаблона — использовать закладки. В отличие от текстовых меток закладки не надо искать, они невидимы и всегда имеют уникальное имя. Имея открытый в предыдущей части документ Word мы можем с легкостью получить диапазон-Range для закладки (bookmark).

Word.Range bookmarkRange = _document.Bookmarks.get_Item(ref bookmarkNameObj).Range;

Кроме банальной вставки текста хотелось бы его немного поформатировать — жирный/курсив, размер текста, выравнивание абзаца. Все это доступно через интерфейс Range.

Полужирное начертание через Range.Bold и курсив через Range.Italic. Надо заметить что вместо напрашивающегося bool эти свойства имеют тип int

_range.Bold = 1; 
_range.Italic = 1; 

Выравнивание текста задается через перечисление WdParagraphAlignment и свойство ParagraphFormat.Alignment

_range.ParagraphFormat.Alignment == Word.WdParagraphAlignment.wdAlignParagraphLeft

Надо заметить, что при вставке текста в диапазон текущее выравнивание заменяется выравниванием по центру, так что его лучше сохранять и восстанавливать.

Размер шрифта через свойство Size интерфейса Font. Оно имеет редкий тип float, хотя в реальности размер шрифта задается целым числом.

_range.Font.Size = 11;

И напоследок рассмотрим вставку более объемного текста — нескольких абзацев подряд. Алгоритм достаточно прост, вставляем абзац, заполняем и форматируем, вставляем следующий. Используем метод Range.Collapse и перечисление CollapseDirection

Object collapseDirection = Word.WdCollapseDirection.wdCollapseEnd;
_currentRange.Collapse(ref collapseDirection);
_currentRange.InsertParagraphAfter();

Надо учитывать, что при заполнении вставленного таким образом абзаца текстом он сольется с предыдущим абзацом. Чтобы избежать этого надо при вставке текста добавлять к нему символ конца абзаца методом InsertParagraphAfter. Это не надо делать в случае вставки текста на текстовую метку, закладку или ячейку таблицы.

_range.InsertParagraphAfter();

Еще одно свойство диапазона используется в основном при работе с таблицами — речь идет о границах (например ячейки в таблице) задаваемых через перечисление WdLineStyle и интерфейс Borders (для таблицы в целом такой метод не работает). В принципе границы можно задавать для любого куска документа.

_range.Borders.OutsideLineStyle = Word.WdLineStyle.wdLineStyleNone; 

1. Работаем с MS Word из C#, часть 0, класс и тестовый проект-пример WinForms
2. Работаем с MS Word из C#, часть 1. Открываем шаблон, ищем текст внутри документа
3. Работаем с MS Word из C#, часть 2. Вставляем текст на закладку и форматируем
4. Работаем с MS Word из C#, часть 3. Работа с таблицами
5. Работаем с MS Word из C#, часть 4. Обьединяем несколько файлов в один, считаем количество страниц
6. Microsoft.Office.Interop.Word Namespace
7. Range Interface