Generating PDF from
excel<http://feedproxy.google.com/%7Er/Excelpoweruser/%7E3/CCOOa4q3-kY/generating-pdf-from-excel.html?utm_source=feedburner&utm_medium=email>
*Generating PDF from excel..*
Sub CreatePDF()
Dim wksSheet As Worksheet
Dim blnFlag As Boolean
Dim intI As Integer
Dim intResult As Byte
intI = 0
intResult = Application.InputBox("Type 1 for Entire Workbook and Type
0 For Active Worksheets")
If intResult = 0 Then
Set wksSheet = ActiveSheet
wksSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
ThisWorkbook.Path & "\" & wksSheet.Name,
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False,
OpenAfterPublish:= _
False
Exit Sub
End If
For Each wksSheet In ThisWorkbook.Worksheets
If WorksheetFunction.CountA(wksSheet.Cells) <> 0 Then
If wksSheet.Visible = xlSheetHidden Then
wksSheet.Visible = xlSheetVisible
blnFlag = True
End If
wksSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
ThisWorkbook.Path & "\" & wksSheet.Name,
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False,
OpenAfterPublish:= _
False
intI = intI + 1
If blnFlag = True Then
wksSheet.Visible = xlSheetHidden
blnFlag = False
End If
End If
Next
MsgBox intI & " Worksheet(s) has been Exported to PDF", vbInformation
End Sub
On 31 January 2012 16:17, Veeru TOC <veerub...@gmail.com> wrote:
> Dear sir,
>
>
> how to convert pdf file to text file...................
>
>
> On Tue, Jan 31, 2012 at 6:33 PM, Rajan_Verma <rajanverma1...@gmail.com>wrote:
>
>> Try this:****
>>
>> ** **
>>
>> Sub CreatePDF()****
>>
>> ** **
>>
>> Dim wksSheet As Worksheet****
>>
>> For Each wksSheet In ThisWorkbook.Worksheets****
>>
>> wksSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _****
>>
>> ThisWorkbook.Path & "\" & wksSheet.Name,
>> Quality:=xlQualityStandard, _****
>>
>> IncludeDocProperties:=True, IgnorePrintAreas:=False,
>> OpenAfterPublish:= _****
>>
>> False****
>>
>> Next****
>>
>> End Sub****
>>
>> ** **
>>
>> *From:* excel-macros@googlegroups.com [mailto:
>> excel-macros@googlegroups.com] *On Behalf Of *chandra sekaran
>> *Sent:* Jan/Tue/2012 03:37
>> *To:* excel-macros@googlegroups.com
>> *Subject:* $$Excel-Macros$$ excell to pdf****
>>
>> ** **
>>
>> Dear all ****
>>
>> ****
>>
>> i need macro for excel to pdf i have 25 sheet each sheet
>> convert to pdf . PDF file name should be a Sheet name any one help me
>> ****
>>
>> ****
>>
>> Regards****
>>
>> chandru ****
>>
>> ****
>>
>> --
>> FORUM RULES (986+ members already BANNED for violation)
>>
>> 1) Use concise, accurate thread titles. Poor thread titles, like Please
>> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
>> will not get quick attention or may not be answered.
>>
>> 2) Don't post a question in the thread of another member.
>>
>> 3) Don't post questions regarding breaking or bypassing any security
>> measure.
>>
>> 4) Acknowledge the responses you receive, good or bad.
>>
>> 5) Cross-promotion of, or links to, forums competitive to this forum in
>> signatures are prohibited.
>>
>> NOTE : Don't ever post personal or confidential data in a workbook. Forum
>> owners and members are not responsible for any loss.
>>
>>
>> ------------------------------------------------------------------------------------------------------
>> To post to this group, send email to excel-macros@googlegroups.com****
>>
>> --
>> FORUM RULES (986+ members already BANNED for violation)
>>
>> 1) Use concise, accurate thread titles. Poor thread titles, like Please
>> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
>> will not get quick attention or may not be answered.
>>
>> 2) Don't post a question in the thread of another member.
>>
>> 3) Don't post questions regarding breaking or bypassing any security
>> measure.
>>
>> 4) Acknowledge the responses you receive, good or bad.
>>
>> 5) Cross-promotion of, or links to, forums competitive to this forum in
>> signatures are prohibited.
>>
>> NOTE : Don't ever post personal or confidential data in a workbook. Forum
>> owners and members are not responsible for any loss.
>>
>>
>> ------------------------------------------------------------------------------------------------------
>> To post to this group, send email to excel-macros@googlegroups.com
>>
>
>
>
> --
>
>
>
>
>
> *Thanks&Regards*
>
> * *
>
> * **Veerendra.Vanam*
>
> *TOC TEAM*
> * * *Bhagyanagar Electrical & Contractors**
> ** **H.No-5-9-286/65,Plot No-65
> Rajiv Gandhi Nagar,Near Andhra Jyothi Press,IE-Kukatpally,
> Hyderabad-500072,-Andhra Pradesh
> ** **91-9177-444-840**,*
>
>
> --
> FORUM RULES (986+ members already BANNED for violation)
>
> 1) Use concise, accurate thread titles. Poor thread titles, like Please
> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
> will not get quick attention or may not be answered.
>
> 2) Don't post a question in the thread of another member.
>
> 3) Don't post questions regarding breaking or bypassing any security
> measure.
>
> 4) Acknowledge the responses you receive, good or bad.
>
> 5) Cross-promotion of, or links to, forums competitive to this forum in
> signatures are prohibited.
>
> NOTE : Don't ever post personal or confidential data in a workbook. Forum
> owners and members are not responsible for any loss.
>
>
> ------------------------------------------------------------------------------------------------------
> To post to this group, send email to excel-macros@googlegroups.com
>
--
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Cross-promotion of, or links to, forums competitive to this forum in
signatures are prohibited.
NOTE : Don't ever post personal or confidential data in a workbook. Forum
owners and members are not responsible for any loss.
------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com
