Excel VBA 中如何使用结构化引用？

Question

如图，如果我想把D列剪切，插入到原A列、B列之间，vba代码即
range("D:D").cut
range("B:B").insert shift:=xltoright
对单元格范围进行了“插入”-“表”的操作之后
在vba代码中，如何利用列名“单位”代替“D”列、“商品名称”代替“B”列来引用？
类似于这样
range("单位").cut
range("商品名称").insert shift:=xltoright
如能提供vba中有关这种引用方法的详细文章供学习则更好啦
谢谢各位大虾！

Answer 1

需要这样的，那么就要用Find查找其所在的行。
代码如下：
Dim CutNb, InsNb
CutNb = Rows(1).Find("单位").Column
InsNb = Rows(1).Find("商品名称").Column
Columns(CutNb).Cut
Columns(InsNb).Insert Shift:=xlToRight

1、第一句dim是定义变量；
2、查找单位在第一行里面的位置并赋值给变量CutNb；
3、和第二句意思一样的；
第四、五就是用Columns来进行剪切插入。