返回列表 上一主題 發帖

插入數列問題

插入數列問題

Book1.rar (7.21 KB) 請高手們指導  謝謝
   如附件

回復 1# jim
試試看
  1. Sub Ex()
  2.     With Range(Cells(Range("K1"), "B"), Cells(Range("K1"), "G")).Resize(Range("L1"))
  3.         .Insert Shift:=xlDown   'range(B:G)而非整列
  4.         '.EntireRow.Insert      '整列
  5.     End With
  6. End Sub
複製代碼

TOP

回復 2# GBKEE

THANKS

TOP

        靜思自在 : 人的眼睛長在前面,只看到別人的缺點,絲毫看不到自己的缺點。
返回列表 上一主題