首页 文章

在更改最后一列的右侧插入列

提问于
浏览 次
0

我有这样的excel表：

enter image description here

每个月，我必须在现有列的右侧插入相同的9列 . 任何人都可以帮助我使用VBA /宏在最后一列的右侧插入行 . 最后一列（本表中的“i”）将在一个月内改变，增加9列 . 除了插入列，我还想在插入的列中复制文本 .

我很感激你的时间和帮助 .

vba excel-vba excel-2007 excel

1 回答

  • 0

    这样的事情对你有用：

    Dim c as range

set c = activesheet.cells(1,columns.count).End(xlToLeft).offset(0,1)

with c.Resize(1,9)
   .value = Array("Tab1", "Tab2", "Tab3", _
                   "Tab4", "Tab5", "Tab6", _
                   "Tab7", "Tab8", "Tab9")
   .font.bold = true
end with
    回复于

相关问题