Print word document table to take up the whole page Word 2010

Posted on 2011-05-12
Last Modified: 2012-06-27
I have word 2010 and i have a table but i want it to print to take up all of the paper and leave no empty spacing like a border. The whole page.
Question by:IATA-techops
    LVL 10

    Expert Comment

    This may work for you:

    Sub PrintCurr()
        Application.PrintOut FileName:="", Range:=wdPrintCurrentPage
    End Sub
    How to use:
    Copy the code above.
    Open Word.
    Hit Alt+F11 to open the Visual Basic Editor (VBE).
    On the left, double-click "normal" or "".
    Then, under, double-click ThisDocument.
    Paste the code into the window that appears at right.
    Hit the save diskette and close the VBE window.
    Add a toolbar button, using Tools-Customize, that runs the macro. Put it up next to your printer toolbar button if you use it a lot.

    Author Comment

    Is this supposed to start the text and the table all the way ontop of the paper? I ran it and it did not

    Author Comment

    I have an already existing document that has the margins the way they should be how can i see exactly how tha tone is and then set those options to the other document?
    LVL 10

    Assisted Solution

    I havent tried will have to modify for yours:
    Public Function RunWordMacroOrSub()

    'Check Tools/Reference Microsoft Word Object Library
    'declare variables
    Dim wdApp As Word.Application
    Dim wdDoc As Word.Document

    'Word application stuff
    Set wdApp = New Word.Application
    wdApp.Visible = False
    Set wdDoc = wdApp.Documents.Open("C:\Documents and Settings\hannes\Desktop\Blah Blah Blah.doc")

    Dim table_var As Object

    table_var = table1.Table
    'wdDoc.PrintOut Copies:=1
    wdDoc.Print table_var

    Set wdDoc = Nothing
    Set wdApp = Nothing

    End Function

    Author Comment

    There has to be a margin setting or a fit to page option i just cant find them or the correct settings. I just want to print the page using the whole page.
    LVL 30

    Assisted Solution

    by:Paul Sauvé
    Is this what you're looking for? Margins
    LVL 10

    Expert Comment

    Thanks Paul...   For your comment, my impression is that he had soothing custom...

    Accepted Solution

    Thank you.

    Author Closing Comment

    Good work.

    Featured Post

    Looking for New Ways to Advertise?

    Engage with tech pros in our community with native advertising, as a Vendor Expert, and more.

    Join & Write a Comment

    I would like to show you some basics you can do with Mailings in MS Word. It´s quite handy feature you can use for creating envelopes, labels, personalized letters etc. First question could be what is this feature good for? Mailing can really he…
    Shortcuts in Word Just the other day I had a training for Microsoft and they wanted me to show how well the new Windows and Office behaved on a touch device, which by the way is great, but it was only then that I realized that using keyboard shortc…
    In this video, we show how to convert an image-only PDF file into a PDF Searchable Image file, that is, a file with both the image (typically from scanning) and text, which is created in an automated fashion with Optical Character Recognition (OCR) …
    This video walks the viewer through the process of creating envelopes and labels, with multiple names and addresses. Navigate to the “Start Mail Merge” button in the Mailings tab: Follow the step-by-step process until asked to find the address doc…

    746 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    21 Experts available now in Live!

    Get 1:1 Help Now