在excel中使用vba实现单元格间数据移动

下面小编为大家介绍excel中使用vba完成单元格数据移动方法，不会的朋友可以参考本文！

步骤

1、首先我们打开一个工作样表作为例子。

2、在例子中我们在a1和b1单元格分别输入有名字和地址两个分列，现在要做的就是使用vba把a1和b1单元格的内容进行互换。方法如下。

3、使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：

Sub 数据互换()

ActiveSheet.Columns("B").Insert '在A列右侧插入列，即插入B列

ActiveSheet.Columns("a").Cut

ActiveSheet.Columns("B").Insert '以上两句将a列数据移至B列，原B列及以后的数据相应后移

ActiveSheet.Columns("c").Cut

ActiveSheet.Columns("a").Insert '以上两句将c列数据移至a列，原C列和D列数据相应左移一列

End Sub

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

5、如果是对行进行操作，可以将Columns替换为rows对象即可，这样就是完成了行与行的互换。对应的rows对象是数字序列，而不是字母序列。

6、还有一点需要注意的是使用这种方法进行数据调整虽然序列没有发生改变，但是页面设置会因为插入和删除的原因而发生改变，可以看到运行宏后，宏指令按钮的位置发生了改变。

以上就是在excel中使用vba实现单元格间数据移动方法介绍，操作很简单的，大家按照上面步骤进行操作即可，希望能对大家有所帮助！

赞 (0)

相关推荐

  • excel中使用vba给单元格赋值

    excel中使用vba给单元格赋值 操作方法 01 首先我们打开一个工作样表作为例子. 02 在工作表中使用鼠标单击任一一个单元格,就可以激活该单元格,这时候,就可以使用键盘直接键入数据,也可以双击单 ...

  • 在Excel中怎么对相邻单元格的数据求和?

    在Excel中怎么对相邻单元格的数据求和?很多朋友都不是很清楚,所以今天小编就为大家详细介绍一下,不会的朋友快快来看看吧! 横向求和 1.首先,我们在横向的几个单元格内输入测试数据,如图所示. 2.然 ...

  • excel中使用vba实现单元格计算的方法

    excel中,假如我们知道每个员工的销售数量,又知道商品的单价,可以简单的计算出销售额,但是档员工人数特别多,即便是快速复制公式,仍然可以把你累死,这时候就要使用vba了,利用循环计算,你可以快速的计 ...

  • 在excel表格中使用vba引用单元格区域

    今天为大家介绍在excel中使用vba来引用单元格区域方法,不会的朋友可以参考本文,来看看吧! 步骤 1.首先我们打开一个工作样表作为例子. 2.使用alt+f11组合快捷键进入vbe编辑器,插入一个 ...

  • 一招教你通过VBA来保护2003版Excel中包含公式的单元格

    一招教你通过VBA来保护2003版Excel中包含公式的单元格

    相信很多小伙伴在日常办公中都会用到Excel,如果我们想要保护Excel中包含公式的单元格该怎么做呢?其实通过使用VBA就能实现,下面小编就来为大家具体介绍.具体如下:1. 首先,打开电脑上的&quo ...

  • 在excel中不包含一些单元格数值的随机数方法介绍

    excel是办公尤其是处理数据的一个好帮手,他能给需要进行各类数据处理提供很强大的支持,这是我在工作中遇到的一个问题,是这样的,比如有两个单元格有固定值,而另外还有一个单元格需要取随机数,但又要求不要 ...

  • Excel中常见的拆分单元格两种方法

    下图中的表头就是已经合并了四个单元格的一个大单元格,本教程需要讲述的就是如何将这个大的单元格拆分成原有的四个小单元格.下面请看小编图文详解Excel中常见的拆分单元格两种方法. 拆分单元格方法一 选中 ...

  • 在Excel中怎么拆分合并单元格?

    Excel表格是我们工作中必不可少的一款软件,在制作表格的过程中经常用到合并单元格和拆分单元格,那么在Excel中怎么拆分合并单元格?下面小编就为大家详细介绍一下,来看看吧! 方法/步骤 第一步,打开 ...

  • 怎么在Excel中合并多个单元格的内容到一个单元格中

    怎么在Excel中合并多个单元格的内容到一个单元格中

    有的小伙伴在使用Excel软件处理数据时,想要在合并单元格的同时,合并单元格中的内容到一个单元格中,但是却不知道如何合并,那么小编就来为大家介绍一下吧.具体如下:1. 第一步,双击或者右击打开exce ...