將Teradata查詢結果複製到Pdf文件的VBA代碼

Question

我對Excel VBA有疑問。是否有可能將在Teradata中執行的查詢結果導出到Pdf文件中？可以請某人分享VBA代碼嗎？

我有所有的連接和其他的東西做。從Teradata的結果窗口輸出的結果時，成PDF文件

感謝我只是卡住， 菲利普

Answer 1

我不認爲這有什麼與Teradata的。此代碼適用於通過MsQuery ODBC鏈接到TD後端的Excel數據：

Set xlObj = CreateObject("Excel.Application") 

set xlWB = xlObj.Workbooks.Open("C:\Sys\1.xls") 

xlWB.ActiveSheet.ExportAsFixedFormat 0, "C:\Sys\1" & ".pdf", 0, 1, 0, , ,0 

xlWB.close False 

xlObj.quit