THANKS ashish Before page setup lines we can use on error goto 1 Line Line ...
1 end sub Is that true? -----Original Message----- From: excel-macros@googlegroups.com [mailto:excel-mac...@googlegroups.com] On Behalf Of Ashish Jain Sent: Tuesday, November 09, 2010 3:36 PM To: MS EXCEL AND VBA MACROS Subject: $$Excel-Macros$$ Re: is there a printer installed on this computer? Hi Omar, There are 2 ways: 1. You can get the printer name using Application.ActivePrinter So, if there is no printer installed, skip through the code. 2. Error Handling to check printer installed or not On Error GoTo RESCUE Activesheet.printpreview 'your code GOTO NEXTSTEP RESCUE: ' Your code if error NEXTSTEP: ' When all is OK ________________________________________ Thanks & Regards Ashish Jain McKinsey India Knowledge Center (Microsoft Certified Application Specialist) (Microsoft Certified Professional) http://www.excelitems.com http://www.openexcel.com ________________________________________ On Nov 1, 10:31 pm, عمــــــــــــر <omar27...@gmail.com> wrote: > I have a code to copy some data from sheet to another > > In the end of this code > > There is some lines to set up page layout > > "page setup" > > Header and footer > > This part of code doesn't work when I run my file on computer without > printer installed > > And give me an error > > The question is > > How can I make this code works well when the printer is installed or when > not installed ? > > Thanks -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
