返回列表 上一主題 發帖

資料匯出另存新檔

回復 1# hugh0620
  1. Private Sub CommandButton1_Click()
  2.     Sheets("Test").Copy
  3.     ActiveWorkbook.VBProject.VBComponents(2).Name = "Sheet1"
  4. End Su
複製代碼

TOP

TOP

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