Office中国论坛/Access中国论坛

标题: 这个代码怎么用呀?大家帮帮忙? [打印本页]

作者: tangguo113    时间: 2009-4-13 16:52
标题: 这个代码怎么用呀?大家帮帮忙?
Sub yy() Dim i%, c For i = 2 To [a65536].End(xlUp).Row Set c = Sheet2.Columns(1).Find(Cells(i, 1), lookat:=xlWhole) If Not c Is Nothing Then c.Offset(, 1).Resize(, 30).Copy Cells(i, 2) End If Next i End Sub
作者: 82077802    时间: 2009-4-13 19:50
不太明白你的意思
作者: tangguo113    时间: 2009-4-14 16:57
这个代码是解决什么问题的呀,教教我怎么用呀
作者: tangguo113    时间: 2009-4-14 16:59
我想把一个exel表导入到另外一个exel表中去,按条件直接就到进去了




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3