使用VBA导出EMF图片

刚回答了一个这样的问题， 怎么又出来个一样的

Sub test()
 Worksheets("Sheet1")ChartObjects(1)ChartExport Filename:="current_salesemf", FilterName:="jpeg"
End Sub

CAD具备这个能力。下面讲讲在尧创CAD中如何创建图符型的图库，以及这类图库的调用和推广。

一、创建个性化图库的目录

在尧创CAD程序安装后的\symblib\目录下，新建文件夹，文件夹的名称即个性化图库的名称（如“厂标库”）；再根据零件类别细细分设。比如在“厂标库”目录中，再新建一个“自制件”、“借用件”……

　二、创建个性化图库中的子图

　1创建子图的dwg文件

a画图：新建一个文件（可以使用常用模板新建），按实际尺寸绘制图形，完成；

b定义基准点：单击菜单“绘图｜块｜基点”，移动光标到对象特征点上，单击鼠标左键，完成（这个点表示本图形作为文件块被调用时的基准点）；

c存为dwg文件：选择路径（放在第一步设置的路径下），输入文件名，点保存。

　2创建子图的EMF预览

a对第1步绘制的图形进行视图缩放，让图形既完整又尽可能大地显示在绘图区域；

b点菜单“文件｜输出”，选择路径和文件名（注意：路径和文件名与第1步子图的dwg文件的路径和文件名完全一致），点“确定”；

c根据命令行提示，拉矩形框选择（或点选）绘图区域中需要放入EMF预览中的图素，点右键，结束选择，同名的EMF文件生成。

　3给子图添加属性信息

a点菜单“机械｜机械图库｜”，打开任意一个图库如“标准件”，进入YaoCCAD图库界面，在图库类型区域选择第一步创建的目录，找到第1、2步创建的子图；

图1

b移动光标到子图预览上，单击鼠标左键，选中后，单击右键菜单中的“零件属性”。

标准属性：根据企业或个人的需求，定义子图的标准属性名，可以添加删除或修改。标准属性名称的设置建议在建立个性化图库之初定义，以保证以后新建的子图自动采取定义后的属性名。

填写属性内容：在属性对话框中填写属性值，如代号：HT20597-2009、名称：凹面承插焊钢制管法兰 PN10 Mpa DN20……；定义完成点“确定”。

图2

属性名：表示图库中的属性字段名称

别名：当本单位明细栏中的标准属性名称与图库中的属性字段名不一致时，请对属性名（图库中的属性字段名）设置别名（明细栏中的属性字段名），让两者相互映射，以保证序号标注时可以正确提供相应字段的信息；当图库和明细栏中的属性字段名完全相同时，则勿须定义别名。

n出库的 *** 作步骤：

个性化图库的出库与程序自带“符号”图库的 *** 作大致相同，具体如下：

1单击菜单项“机械｜机械图库｜”中的任意一图库，如标准件，进入YaoCCAD图库界面，在图库类型区域选择个性化图库（如“厂标件”），

2找到某一路径下的单个子图，双击鼠标左键调用；

3指定插入点和旋转角度，完成。

n出库子图的序号标注

1点菜单“机械｜序号”，选择引出点，

2在“序号标注”对话框中，点“提取信息”按钮；

3程序自动退回绘图界面，移动光标到出库子图上，单击鼠标左键，自动提取子图的属性信息，如下图所示。点确定，序号标注完成，并自动生成明细栏。

图3

图库的推广与复用

自定义图库作为尧创CAD图库的一部分，将与其他出厂图库一起，随时提供客户选用，当其他同事需要时，只需要在windows资源管理器界面，把安装路径下的\symlib\目录完整地拷贝到他们机器上的尧创CAD程序的安装目录下，覆盖同名文件夹即可。

EMF和WMF应该都是属于矢量图形，Adobe illustrator也可编辑，但是有些emf图打开后与原图不一致，可结合CorelDRAW 和 Adobe illustrator软件一起编辑。

---