:::
OOo使用者討論區
將一個已開啟的工作表文件其中一張工作表覆製至另一個已開啟的工作表文件的巨集應怎樣寫
我經常要將幾個工作表檔案內部份資料覆製另一個工作表檔案，以前用 Excel 時曾寫了一個如下的巨集
Sub Macro1()
Dim oFile
oFile = ThisWorkbook.Name
Windows(2).Activate
ActiveSheet.Cells.Copy
Windows(oFile).Activate
ActiveWorkbook.Worksheets("Sheet1").Activate
ActiveSheet.Paste _
Destination:=Worksheets("Sheet1").Cells(1, 1)
End Sub
請問各位先進在Open Office Calc 如上述功能的巨集應如何寫
Sub Macro1()
Dim oFile
oFile = ThisWorkbook.Name
Windows(2).Activate
ActiveSheet.Cells.Copy
Windows(oFile).Activate
ActiveWorkbook.Worksheets("Sheet1").Activate
ActiveSheet.Paste _
Destination:=Worksheets("Sheet1").Cells(1, 1)
End Sub
請問各位先進在Open Office Calc 如上述功能的巨集應如何寫
