Microsoft Office

Microsoft Office questions? Ask an IT Expert for support ASAP

Ask a Computer Expert,
Get an Answer ASAP!

I have a 740 page .doc in Word 2003 that I am trying to

Customer Question
Hi. I have a 740...
Hi. I have a 740 page .doc in Word 2003 that I am trying to publish both as a 5.5 x 8.5 pBook and as various eBook PDF with several smaller "page" sizes.
I need a VB macro for word that will look for tables, and expand/contract the last column of each table such that the total width of the table is a constant that is in the VB macro, thus the table will take exactly the entire page width.
I'm sure there is something out there like that.
Thank you
Submitted: 3 years ago.Category: Microsoft Office
Show More
Show Less
Ask Your Own Microsoft Office Question
Answered in 2 hours by:
6/5/2015
Microsoft Office Technician: Christopher Love, Expert replied 3 years ago
Christopher Love
Category: Microsoft Office
Satisfied Customers: 139
Experience: Owner at CJL & Associates
Verified
Hello, my name is Chris. I have read your request and I agree this should be possible. I'll need some time to write the macro and test it before I send it to you. Can you send me a sample page(s) so I can see exactly what the macro should perform? If you send it on Wikisend.com and upload your page(s) there, I'll get you an answer with either the Macro or whether I can do it by tomorrow. Let me know if you want me to proceed.
Ask Your Own Microsoft Office Question
Microsoft Office Technician: Michael Hannigan, Office Specialist replied 3 years ago
Michael Hannigan
Michael Hannigan, Office Specialist
Category: Microsoft Office
Satisfied Customers: 11,888
Experience: 25+ Years Experience in Computers and Electronics. Microsoft Certified MCSE, MCDBA, MCP, Microsoft Partner
Verified
Hello. My name is Michael.
I'm not really crazy about the solution but this is what I found
Thing I don't like about it is that it relies on using Excel as well which makes it pretty fragile. But, it could be implemented to customize the tables programmatically.
Sub test()
folder_Modules_xls = "C:\Modules"
path_template_report = "C:\template_report.docx"
'Get all the selected modules and deduct Bookmarks by removing extension (*.xls or *.xlsx)
SelectedModules = "test.xlsx"
'OPEN main Word File
Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Open(path_template_report)
objWord.Visible = True
'Extract Bookmark that will be used in word file.
Bookmarks = Left(SelectedModules, WorksheetFunction.Search(".", SelectedModules) - 1)
'OPEN Excel file to print into the main Word file
Set wb = Workbooks.Open(folder_Modules_xls & "\" & SelectedModules)
'READ the number of range name in the xls file corresponding to the number of print area
printAreaQty = ActiveWorkbook.Names.Count
'rRange = RecoverNameRange("Print_Area1")
'In the Word file, go to the corresponding bookmark
objDoc.Bookmarks(Bookmarks).Select
'Skip a line
objWord.Selection.TypeText (vbCrLf) 'return carriage
'Select the print area #1 in the xls file
Application.Range("Print_Area1").Copy
'Paste the table at the selected bookmark in the main word doc.
objWord.Selection.Paste
Application.CutCopyMode = False
'CUSTOMIZE THE TABLE (the newest)
With objDoc.Tables(objDoc.Tables.Count)
.AutoFitBehavior wdAutoFitWindow 'fit to the page
.Rows.SetHeight RowHeight:=objWord.CentimetersToPoints(0.5), HeightRule:=wdRowHeightExactly 'adjust row height
End With
'Close Excel file
Workbooks(SelectedModules).Close SaveChanges:=False
Set wb = Nothing
'CLOSING SETTING
Set objWord = Nothing
Set objDoc = Nothing
End Sub
Ask Your Own Microsoft Office Question
Was this answer helpful?

How JustAnswer works

step-image
Describe your issueThe assistant will guide you
step-image
Chat 1:1 with a microsoft office technicianLicensed Experts are available 24/7
step-image
100% satisfaction guaranteeGet all the answers you need
Ask Michael Hannigan Your Own Question
Michael Hannigan
Michael Hannigan
Michael Hannigan, Office Specialist
Category: Microsoft Office
Satisfied Customers: 11,888
11,888 Satisfied Customers
Experience: 25+ Years Experience in Computers and Electronics. Microsoft Certified MCSE, MCDBA, MCP, Microsoft Partner

Michael Hannigan is online now

A new question is answered every 9 seconds

How JustAnswer works:

  • Ask an ExpertExperts are full of valuable knowledge and are ready to help with any question. Credentials confirmed by a Fortune 500 verification firm.
  • Get a Professional AnswerVia email, text message, or notification as you wait on our site. Ask follow up questions if you need to.
  • 100% Satisfaction GuaranteeRate the answer you receive.

JustAnswer in the News:

Ask-a-doc Web sites: If you've got a quick question, you can try to get an answer from sites that say they have various specialists on hand to give quick answers... Justanswer.com.
JustAnswer.com...has seen a spike since October in legal questions from readers about layoffs, unemployment and severance.
Web sites like justanswer.com/legal
...leave nothing to chance.
Traffic on JustAnswer rose 14 percent...and had nearly 400,000 page views in 30 days...inquiries related to stress, high blood pressure, drinking and heart pain jumped 33 percent.
Tory Johnson, GMA Workplace Contributor, discusses work-from-home jobs, such as JustAnswer in which verified Experts answer people’s questions.
I will tell you that...the things you have to go through to be an Expert are quite rigorous.

What Customers are Saying:

My Expert answered my question promptly and he resolved the issue totally. This is a great service. I am so glad I found it I will definitely use the service again if needed.

One Happy CustomerNew York

Wonderful service, prompt, efficient, and accurate. Couldn't have asked for more. I cannot thank you enough for your help.

Mary C.Freshfield, Liverpool, UK

This expert is wonderful. They truly know what they are talking about, and they actually care about you. They really helped put my nerves at ease. Thank you so much!!!!

AlexLos Angeles, CA

Thank you for all your help. It is nice to know that this service is here for people like myself, who need answers fast and are not sure who to consult.

GPHesperia, CA

I couldn't be more satisfied! This is the site I will always come to when I need a second opinion.

JustinKernersville, NC

Just let me say that this encounter has been entirely professional and most helpful. I liked that I could ask additional questions and get answered in a very short turn around.

EstherWoodstock, NY

Thank you so much for taking your time and knowledge to support my concerns. Not only did you answer my questions, you even took it a step further with replying with more pertinent information I needed to know.

RobinElkton, Maryland

< Previous | Next >

Meet the Experts:

jstinehelfer

jstinehelfer

Information Systems Manager

36 satisfied customers

A+ Comptia Certified computer repair

JasonJames122

JasonJames122

Computer Enthusiast

0 satisfied customers

I manage all information systems (network of Windows PC's and servers with Microsoft Office products) for a small business

Jess M.

Jess M.

Computer Support Specialist

842 satisfied customers

Computer Software Specialist for more than 10 years

The-PC-Guy

The-PC-Guy

Computer Manager

653 satisfied customers

20 years experience providing remote computer support

James K.

James K.

Consultant

260 satisfied customers

Technical Director of IT Company

Kamil Anwar

Kamil Anwar

Office Specialist

219 satisfied customers

8+ Years of Experience. / CCNA (S), CCNA (W), CCNA (RS), MCTS, MBCs.

IT Miro

IT Miro

Computer Scientist

160 satisfied customers

Bachelor's Degree in Information Technology, Microsoft Certified Professional

< Previous | Next >

Related Microsoft Office Questions
I am trying to change the layout of a document - book - I am
I am trying to change the layout of a document - book - I am trying to print. It is only letting me print a 7 X 6 format that I use when publishing or printing the book. I want to be able to print it … read more
David L.
David L.
Bachelor\u0027s Degree
6 satisfied customers
How do I shrink the size of a flyer? It prints in the middle
How do I shrink the size of a flyer? It prints in the middle of 2 pages. … read more
Specialist Sean S.
Specialist Sean S.
Computer Support Technician
919 satisfied customers
Ms word 2011 - trying to create a document using master
Ms word for Mac 2011 - trying to create a long document using master document and sub document facility. Going reasonably well. Different headers for each sub doc. No footers in sub docs. Trying to ap… read more
Pete
Pete
Engineer
Bachelor\u0027s Degree
1,133 satisfied customers
I have an existing word doc formatted in 5.5 x 8.5 - need to
I have an existing word doc formatted in 5.5 x 8.5 - need to re-formatted back to 8.5 x 11 and don't want to have to retype or redo all the work. Any help?… read more
caraleneK
caraleneK
Service Manager
1,884 satisfied customers
I need assistance with MS Word 2007. I am trying to format a
I need assistance with MS Word 2007. I am trying to format a 376 page book to be turned into an ebook. I am having difficulty knowing how to format it and if I am doing it correctly. I am familiar wit… read more
Richard
Richard
IT Manager
IT Manager, Consultant
3,474 satisfied customers
I have a macro which prints a schedule (i.e. rows 10-20, col
I have a macro which prints a schedule (i.e. rows 10-20, col A-O). But it won't print the entire schedule after rows have been added in the middle of the schedule (ie the schedule is now rows 10-25). … read more
Jess M.
Jess M.
Computer Support Specialist
Bachelor's Degree
842 satisfied customers
How do I number pages of my ebook and how do I put the chapters
how do I number pages of my ebook and how do I put the chapters in sequence each chapter being a word file?… read more
Michael Hannigan
Michael Hannigan
Office Specialist
Bachelor's Program
11,888 satisfied customers
I am creating a fill-in form that will include dropdown lists
I am creating a fill-in form that will include dropdown lists where the person will select "Concern" "No Concern" or "Major Concern." What I need to happen is when you exit the dropdown, depending on … read more
Michael Hannigan
Michael Hannigan
Office Specialist
Bachelor's Program
11,888 satisfied customers
Hello - I have a Word document and within it, I have several
Hello - I have a Word document and within it, I have several linked Excel objects. These objects are inserted using Paste Special > Paste link as Microsoft Office Excel Worksheet Object. We are usi… read more
MrBargain
MrBargain
Friendly Neighborhood Geek
Associate Degree
18 satisfied customers
I know a little, but not much about Excel. My problem: I am
I know a little, but not much about Excel. My problem: I am writing a report requiring that I extract very wide tables of annual statistics from internet-published government documents and use them in… read more
Zabo04
Zabo04
Master\u0027s Student
Master\u0027s Degree
7 satisfied customers
I need a conversion for lumber from Net Tally (actual, after
I need a conversion for lumber from Net Tally (actual, after kiln drying) to Green Tally as though the widths were measured when the lumber green (fresh sawn) before shrinking during drying. The avera… read more
The-PC-Guy
The-PC-Guy
Computer Manager
Bachelor's Degree
653 satisfied customers
Hello.I am in a trouble since I would like to compare three
Hello. I am in a trouble since I would like to compare three variable patterns in a table. The important part is that they have to be in sequence. Example: There are numbers: 1 1 0 0 1 1 1 0 1 0 1 0 0… read more
Michael Hannigan
Michael Hannigan
Office Specialist
Bachelor's Program
11,888 satisfied customers
Hi Dan I have a problem with my spreadsheet. Sheet 5 (LINCS
Hi Dan I have a problem with my spreadsheet. Sheet 5 (LINCS Costings - Couple Bond) and Sheet 6 (LINCS Couple - No bond) will not show on three separate pages. For some reason it spreads the info over… read more
Dr. Dan
Dr. Dan
Doctoral Degree
572 satisfied customers
WordPerfect allowed me to use page numbering when in landscape
WordPerfect allowed me to use page numbering when in landscape format, with two 5.5" X 8" columns/text pages per 8.5" X 11" sheet of paper. (I cut each sheet in half to create a 5.5" X 8" booklet.) In… read more
cpugeek
cpugeek
IT Manager
Master's Degree
108 satisfied customers
My team & I are having big problems using Tables in Word. As
My team & I are having big problems using Tables in Word. As a graphic designer/illustrator I've been working with them for a few years now so I know all the basics of repeating headers, column & row … read more
Jess M.
Jess M.
Computer Support Specialist
Bachelor's Degree
842 satisfied customers
I need to write two macros, I think using VB Express, that
I need to write two macros, I think using VB Express, that will allow me to run a macro in excel as follows: Macro A I have a link in my spreadsheet to an image on a website. I need the macro to: 1) c… read more
John D
John D
Bachelor Degree in Engineering
342 satisfied customers
i am trying to print a documnet sized 8.5 wide and 4.9 high
i am trying to print a documnet sized 8.5 wide and 4.9 high orientation portrait but word keeps returing th eprint job to landscape format. How can I set portarit with custom setting of 8.5 wide and 4… read more
Jess M.
Jess M.
Computer Support Specialist
Bachelor's Degree
842 satisfied customers
I am on windows 7 using frontpage 2003. I have created a website
I am on windows 7 using frontpage 2003. I have created a website just for my satisfaction. The problem is on some monitors the website over fills the screen and necessates scrolling. This seems to hap… read more
Richard
Richard
IT Manager
IT Manager, Consultant
3,474 satisfied customers
Disclaimer: Information in questions, answers, and other posts on this site ("Posts") comes from individual users, not JustAnswer; JustAnswer is not responsible for Posts. Posts are for general information, are not intended to substitute for informed professional advice (medical, legal, veterinary, financial, etc.), or to establish a professional-client relationship. The site and services are provided "as is" with no warranty or representations by JustAnswer regarding the qualifications of Experts. To see what credentials have been verified by a third-party service, please click on the "Verified" symbol in some Experts' profiles. JustAnswer is not intended or designed for EMERGENCY questions which should be directed immediately by telephone or in-person to qualified professionals.

Disclaimer: Information in questions, answers, and other posts on this site ("Posts") comes from individual users, not JustAnswer; JustAnswer is not responsible for Posts. Posts are for general information, are not intended to substitute for informed professional advice (medical, legal, veterinary, financial, etc.), or to establish a professional-client relationship. The site and services are provided "as is" with no warranty or representations by JustAnswer regarding the qualifications of Experts. To see what credentials have been verified by a third-party service, please click on the "Verified" symbol in some Experts' profiles. JustAnswer is not intended or designed for EMERGENCY questions which should be directed immediately by telephone or in-person to qualified professionals.

Show MoreShow Less

Ask Your Question

x