1樓：太極健
sub sheetcopy()
dim i as integer
dim j as integer
dim k as integer
for i = 1 to 100
for j = 1 to 9
sheet2.cells(i, j).value = sheet1.cells(i, j).value
next j
next i
end sub
不是cell(i,j)是cells(i,j)，你少了個s另你為什麼要用迴圈來寫呢？一句話的事呀
sub sheetcopy()
sheet1.range("a1:i100").copy sheet2.range("a1")
end sub
或者sub sheetcopy()
sheet2.range("a1:i100").value= sheet1.range("a1:i100") .value
end sub
2樓：
你的系統報錯資訊是怎樣的？系統說你哪一行錯了？你不說誰知道？
vba怎樣把單元格中的值賦給另單元格
excel vba在程式設計時，經常會遇到取單元格值，並賦值，一般是兩種語句 1 range a1 這樣的，直接使用引用。賦值即可使用range a1 range b1 2 cells 行號，列號 這樣的，使用rc引用方式，賦值可使用cells 1,1 cells 1,2 wlorkbooks bo...
vba怎麼選擇sheet2的單元格
worksheets 2 select 選擇 複製sheet2 activesheet.range a3 c3 select 選擇sheet2的a3到c3三個單元格 excel vba裡如何指定特定表 如sheet2 裡面的單元格如cell 3,1 是cells i 2,1 不是cell sheet...
ecel在vba中怎麼表示當前行或單元格
1 開啟excle 在 彙總選中a8這個單元格。2 然後在開發工具欄的下方找到 visual basic 的入口。3 點選入口進入vba的程式設計介面。4 在程式設計介面的頂部找到 檢視 的按鈕。5 然後點選 檢視 選擇 立即視窗 6 在立即視窗裡面輸入以下 selection.entirerow....