C# 压缩Excel中的图片

using Spire.Xls;

namespace CompressImgs
{
    class Program
    {
        static void Main(string[] args)
        {
            //加载Excel测试文档
            Workbook wb = new Workbook();
            wb.LoadFromFile("test.xlsx");

            //遍历工作表
            foreach (Worksheet sheet in wb.Worksheets)
            {
                //遍历工作表中的所有图片
                foreach (ExcelPicture picture in sheet.Pictures)
                {
                    picture.Compress(30);//压缩图片
                }
            }

            //保存文档
            wb.SaveToFile("CompressImgs.xlsx", ExcelVersion.Version2013);
            System.Diagnostics.Process.Start("CompressImgs.xlsx");
        }
    }
}

Imports Spire.Xls

Namespace CompressImgs
    Class Program
        Private Shared Sub Main(args As String())
            ‘加载Excel测试文档
            Dim wb As New Workbook()
            wb.LoadFromFile("test.xlsx")

            ‘遍历工作表
            For Each sheet As Worksheet In wb.Worksheets
                ‘遍历工作表中的所有图片
                For Each picture As ExcelPicture In sheet.Pictures
                        ‘压缩图片
                    picture.Compress(30)
                Next
            Next

            ‘保存文档
            wb.SaveToFile("CompressImgs.xlsx", ExcelVersion.Version2013)
            System.Diagnostics.Process.Start("CompressImgs.xlsx")
        End Sub
    End Class
End Namespace