|
詳細一點說：  要通過VBA把Sheet1工作表中的數(shù)據(jù)寫入Sheet2工作表中，可以采用如下方法： 1、假如要把Sheet1工作表中A1單元格的數(shù)據(jù)寫入Sheet2工作表的A1單元格中。 2、可以執(zhí)行以下語句： sub test()sheets("Sheet2").range("A1").Value=sheets("Sheet1").range("A1").Value end sub 3、語句解釋：range("A1")代表A1單元格，.Value代表是單元格的值屬性。 溫馨提示：答案為網(wǎng)友推薦，僅供參考 當前網(wǎng)址：https://88./zd/gSaVKVKSKBcKVMB1SS.html 第1個回答 2014-05-22 sub a() [a1].copy iif([a1]="",[a1],sheets(2).[a65536].end(3).offset(1)) end sub 將表1的數(shù)據(jù)插入到SHEET2的A列。 sheet是有表頭啊什么的，我只要指定區(qū)域插入即可。 你的要求不明確，全是大范圍，沒一個準確的描述。。。我只有隨便舉例寫了一個。 追問哦，真不好意思。那我盡量寫準確一點 現(xiàn)在就是想在表1中將數(shù)據(jù)行填充進去以后，通過插入的按鈕將數(shù)據(jù)航增加到表2的最后。 如圖，這是表1的數(shù)據(jù)，當我填好后，點擊上面的按鈕，這一部分數(shù)據(jù)就被復(fù)制到表2 中，點擊一下，就在表2中向下復(fù)制一次，達到數(shù)據(jù)積累的效果。 另外，我表1和表2的格式是一樣的，只需要在表2的最下方插入表1的這些數(shù)據(jù)行就行了 range("b4:O"& [b65536].end(3).row).copy sheets(2).[B65536].end(3).offset(1) end sub 把中間那名代碼，復(fù)制到你的控件代碼中。 追問我對VBA不懂，請問上述語句中，sheets(2) 是怎么定位的？ sheets(2) ，代表第2個表，在工作表標簽上，從左往右數(shù)。 第2個回答 2015-09-30 具體要看你的是什么操作，如果是篩選，合并之類的操作，可以通過宏錄制，直接錄制出的操作代碼，將代碼中的sheet1改成sheet2?。?！具體需要什么操作，你要說一下才能給你代碼 |
|
|
來自： wangyong670 > 《財務(wù)》
