How JustAnswer Works:

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

Ask NewITZone Your Own Question

NewITZone
NewITZone, Computer Enthusiast
Category: Microsoft Office
Satisfied Customers: 90
Experience:  I have been using Office Pro for 10 years and implemented applications for business use.
53509759
Type Your Microsoft Office Question Here...
NewITZone is online now
A new question is answered every 9 seconds

I have a excel print Macro that is just not working

Customer Question

I have a excel print Macro that is just not working correctly. It is not printing all the Data. Please look at the "New Assembly Sheet" and click the print button. The macro only prints partial results. Please fix!
Submitted: 11 months ago.
Category: Microsoft Office
Expert:  Jess M. replied 11 months ago.

Hi, welcome and thank you for your question. My name is ***** ***** I am glad to assist you today.

I am very sorry about your issues. Can you please attach the XLSM (macro-enabled) file here? You can use the paper clip icon to attach it. Or you can upload it to http://filesXpress.com and give me the short download link.

Please let me know by replying to me here so that I can help you further.

Best regards,
Jess

Customer: replied 11 months ago.
Here you go...Im trying to print so that all columns are on one page and the rows that have alll zeros dont appear and that it takes up no more than two pages....
http://filesxpress.com/download-d63e55d19dbfb416759655621927104f
Customer: replied 11 months ago.
http://filesxpress.com/download-d63e55d19dbfb416759655621927104f
Expert:  Jess M. replied 11 months ago.

Thank you for the link. Please give me a moment to download and check the file.

Jess

Customer: replied 11 months ago.
ok
Expert:  Jess M. replied 11 months ago.

Thanks

Expert:  Jess M. replied 11 months ago.

I got your file and the printing worked. What specifically you want in the printing? You mentioned about NOT printing the rows with 0s. What specific columns with 0s are you trying to NOT include in the printing?

Customer: replied 11 months ago.
It doesnt print all the correct rows
Customer: replied 11 months ago.
It prints only one page and then just a header of second page
Customer: replied 11 months ago.
please see attached pic
Customer: replied 11 months ago.
Its missing most of the rows....
Customer: replied 11 months ago.
please review the macro
Customer: replied 11 months ago.
Sub PrintData()
Application.ScreenUpdating = False
Rows("1:160").Hidden = False
Columns("A:B").Hidden = True
For i = 3 To 160
If Cells(i, 7) = 0 And _
Cells(i, 8) = 0 And _
Cells(i, 9) = 0 And _
Cells(i, 10) = 0 And _
Cells(i, 11) = 0 And _
Cells(i, 12) = 0 And _
Cells(i, 13) = 0 And _
Cells(i, 14) = 0 And _
Cells(i, 15) = 0 And _
Cells(i, 16) = 0 Then
Rows(i & ":" & i).Hidden = True
End If
Next iActiveSheet.PageSetup.PrintArea = ""
ActiveSheet.PageSetup.PrintArea = "$C$1:$Y$160"
With ActiveSheet.PageSetup
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 2
End WithActiveSheet.PrintOut
Rows("1:160").Hidden = False
End Sub
Expert:  Jess M. replied 11 months ago.

I printed in PDF, and here is the printout file. Is this printout correct?

Here is the link:

http://filesxpress.com/d-763d64ae

Customer: replied 11 months ago.
Customer: replied 11 months ago.
is it not working for me , because I am on a Mac?
Expert:  Jess M. replied 11 months ago.

Thank you for that confirmation.

If that is the correct printout, then that is printed using the blue PRINT button in the sheet named "New_Assmbly_Sheet", and NOT from the File => Print dialog box.

Also, please check your print area settings on your Excel to ensure that the print process is not restricted by your print area settings. Then try printing using the blue PRINT button on the sheet.

Keep me posted.

Jess

Related Microsoft Office Questions