Results 1 to 4 of 4
  1. #1
    New Lounger
    Join Date
    Oct 2001
    Location
    London, UK
    Posts
    5
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Accessing Printer Properties (Excel 2000 print quality questions)

    Here's my scenario (sorry about the length). I've put it under VBA 'cos I think my solution is in this
    New PC with Windows 2000 / Office 2000 and a HP Laserjet 4000. From the control panel settings the default print quality is set to "Faster Printing". For new models (ie File / New) this is fine - models print at this setting.
    But, if I open one of my older (pre this PC) models or if I get a model from someone else then the print quality setting switches to a Custom setting that is at the highest quality. This is much slower to print. I have hundreds of models and I receive hundreds of models from other people. Each of these comes in and I have been going to file / page setup / options and change the quality setting to "Faster Printing". And this has to be done for every sheet because doing it in group mode doesn't seem to work.
    Is there any setting I'm missing to make the faster printing the default for models? I looked at the printquality(1) setting and it's -4 on the problem models, 600 on the working ones. Is the only (best) way to code a toolbar button in my personal.xls file which flips the printquality to 600 on all sheets?
    Thanks

  2. #2
    Super Moderator jscher2000's Avatar
    Join Date
    Feb 2001
    Location
    Silicon Valley, USA
    Posts
    23,112
    Thanks
    5
    Thanked 93 Times in 89 Posts

    Re: Accessing Printer Properties (Excel 2000 print quality questions)

    I looked in help, and it seems that this should work:

    Sub PrintQual600()
    Dim aSheet As Worksheet
    Set aSheet = Excel.ActiveSheet
    aSheet.PageSetup.PrintQuality = 600
    Set aSheet = Nothing
    End Sub

    Hope this helps.

  3. #3
    New Lounger
    Join Date
    Oct 2001
    Location
    London, UK
    Posts
    5
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Accessing Printer Properties (Excel 2000 print quality questions)

    Thanks, I'd already done that and put it on the toolbar in a button.
    I suppose I was hoping for some "miracle" way of making Excel use the fast speed as a default instead of using code to change it.
    You see, the "problem" sheets are all set to a printquality of -4 which seems to be an invalid number. I say it's invalid because if you try and set a sheet to it using code it gives an error. So, if it's invalid why does Excel change the resolution to highest quality instead of default quality? Even if I change a sheet to highest quality using the menus the printquality returns 1200 - not -4.
    Oh well, I took the opportunity to make it change all page sizes back to A4 (UK printers) as well so that's two manual steps I've done on one button! My code also iterates through all worksheets in the active workbook while it's at it..

  4. #4
    Super Moderator jscher2000's Avatar
    Join Date
    Feb 2001
    Location
    Silicon Valley, USA
    Posts
    23,112
    Thanks
    5
    Thanked 93 Times in 89 Posts

    Re: Accessing Printer Properties (Excel 2000 print quality questions)

    I don't know the event names in Excel, but maybe you can create something like a WorkSheet_Open() procedure that will make these changes automatically when you open the file.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •