动态删除列区域(已解决)(Delete或Insert后面数字的含义)

aroffice · 发表于 2010-6-24 09:46

我需要动态地删除列从G列开始到V列结束
这个区域为动态开始的列，需要怎样表示
Columns("G:W").Delete Shift:=xlToLeft
红色的列号需要怎样动态表示？
tc 动态表示列数字
Range(Cells(1,tc),Cells(1,23)).Delete 4
Delete或Insert后面数字的含义
1 单元格左右移动
2 单元格上下移动
3 删除或插入整行
4 删除或插入整列

[ 本帖最后由 aroffice 于 2010-11-18 17:03 编辑 ]

aroffice · 发表于 2010-6-24 11:18

Range(Cells(1, 7), Cells(1, 23)).EntireColumn.Delete Shift:=xlToLeft
7-22

alzeng · 发表于 2010-6-24 14:25

[G1:V1].Delete 1

aroffice · 发表于 2010-6-24 20:58

G列不确定的,怎么表示

比如前面计算出tc=8 ,则这儿需要删除I列到W列
计算出tc= 14则这儿需要删除 N列到W列

不能使用这种表达示了??

alzeng · 发表于 2010-6-24 21:15

Range(Cells(1,tc),Cells(1,23)).Delete 1

aroffice · 发表于 2010-6-24 21:38

是需要整列都需要删除的,

aroffice · 发表于 2010-6-24 21:38

EntireColumn 这个好象是表示把区域转换成列的

alzeng · 发表于 2010-6-24 21:42

Range(Cells(1,tc),Cells(1,23)).Delete 4

aroffice · 发表于 2010-6-25 11:43

谢谢了,alzeng大师

探研VBA · 发表于 2010-11-1 19:42

在Public Sub 表格转换() 中的 .Range(Cells(m + 1, 1), Cells(m + 1, 6)).Delete Shift:=xlShiftUp 为什么会出错。在线等请高手帮忙看一下。谢谢

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

[已解决] 动态删除列区域(已解决)(Delete或Insert后面数字的含义)

Range(Cells(m + 1, 1), Cells(m + 1, 6)).Delete Shift:=xlShiftUp 为什么会报错