excel如何使用vba實(shí)現(xiàn)單元格間數(shù)據(jù)移動(dòng)
excel如何使用vba實(shí)現(xiàn)單元格間數(shù)據(jù)移動(dòng)
在excel中輸入數(shù)據(jù)時(shí),想要在單元格之間進(jìn)行移動(dòng)該如何進(jìn)行呢,其實(shí),使用vba可以很好的實(shí)現(xiàn)。下面隨學(xué)習(xí)啦小編一起看看吧。
excel使用vba實(shí)現(xiàn)單元格間數(shù)據(jù)移動(dòng)的步驟
1、首先我們打開(kāi)一個(gè)工作樣表作為例子。
2、在例子中我們?cè)赼1和b1單元格分別輸入有名字和地址兩個(gè)分列,現(xiàn)在要做的就是使用vba把a(bǔ)1和b1單元格的內(nèi)容進(jìn)行互換。方法如下。
3、使用alt+f11組合快捷鍵進(jìn)入vbe編輯器,插入一個(gè)新的模塊,并在模塊中輸入以下代碼:
Sub 數(shù)據(jù)互換()
ActiveSheet.Columns("B").Insert '在A列右側(cè)插入列,即插入B列
ActiveSheet.Columns("a").Cut
ActiveSheet.Columns("B").Insert '以上兩句將a列數(shù)據(jù)移至B列,原B列及以后的數(shù)據(jù)相應(yīng)后移
ActiveSheet.Columns("c").Cut
ActiveSheet.Columns("a").Insert '以上兩句將c列數(shù)據(jù)移至a列,原C列和D列數(shù)據(jù)相應(yīng)左移一列
End Sub
4、這里使用的方法是剪切插入法,insert是插入命令,cut是剪切命令。命令需要指定活動(dòng)的工作表和列操作。
5、如果是對(duì)行進(jìn)行操作,可以將Columns替換為rows對(duì)象即可,這樣就是完成了行與行的互換。對(duì)應(yīng)的rows對(duì)象是數(shù)字序列,而不是字母序列。
6、還有一點(diǎn)需要注意的是使用這種方法進(jìn)行數(shù)據(jù)調(diào)整雖然序列沒(méi)有發(fā)生改變,但是頁(yè)面設(shè)置會(huì)因?yàn)椴迦牒蛣h除的原因而發(fā)生改變,可以看到運(yùn)行宏后,宏指令按鈕的位置發(fā)生了改變。
excel單元格間數(shù)據(jù)移動(dòng)的相關(guān)文章: