EXCEL VBA,從不活動的工作表中獲取范圍。當我查看“臨時”工作表時,這個腳本工作得很好。但是當我在另一個工作表中時,復制命令就失敗了。它提供了一個“應用程序定義的或對象定義的錯誤”。Sheets("Temp").Range(Cells(1), Cells(1).End(xlDown)).Copy
Sheets("Overview").Range("C40").PasteSpecial我可以用這個腳本代替,但是粘貼它有問題。Sheets("Temp").Columns(1).Copy
Sheets("Overview").Range("C40").PasteSpecial我不想激活“臨時”表來獲取這個我還能做什么
3 回答

MMMHUHU
TA貢獻1834條經驗 獲得超8個贊
Cell
Range
ThisWorkbook
ActiveSheet
Worksheet
Sheets("Temp").Range(ActiveSheet.Cells(1), ActiveSheet.Cells(1).End(xlDown)).Copy Sheets("Overview").Range("C40").PasteSpecial
Sheets("Temp").Range(Me.Cells(1), Me.Cells(1).End(xlDown)).Copy Sheets("Overview").Range("C40").PasteSpecial
Dim sh1 As WorksheetDim sh2 As WorksheetSet sh1 = ActiveWorkbook.Sheets("Temp")Set sh2 = ActiveWorkbook.Sheets("Overview")With sh1 .Range(.Cells(1,1), .Cells(1,1).End(xlDown)).CopyEnd Withsh2.Range("C40").PasteSpecial

瀟瀟雨雨
TA貢獻1833條經驗 獲得超4個贊

波斯汪
TA貢獻1811條經驗 獲得超4個贊
Dim lRow As LonglRow = Sheets("Temp").Cells(Cells.Rows.Count, "A").End(xlUp).RowWith Sheets("Temp") .Range("A1:A" & lRow).Copy Sheets("Overview").Range("C40")End With
Sheets("Temp").Columns(1).SpecialCells(xlCellTypeConstants).Copy Destination:=Sheets("Overview").Range("C40")
添加回答
舉報
0/150
提交
取消