我已经编写了以下简单的C#控制台应用程序,用于导出Excel工作簿中的所有图表。它能正常工作,但如果在打开文档后没有滚动到图表位置,则会生成一个空白的图片文件。
我曾尝试过几次滚动到对象,但程序底部的注释行(例如
using Excel = Microsoft.Office.Interop.Excel;
using System;
using System.Diagnostics;
namespace ExcelExporter
{
class ChartExporter
{
const string EXPORT_TO_DIRECTORY = @"C:\Users\Sandy\Desktop\Excel\Charts";
static void Main(string[] args)
{
Excel.Application app = System.Runtime.InteropServices.Marshal.GetActiveObject("Excel.Application") as Microsoft.Office.Interop.Excel.Application;
ConsoleColor c = Console.ForegroundColor;
Console.ForegroundColor = ConsoleColor.Green;
Console.Write("Export To: ");
Console.ForegroundColor = c;
string exportPath = Console.ReadLine();
if (exportPath == "")
exportPath = EXPORT_TO_DIRECTORY;
Excel.Workbook wb = app.ActiveWorkbook;
foreach (Excel.Worksheet ws in wb.Worksheets)
{
Excel.ChartObjects chartObjects = (Excel.ChartObjects)(ws.ChartObjects(Type.Missing));
foreach (Excel.ChartObject co in chartObjects)
{
Excel.Chart chart = (Excel.Chart)co.Chart;
// app.Goto(co, true);
chart.Export(exportPath + @"\" + chart.Name + ".png", "PNG", false);
}
}
Process.Start(exportPath);
}
}
}
我曾尝试过几次滚动到对象,但程序底部的注释行(例如
app.Goto(co, true);
)仅适用于范围。 有没有办法滚动到ChartObject
,或以其他方式确保它们正确导出为图像?
为了测试,请使用包含1000多行图表的工作簿(当文档打开时,它们显然已超出视野范围);在运行程序之前先关闭并重新打开文档(一旦滚动到,图表就已呈现并存储在内存中)。
_Application.Visible
?我试试看。 - Sandy Gifford