最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

在excel中使用vba實現(xiàn)單元格間數(shù)據(jù)移動

  發(fā)布時間:2016-09-01 15:51:36   作者:keoneo   我要評論
這篇教程是向腳本之家的朋友分享在excel中使用vba實現(xiàn)單元格間數(shù)據(jù)移動方法,教程比較基礎(chǔ),適合新手來學(xué)習(xí),有需要的朋友可以參考本文,希望能對大家有所幫助

下面小編為大家介紹excel中使用vba完成單元格數(shù)據(jù)移動方法,不會的朋友可以參考本文!

步驟

1、首先我們打開一個工作樣表作為例子。

excel中使用vba完成單元格數(shù)據(jù)移動

2、在例子中我們在a1和b1單元格分別輸入有名字和地址兩個分列,現(xiàn)在要做的就是使用vba把a(bǔ)1和b1單元格的內(nèi)容進(jìn)行互換。方法如下。

excel中使用vba完成單元格數(shù)據(jù)移動

3、使用alt+f11組合快捷鍵進(jìn)入vbe編輯器,插入一個新的模塊,并在模塊中輸入以下代碼:

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

excel中使用vba完成單元格數(shù)據(jù)移動

4、這里使用的方法是剪切插入法,insert是插入命令,cut是剪切命令。命令需要指定活動的工作表和列操作。

excel中使用vba完成單元格數(shù)據(jù)移動

5、如果是對行進(jìn)行操作,可以將Columns替換為rows對象即可,這樣就是完成了行與行的互換。對應(yīng)的rows對象是數(shù)字序列,而不是字母序列。

excel中使用vba完成單元格數(shù)據(jù)移動

6、還有一點需要注意的是使用這種方法進(jìn)行數(shù)據(jù)調(diào)整雖然序列沒有發(fā)生改變,但是頁面設(shè)置會因為插入和刪除的原因而發(fā)生改變,可以看到運(yùn)行宏后,宏指令按鈕的位置發(fā)生了改變。

excel中使用vba完成單元格數(shù)據(jù)移動

以上就是在excel中使用vba實現(xiàn)單元格間數(shù)據(jù)移動方法介紹,操作很簡單的,大家按照上面步驟進(jìn)行操作即可,希望能對大家有所幫助!

相關(guān)文章

最新評論

丹东市| 甘泉县| 盖州市| 恭城| 南乐县| 奉化市| 萍乡市| 杂多县| 郯城县| 庆安县| 永康市| 万安县| 吉安市| 恩施市| 尼勒克县| 望城县| 苍山县| 通辽市| 平阳县| 甘洛县| 扎鲁特旗| 江达县| 周口市| 吐鲁番市| 都匀市| 庆城县| 新昌县| 阿拉善盟| 广宁县| 麻城市| 类乌齐县| 洪泽县| 阳朔县| 富川| 临汾市| 密云县| 卢湾区| 民乐县| 区。| 宿州市| 九龙坡区|