返回列表 上一主題 發帖

工作表同步增加資料

大家這麼那麼強喔~~~~~~~

TOP

回復 32# Leo1318
  1. Option Explicit
  2. Sub 巨集1()
  3. Sheets("Sheet1").Columns("A:B").AdvancedFilter Action:=xlFilterCopy, _
  4.         CopyToRange:=Range("A1"), Unique:=False
  5. End Sub
複製代碼
Hung-Chi Lin/林宏吉
HUNGCHILIN/林宏吉的OFFICE專欄

TOP

回復 33# HUNGCHILIN

謝謝版主, 但還不太了解, VBA裡的語汰, 完全沒有SHEET 2的字眼. 那程式是如何可以把SHEET 1的文字加到SHEET 2裡????

TOP

        靜思自在 : 信心、毅力、勇氣三者具備,則天下沒有做不成的事。
返回列表 上一主題