Printable View
Hi, I'm creating word doc from my vb6 application. I writes some data on each page.
After desired contents on the page i use pagebreak so that it will go to second page.
here what i need that when i use Insertbreak command then before that i have to write something
on the end line of page. so the question is how to find last line of that page and write on that line and
then send Insertbreak command.
goto next page, move back 1 character, but this will take you to end of text on page, not bottom of page, better to put in footer if possible, but then same for all pages, except field values
if you need to write at the bottom of page, without using footers, either you will have to fill page with empty paragraphs to bottom line, or insert a textbox or frame in the correct position
Means I always have to count the lines. sometimes data comes from database. so we don't know how much
lines it will consume and we never come to know whether we are on next page or on current.
I think the best way is to put it in footer or try to insert a textbox or frame as you suggested.
Can u post some code to put in textbox or frame or how to insert value in footer.
thanx for your reply.
did you try recording a macro?Quote:
Can u post some code to put in textbox or frame or how to insert value in footer.
No I haven't. Can u post some example to put something on the last line of page using macro.?
this will put a textbox with some text at the bottom of the current page
change positions etc to suitCode:Set tb = ActiveDocument.Shapes.AddTextbox(msoTextOrientationHorizontal, 40, (ActiveDocument.PageSetup.PageHeight - 150), 350, 50)
tb.TextFrame.TextRange.Text = "this is a test 23"
you can use the selection object to go to next page or a specific page, like
working with textbox shapes in word is not specially easyCode:Selection.GoTo wdGoToPage, wdGoToNext