1樓:匿名使用者
sheet1的區域a1:c3拷貝到sheet2的區域a1:c3
sheet1.range("a1:c3").copy sheet2.range("a1:c3")
2樓:丙雅弘雨凝
sub aaa()
dim sh1 as worksheet
dim sh2 as worksheet
set sh1 = workbooks("1.xls").sheets(1)
set sh2 = workbooks("2.xls").sheets(1)
sh1.range(sh1.[a1], sh1.range("a1").end(xldown)).copy sh2.[a1]
sh1.range(sh1.[a65536].
end(xlup), sh1.[a65536].end(xlup).
end(xlup)).copy sh2.[b1]
end sub隨便放哪個工作簿吧。但是,兩個工作簿都要開啟。當然你也可以加上開啟工作簿的**。
使用vba, 如何將一個excel文件中某個區域的內容自動複製到另一個excel文件中指定的某個區域?
3樓:太極健
這就一句話的事呀,兩個工作簿都已經開啟的情況下sub mycopy()
workbooks("工作簿1.xls").sheet1.
range("a1:c50").copy thisworkbook.
sheet2.range("a1")
end sub
意思就是把工作簿1中工作表sheet1的a1:c50區域複製到當前工作簿sheet2工作表的a1區域(這個區域與前面的區域是一樣的,只需要寫左上角的單元格即可)
4樓:匿名使用者
public sub copy()
range("a1:c10").select '複製的區域,自行修改
selection.copy '複製workbooks(2).activate '啟用第二個book
range("a1").select '區域,自行修改activesheet.paste '貼上end sub
請問如何用excel的VBA做出,從1 20中任取數的所有組合,總共是125970種,求高手支招,萬謝
如果你只是需要結果的話,可以用函式 combin 20,8 直接求的結果,如果真是要用vba實現的話按照 tat蘿蔔說的做就行了,完善如下 sub zuhe dim times as double for i1 1 to 13 for i2 i1 1 to 14for i3 i2 1 to 15fo...
如何將VBA工程或模組獨立於Excel檔案儲存
魚木混豬喲 vba工程或模組,是無法脫離excel檔案儲存的,但是可以脫離執行這個工程的xls或xlsm檔案而儲存。儲存時選擇 載入項xla型別 的選項,即可儲存為.xla格式的檔案,如果在excel中啟用這個載入項,就可以在開啟的任意excel文件中使用這個vba工程。要維護它可以直接用excel...
如何用EXCEL的VBA來實現根據條件篩選結果
陸不大 這個問題我也沒做過,臨時找了兩個函式,結合起來能解決,也許不是最好的辦法,但能解決總是好的,呵呵 做出的樣表如下 a b c d 1 姓名 班級 班級 班級 2 1222 2323 3434 3 姓名 班級 數學成績 語文成績 4 張三 1222 78 85 5 李四 2323 79 83 ...