前景提要(文末提供源码下载)
在使用工作表的过程中,不可避免的会需要和行列打交道,比方说有时候我们需要在数据表中间插入多列空白列,然后在补充新的数据进入数据表中,插入多列的方法有很多种,效率自然也不相同,有的很快,有的很慢,大家都知道我们的目标是高效办公,那么能高效到什么程度呢?
场景说明
这是今天我们的数据源,我们现在希望在其中增加几列,假设我们是希望在C列的前面增加10列,来看看可以如何实现吧
手工法
其实看起来手工插入并不算是很麻烦,只需要先选择好要插入的行数之后,直接右键就可以实现插入了。
唯一的一个小瑕疵就是如果需要插入的列数比较多的话,在选择列数的时候,需要数好数,不然多了要删除,少了还要再次插入,比较的麻烦,来看看VBA的方法
VBA法
Sub kongh()Dim rng As Range, TargetCol$, num$Set rng = Application.InputBox("请选择参照列