返回列表 上一主題 發帖

如何自動判定於原資料二列後插入一空白列???

如何自動判定於原資料二列後插入一空白列???

如何在原資料以巨集設定自動於二列後插入一空白列,附件原資料及希望變更後的資料,請各高手指教,謝謝^^

Book10.rar (1.44 KB)

oobird版主,請問如果有標題列不算,也就是一樣是2列後入一列空白列,第一空白列的於第四列位置,請問巨集如何修改呢,煩請解惑,謝謝^^

TOP

感謝oobird版主賜教,謝謝..巨集很方便又好用^^

TOP

  1. Sub yy()
  2. Set c = Rows(3)
  3. For i = 5 To [c65536].End(3).Row Step 2
  4. Set c = Union(c, Rows(i))
  5. Next
  6. c.Insert
  7. End Sub
複製代碼

TOP

        靜思自在 : 好事要提得起,是非要放得下,成就別人即是成就自己。
返回列表 上一主題