excel求助！excel动态数组赋值后删除

xjx496111 · 发表于 2012-12-14 11:38

本帖最后由 xjx496111 于 2012-12-14 15:05 编辑

请高手帮忙！
arr = sht.Range("C15:V74")
hz.Sheets(1).Range("E" & Rows.Count).End(xlUp).Offset(1).Resize(UBound(arr), UBound(arr, 2)) = arr
想要删除其中连续的三列数据，怎么办？

兰色幻想 · 发表于 2012-12-14 11:43

删除数组中的数据只能用循环的方法

xjx496111 · 发表于 2012-12-14 12:05

兰色幻想发表于 2012-12-14 11:43
删除数组中的数据只能用循环的方法

是赋值后删除，不是对数组操作。

xjx496111 · 发表于 2012-12-14 15:23

删除数据已经到excel中了，只是动态的。

无聊的疯子 · 发表于 2012-12-15 00:47

其中的三行,很简单嘛

rows("6:9").delete

把6 和 9 换成变量,就可以了!!

无聊的疯子 · 发表于 2012-12-15 00:49

下面的小代码,一个示例!!!

Sub cc()
Dim Sa As Integer, Ea As Integer
Sa = 6
Ea = 9
Rows(Sa & ":" & Ea).Delete
End Sub

复制代码

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

excel求助！excel动态数组赋值后删除

相关帖子