請問如何用VBA將EXCEL檔案中的資料複製到別EXCEL檔案相同的位置

時間 2021-07-08 20:34:04

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 ...