Solved

Print sheet but no command button

Posted on 2014-04-19
2
281 Views
Last Modified: 2014-04-19
Folks,
I have a module that prints my worksheets.
Sub PrintSheet()
    Dim UserResponse
    UserResponse = MsgBox(Prompt:="Print Worksheet (Yes) for Print Preview", Buttons:=vbYesNoCancel, Title:="Print Worksheet")
    Select Case UserResponse
        Case vbCancel
            Exit Sub
        Case vbYes
           ' ActiveSheet.PrintOut Preview:=True
           PrintToFit
        Case Else
        PrintToFit
             ActiveSheet.PrintOut Copies:=1
    End Select

End Sub

Open in new window


The "PrintToFit" is just another called module that scales the print to fit one page.

I would like to have the function that when a worksheet is print it does not print any of the command buttons as see below:
No print command button
0
Comment
Question by:Frank Freese
2 Comments
 
LVL 43

Accepted Solution

by:
Saqib Husain, Syed earned 500 total points
ID: 40010614
Go to the properties of each of the buttons and on the last tab there is an option to disable printing of the shape.
0
 

Author Closing Comment

by:Frank Freese
ID: 40010629
great but that was too easy - I'd never noticed that before
thanks - great job
0

Featured Post

Threat Intelligence Starter Resources

Integrating threat intelligence can be challenging, and not all companies are ready. These resources can help you build awareness and prepare for defense.

Join & Write a Comment

Introduction This Article is a follow-up to my Mappit! Addin Article (http://www.experts-exchange.com/A_2613.html), it was inspired by an email posting I made to EUSPRIG (http://www.eusprig.org/index.htm), I will briefly cover: 1) An overvie…
This code takes an Excel list of URL’s and adds a header titled “URL List”. It then searches through all URL’s in column “A”, looking for duplicates. When a duplicate is found, it is moved to the top of the list. The duplicate URL’s are then highlig…
The viewer will learn how to simulate a series of coin tosses with the rand() function and learn how to make these “tosses” depend on a predetermined probability. Flipping Coins in Excel: Enter =RAND() into cell A2: Recalculate the random variable…
This Micro Tutorial demonstrates in Microsoft Excel how to consolidate your marketing data by creating an interactive charts using form controls. This creates cool drop-downs for viewers of your chart to choose from.

708 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

18 Experts available now in Live!

Get 1:1 Help Now