excel自动填内容问题
<p>我写了个小程序,主要有以下功能:</p><p>1、先用在CAD中用GETPOINT函数获取两点,再计算两点间的距离</p><p>2、在GETPOINT中设置关键字,当关键字输入为“O”时结束获取点</p><p>3、弹出一个对话,手动输入一些参数,主要是输入一些人为设置的内容、 一条线具有:编号、长度(根据1项计算自动显示出来)、余量等属性</p><p>4、输入完成后,将这些内容自动输出到excel.并要,先判断excel中有没有使用了的行,如果有,则从没使用的第一个行增加数据,如果没有则从第一行增加数据</p><p>5、不断一重复前四项</p><p>前3项都没有问题,第4项使用了me.usedrange.rows.count获取已经使用的行数,在整个循环中总是不能正常获取已经使用的行数,通过监测,发现该值一直是1</p><p>但当手动填入几行数据,单独使用me.usedrange.rows.count则显示正常结果。</p><p>请高手结些提示。最好给一段代码</p><p></p><p></p> 获取最末行用ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row 谢谢,回去试一下
页:
[1]