如何从 Microsoft Office 2007 保存 ImageMSO 图标？

我从 Microsoft Office 2007 中发现了很多漂亮的图标。您知道如何使用 VBA 将所有图标提取并保存为 PNG 文件吗？

部分图像MSO http://rabu4g.bay.livefilestore.com/y1p2SF1q63YjDjPNmK4nYMW2644r9AO2aAsE__vBYznTeXD0b4SJUU0O07fxPD0r7aO_83gCJ-8OfcOQsFKG0fQMRnTEneBU1TI/Capture.PNG http://rabu4g.bay.livefilestore.com/y1p2SF1q63YjDjPNmK4nYMW2644r9AO2aAsE__vBYznTeXD0b4SJUU0O07fxPD0r7aO_83gCJ-8OfcOQsFKG0fQMRnTEneBU1TI/Capture.PNG

以下代码是用于从 ImageMSO 获取图像的代码。

Application.CommandBars.GetImageMso([name], [width], [height])

我可以将所有内容显示为 PictureBox 控件并将 Excel 文件另存为网页。然而，每个图标的质量都很低。

此外，我尝试使用以下代码创建 C# Excel 加载项项目以导出为位图对象。但我发现它不能导出为半透明PNG。

stdole.IPictureDisp p = Application.CommandBars.GetImageMso(fileName, size, size);
Bitmap b = Bitmap.FromHbitmap((IntPtr)p.Handle, (IntPtr)p.hPal);

附言。我想将所有图标保存为 PNG 格式，因为我需要使用它的半透明功能。它允许我在大多数背景颜色上使用所有图标，而不是白色背景。

我在 Excel 开发中经常使用 ImageMso。偶然发现这篇文章后，我更进一步，将其放在一起，将 Microsoft Excel 中的图标进行可视化搜索、提取和保存为文件，或者复制并粘贴（具有 alpha 通道透明度）到另一个应用程序。我还从各种来源编制了 8,899 个不同 ImageMso 名称的列表。我希望其他人会发现这很有用。

Microsoft Office 图标 (ImageMSO) 库和提取 https://imagemso.codeplex.com/