谁能帮帮我?关于EXCEL与CAD互相转换表格的问题.
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">由于工作的需要,现在正在学习VBA,<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p></o:p><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">我从论坛上下在了一个EXCEL与CAD互相转换表格的程序
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">我试了一下。<o:p></o:p>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">由<FONT face="Times New Roman">excel</FONT>表生成<FONT face="Times New Roman">autocad</FONT>时出现错误。实时错误‘<FONT face="Times New Roman">9</FONT>’<FONT face="Times New Roman"> </FONT>下标越界<FONT face="Times New Roman"> <o:p></o:p></FONT>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">由<FONT face="Times New Roman">autocad</FONT>生成<FONT face="Times New Roman">excel</FONT>表怎么里面什么都没有啊。<o:p></o:p>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><FONT face="Times New Roman">ByVal x As Integer, ByVal y As Integer</FONT>是什么意思啊,为什么前面要加<FONT face="Times New Roman">ByVal </FONT>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">下面这个是我用来测试的excel表。
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">
谁能帮帮我?关于EXCEL与CAD互相转换表格的问题.
实时错误‘9’ 下标越界问题:你的EXCEL文档没有名为“报价”的工作表,你将程序中代码With xcelapp.ActiveWorkbook.Worksheets("报价")改为With xcelapp.ActiveWorkbook.Worksheets("Sheet1")就可以了。ByVal表示用值传递方式在函数(过程)间传递参数,目的是保证函数内部不会修改外部变量,即程序中i、j变量值。用ByVal传递参数,即使函数内修改了参数x、y的值也不会影响函数外部的变量i、j。 <FONT face="Times New Roman">ByVal 表示传值参数 不加此表示值传地址,是VB默认的,表示对参数在函数过程会被改变。这和C语言是不同的。</FONT>
页:
[1]