how to split a word file page wise using C#.NET(4) and open xml sdk 2.0?

Question

0.00/5 (No votes)

See more:

Hi All,

I have my application written using C#.net and open XML SDK(2.0).I have splitted the word file paragraph wise and section wise using open XML tags.But i could not find anything about split a word file page wise...

Pleas Guide me get out of this issue.

Posted 29-Mar-11 18:52pm

saravanan6

Updated 29-Mar-11 19:09pm

Ramalinga Koushik

v2

Add a Solution

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Prerak Patel · Answer 1 · 2011-03-29T19:11:00

Here[^] is the VB way, you have to change it to C#.

VB

Dim WordApp As New Word.Application
       Dim BaseDoc As Word.Document
       Dim DestDoc As Word.Document
       Dim intNumberOfPages As Integer
       Dim intNumberOfChars As String
       Dim intPage As Integer

       'Word Constants
       Const wdGoToPage = 1
       Const wdStory = 6
       Const wdExtend = 1
       Const wdCharacter = 1

       'Show WordApp
       WordApp.ShowMe()

       'Load Base Document
       BaseDoc = WordApp.Documents.Open(Filename)
       BaseDoc.Repaginate()

       'Loop through pages
       intNumberOfPages = BaseDoc.BuiltInDocumentProperties("Number of Pages").value
       intNumberOfChars = BaseDoc.BuiltInDocumentProperties("Number of Characters").value

       For intPage = 1 To intNumberOfPages
           If intPage = intNumberOfPages Then
               WordApp.Selection.EndKey(wdStory)
           Else
               WordApp.Selection.GoTo(wdGoToPage, 2)
               Application.DoEvents()

               WordApp.Selection.MoveLeft(Unit:=wdCharacter, Count:=1)
           End If

           Application.DoEvents()

           WordApp.Selection.HomeKey(wdStory, wdExtend)
           Application.DoEvents()

           WordApp.Selection.Copy()
           Application.DoEvents()

           'Create New Document
           DestDoc = WordApp.Documents.Add
           DestDoc.Activate()
           WordApp.Selection.Paste()
           DestDoc.SaveAs(NewFileName & intPage.ToString & ".doc")
           DestDoc.Close()
           DestDoc = Nothing

           WordApp.Selection.GoTo(wdGoToPage, 2)
           Application.DoEvents()

           WordApp.Selection.HomeKey(wdStory, wdExtend)
           Application.DoEvents()

           WordApp.Selection.Delete()
           Application.DoEvents()
       Next

       BaseDoc.Close(False)
       BaseDoc = Nothing

       WordApp.Quit()
       WordApp = Nothing
   End Sub