关于VBA打印DWF的怪问题！
<P>用下面的程序来打印DWF文件。发现多数时候不行。命令行提示</P><P> **打印区域截短到打印机的最大值**<BR>有效打印区域: 0.00 宽 X 0.00 高<BR></P>
<P>然后生成4K大小的空白DWF文件。请教各位是怎么一回事啊！百思不得其解。</P>
<P>Sub test<BR>t = MakeDwf("c:\test.dwf")<BR>End Sub<BR>Public Function MakeDwf(ByVal FN As String) As String<BR>'按当前ActiveLayout打印DWF文件 FN为文件名 <BR>Dim result As Boolean<BR>ThisDrawing.Application.ZoomExtents<BR>result = ThisDrawing.Plot.PlotToFile(FN,""DWF6 ePlot.pc3"")</P>
<P>If result = True Then MakeDwf = FN<BR>End Function</P>
页:
[1]