Question

（C＃）我正在使用Microsoft.Office.Interop.Excel保存为PDF文件但是这个解决方案对我的大多数Excel文件都不起作用（非常复杂的文件，其中一些是35Mb大小，另一些是宏...）

我想将Excel文件转换为PDF格式。

还有其他免费解决方案，而不是Interop.Excel吗？

Answer 1

你看过这个链接了吗？ http://www.codeproject.com/Articles/17574/Programmatically-Convert-Documents-to-PDFs-the-Eas

<强> EDITED

首先，你必须下载Ghostscript并安装它。继续添加本地打印机并取消选中“自动检测并安装我的即插即用打印机”。

创建一个新的本地端口，并输入“C：\ output.ps”作为端口名称。

为了让GhostScript正确解析PostScript，必须将其设置为打印机驱动程序。您可以在lib文件夹的GhostScript安装目录中找到GhostScript的打印机驱动程序。

要使附加的代码起作用，请将打印机命名为Ghostscript。随附的应用程序将所有难题放在适当的位置。首先，应用程序存储当前的默认打印机。稍后将使用它来设置打印机。

public static string GetDefaultPrinterName(){
   PrintDocument pd = new PrintDocument();
   return pd.PrinterSettings.PrinterName;
}

其次，我们之前设置的Ghostscript打印机被设置为默认值，因此用户无需选择打印机。

public static long SetDefaultPrinterName(string name){
    return SetDefaultPrinter(name);
}

第三，我们在文件上调用print命令。这里的诀窍是检测打印Excel文件的时间。我主要使用Excel文档，需要一种快速打印整个工作簿的方法，而不仅仅是打开的工作表。

public static void CreatePdf(string action, string file, string directory){
if (file.EndsWith("xls")){
    Excel.ApplicationClass excel = new Excel.ApplicationClass();
    excel.Visible = false;

    Excel.Workbook workbook = excel.Workbooks.Open(Path.Combine(directory, file),
        Type.Missing, Type.Missing, Type.Missing, Type.Missing,
        Type.Missing, Type.Missing, Type.Missing, Type.Missing,
        Type.Missing, Type.Missing, Type.Missing, Type.Missing,
        Type.Missing, Type.Missing);

    workbook.PrintOut(Type.Missing, Type.Missing, 1, false, Type.Missing, 
        false, Type.Missing, Type.Missing);

    excel.Quit();
}else{
    Process p = new Process();

    p.StartInfo.FileName = file;
    p.StartInfo.Verb = action;
    p.StartInfo.WorkingDirectory = directory;
    p.StartInfo.WindowStyle = ProcessWindowStyle.Hidden;
    p.StartInfo.CreateNoWindow = true;
    Console.WriteLine("Starting process");
    p.Start();
    //p.Kill();
}
Console.WriteLine("Creating Pdf");
CreatePdf(file);
}

最后，我们调用GhostScript可执行文件，为它提供我们想要输出的文件名以及在哪里找到PostScript。为了传递可执行语句，我们只是将输入重定向到我们创建的命令，我们也获取输出。

private static string CreatePdf(string fileName){

        string command = "gswin32c -q -dNOPAUSE -sDEVICE=pdfwrite -sOutputFile=\"" + 
                fileName + ".pdf\"  -fc:\\output.ps";

        Console.WriteLine(command);
        Process p = new Process();

        StreamWriter sw;
        StreamReader sr;

        ProcessStartInfo info = new ProcessStartInfo("cmd");
        info.WorkingDirectory = System.AppDomain.CurrentDomain.BaseDirectory;
        Console.WriteLine("Current directory: " + info.WorkingDirectory);
        info.CreateNoWindow = true;
        info.UseShellExecute = false;

        info.RedirectStandardInput = true;
        info.RedirectStandardOutput = true;

        p.StartInfo = info;
        p.Start();

        sw = p.StandardInput;
        sr = p.StandardOutput;
        sw.AutoFlush = true;

        sw.WriteLine(command);

        sw.Close();

        string ret = sr.ReadToEnd();

        Console.WriteLine(ret);
        return ret;
    }

GhostScript运行后，我们只需将打印机设置回以前的默认值，用户就更聪明了。

try{
    Printers.SetDefaultPrinterName(currentPrinterName);
}catch{}

在Excel中将Excel电子表格转换为PDF Interop.Excel替代品

1 个答案: