私はデータをエクスポートする必要のあるアプリケーションを開発中です。このデータをJSON、DBにエクスポートした後、Excelで証明書を作成します。Excelで印刷するものが見つかりません
excelへのエクスポートとExcelファイルの作成は完全に機能しますが、Excelを印刷することはできません。私は私のアプリケーション(VB.NET)とVBA(私のアプリに問題があるかどうかをチェックする)から試しましたが、どちらも失敗します。 Excelでファイルを開くと、PrintRangeが設定されているにもかかわらず、印刷できず、プレビューが表示されません。
私はいつも
を「Excelは印刷するSTHを見つけることができなかった」取得私は、ブック、シートや範囲を印刷しようとしましたが、いつも同じ。私もworksheet.PageSetup.PrintArea
と同じ設定しようとしました。試してもExportAsFixedFormat
はうまくいきません。また、インストールされているすべてのプリンタをデフォルトとして設定しようとしましたが、すべてのプリンタで失敗します。
これはこのファイルでのみ発生し、他のファイルは問題なく印刷されます。
ファイルを開くと - 印刷に進む - 印刷範囲は設定されていますが、プレビューの代わりに「印刷するものはありません」を参照してください。
ここで、セルをクリックすると、sthと書いてください。それを削除したり、やりとりをしたりすると、プレビューを見てファイルを印刷することができます。
作業ファイルを保存して、単純なアプリケーションでファイルを開いて印刷しようとすると、悪いメッセージが表示されます。 Excelでファイルを再度開くと、プレビューが再表示されず、印刷できるようにファイルとやりとりする必要があります。
私はできることをすべて試してみましたが、狂ったようにも検索しましたが、何かが働いていました。
誰かが同じ問題を抱えていて助けてくれることを願っています。これは私の人生で初めてのことであり、間違っていることや私のExcelファイルに間違っていることを知っていますこのメッセージを見たことがあります。
輸出コードは少し長いですので、私はそれをここに投稿していないが、それはこのようなSTHです:私はこのシートにグラフを持っている
Public Shared Function ExportCalibrationAsync(pressureCalibration As PressureCalibration, filePath As String, fileName As String, excelTemplate As Byte()) As Task 'TODO:Refactor...Not use 2.dots
Return Task.Run(Sub()
CheckFileName(fileName)
Dim fullPath = Path.Combine(filePath, fileName)
Dim tempFileName = Path.GetTempFileName()
Dim tempFullPath = Path.Combine(filePath, tempFileName)
Dim excel = New Excel.Application()
Dim row = 1
'Write the passed excel template to a tempFile
My.Computer.FileSystem.WriteAllBytes(tempFullPath, excelTemplate, False)
Dim excelWorkbooks = excel.Workbooks
'Add template workbook to actual workbook
Dim excelWorkbook As Excel.Workbook = excelWorkbooks.Open(tempFullPath)
'////////////
'////Code to Export data to excel
'////////////
'//ExportAsFixedFormat or Print doesn't work and
'//MsgBox pops up with "Excel could not find anything to print"
excelWorkSheet.PageSetup.PrintArea="$A$1:$G$40"
excelWorkSheet.ExportAsFixedFormat(XlFixedFormatType.xlTypePDF,filePath,XlFixedFormatQuality.xlQualityStandard)
excelWorkbook.SaveAs(fullPath)
excelWorkbook.Close()
excel.Application.Quit()
excel.Quit()
File.Delete(tempFullPath)
GC.Collect()
GC.WaitForPendingFinalizers()
GC.Collect()
GC.WaitForPendingFinalizers()
Marshal.ReleaseComObject(calibrationChartObject)
が、私は、チャートとは思いません私は同じコードを使ってチャートで他のファイルを印刷できるので、問題です。