2017-09-03 4 views
-1

でExcel形式、PDF出力ファイルを作成することができます私はこのコードでVBAのAccessでExcelファイルを印刷するために使用:私はのVBA、AccessでExcelファイルからPDFを作成するにはどうすればよいはどのように私はVBAのアクセス

Excel_App.ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

+0

コードの行を4つのスペースでインデントしてください。コードとして表示されるようにしてください。 – jsotola

答えて

1

あなたがこの方法のように試してみてください。..

例 - 詳細情報

Private Sub Prepare_PDF_Click() 
Dim MyFullName As String 
Dim xlAppFTP As Object, xlWb As Object, xlWs As Object 
Set xlAppFTP = CreateObject("Excel.Application") 
Set xlWb = xlAppFTP.Workbooks.Open("X:\ANALYSIS\GHH.xlsm") 
MyFullName = "X:\ANALYSIS\GHH" & format(Now(),"YYYYMMDD") & ".pdf" 
xlWb.ExportAsFixedFormat Type:=0, FileName:=MyFullName, _ 
Quality:=1, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True 
End Sub 

。これに行くSite

+0

ありがとう、それはうまくいきます。このpdf形式を横向きにする必要があります。私は別の質問で尋ねます、私に答えを与えてください。 – ali