2012-06-26 2 views
1

나는 수백 개의 Excel 파일을 폴더에 저장하고 있습니다. 어떻게하면 Visual Basic에서 PDF로 변환 할 수 있는지 궁금합니다. Excel 2010의 다른 이름으로 저장 기능을 사용하여 다른 폴더에 저장하는 방법이 있습니까? Google을 확인한 후 여기에서 제 3 자 응용 프로그램에 대한 참조 만 찾을 수 있습니다.VB를 사용하는 Excel 2010 to PDF

답변

2
Dim excel As Microsoft.Office.Interop.Excel.Application 
    excel = New Microsoft.Office.Interop.Excel.Application 
    Dim tmpWorkbooks As Workbooks 
    tmpWorkbooks = excel.Workbooks 
Dim wb As Microsoft.Office.Interop.Excel.Workbook 
    wb = tmpWorkbooks.Open(pathOfExcelFile) 
    excel.Visible = False 
    wb.Activate() 
wb.ExportAsFixedFormat(XlFixedFormatType.xlTypePDF, fileName, , , , 1, 1, False,) 
+0

감사합니다. – WVUH

2

엑셀 2010이 VBA 코드를 사용할 수 있습니다 : 당신이 당신의 컴퓨터에 대한 올바른 경로로 Filename를 설정해야합니다 물론

ActiveSheet.ExportAsFixedFormat _ 
    Type:=xlTypePDF, _ 
    Filename:="C:\Temp\Workbook1.pdf", _ 
    Quality:=xlQualityStandard, _ 
    IncludeDocProperties:=True, _ 
    IgnorePrintAreas:=True, _ 
    OpenAfterPublish:=False 

을하고 ActiveSheet를 사용하기 때문에 당신이 반복 할 필요가 가정 귀하의 워크 북에 하나 이상의 책이 있다면 귀하의 장을 통해. ExportAsFixedFormat 함수에 대한 자세한 내용은 the MSDN을 참조하십시오.

+0

감사드립니다. – WVUH

+0

나는 새롭고 위선적 인 표를 던지기 때문에 그냥 말하고 싶었다. 이것은 많은 도움을 주었으며 MSDN 기사는 케이크 위에 장식되었습니다. TREB에 감사드립니다! – WVUH