Part 1:多⾏删除
Part 2:多列删除
1. 通过Columns和Range两种⽅法都可以
2. 列号使⽤字母表⽰,注意需将⾏号放⼊双引号中''
3. 当使⽤数字表⽰列号时,报错
Sub 多列删除()
Set te = ThisWorkbook.Worksheets('⽰例') te.Columns('B:D').Delete Shift:=xlToLeft 'te.Range('B:D').Delete Shift:=xlToLeft
End Sub
执⾏效果
列号采⽤数字报错信息
列号采⽤数字
Part 3:列号的字母表⽰
1. 在某些情况下我们只有列号的数字表⽰怎么办(例如Match函数结果)?
2. 使⽤Address结合Split函数即可解决该问题
3. ⽰例中28列对应的列号为AB
Sub 列号获取()
excel中如何整列使用trunc函数
Set te = ThisWorkbook.Worksheets('⽰例') cell_addr = te.Cells(1, 28).Address col_name = Split(cell_addr, '$')(1) Debug.Print (cell_addr) Debug.Print (col_name)
End Sub
执⾏效果
如需⽂中代码,可以⽂后留⾔留下邮箱,⼩编会发过去
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论