New Holland Tx 65 Manual more. Learn how to use VBA code to save Excel worksheets, charts, and entire workbooks as PDF files. Save an Excel file and export it to pdf with a different sheet. Save workbook as PDF. Able Art Programs For. Excel - VBA - ExportAsFixedFormat PDF File Size too Large.

1) Save as Excel Dim nom As String nom = ThisWorkbook.Sheets(1).Range('Q13').Value & 'AP' & Format(Date, 'ddmmyyyy') & '.xls' thisworkbook.saveas sPath & nom 'Define path first, don't forget the at the end. Even better would be to create a named range from range 'Q13' and use: nom = thisworkbook.names('Something').referstorange.value To make the link dynamic in case you insert a column or row which shifts all your ranges. 2) Save workbook as PDF ThisWorkbook.ExportAsFixedFormat xlTypePDF, sPath & sFile 'Define here.pdf 3) 'print 2 of the 3sheets with adjusting the contenant of a ' I'm not sure if I get this one. Print command is given by: Set oSheet= thisworkbook.sheets(2) with oSheet.PageSetup.PrintArea = '$A1$1:$Q$40'.

'Any other properties: end with oSheet.printout Which ever way you want to program this in order to retrieve the sheets that you need to print. You can loop through the sheets with a counter and put if statements to add conditions. Dim oSheet as Excel.worksheet dim iCnt as integer For each oSheet in thisworkbook.sheets iCnt = iCnt + 1 'Include conditions here If. Then 'Whatever condition set oSheet = thisworkbook.sheets(iCnt) 'Print end if next oSheet. Download Myspace H4ck V2.1 Rapidshare here. Thank you.i was searching this.