将字体结果保留为图像？

Question

我有一个excel文件，它使用唯一的字体类型将原始值（如{ABCDEF | 123456}）转换为条形码图像。

我需要将文件发送到没有足够权限来安装此自定义字体的计算机。

有没有办法将此字体类型保留为Excel中的图像？或者保持字体输出而不在当前机器上安装字体？

虽然我发现使用Copy as Picture =＆gt;外观：“如屏幕上显示”手动工作，我似乎无法使VBA代码与此工作良好，因为我必须在一个文件中完成数千次。

Answer 1

您只需要在单元格上复制和粘贴位图，而不是向量：

Range("F1").Select
Selection.CopyPicture Format:=xlBitmap
ActiveSheet.PasteSpecial Format:="Bitmap"