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個贊
CellRangeThisWorkbookActiveSheetWorksheet
Sheets("Temp").Range(ActiveSheet.Cells(1), ActiveSheet.Cells(1).End(xlDown)).Copy
Sheets("Overview").Range("C40").PasteSpecialSheets("Temp").Range(Me.Cells(1), Me.Cells(1).End(xlDown)).Copy
Sheets("Overview").Range("C40").PasteSpecialDim 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 WithSheets("Temp").Columns(1).SpecialCells(xlCellTypeConstants).Copy Destination:=Sheets("Overview").Range("C40")添加回答
舉報
0/150
提交
取消