这个代码怎么用呀？大家帮帮忙？

tangguo113 · 发表于 2009-4-13 16:52:46

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

tangguo113 · 发表于 2009-4-14 16:59:53

我想把一个exel表导入到另外一个exel表中去，按条件直接就到进去了

tangguo113 · 发表于 2009-4-14 16:57:53

这个代码是解决什么问题的呀，教教我怎么用呀

82077802 · 发表于 2009-4-13 19:50:26

不太明白你的意思

帐号		自动登录	找回密码
密码			注册

群介绍
Excel中国官方交流群2群 (331511605)
Excel中国官方群 (243419633)
Office China for Exc (498717031)
Excel交流群(纯技术) (324568243)

主题相关群

地区相关群[您还没设置居住地]

[基础应用] 这个代码怎么用呀？大家帮帮忙？

群介绍
主题无相 (随机显示版	同地区群块其他地区)