从已定义的范围中选择一些列

Question

我是excel的VBA新手，我试图在一个范围内选择一些列（在循环中工作）。然后我想合并这些列。我现在已经编码了

For l = 2 To 8
Worksheets("SdB pg1").Range(Geo1).Columns(l).MergeCells = True
Next l`      

Geo1是Range变量

l是整数变量

但是我想让它只为第2列和第3列运行，然后一起选择第4,5,6,7和8列然后合并。我已经尝试了＃34;和＆＃34;，＆＃34;＆amp;＆＃34;，列（＆＃34; K：O＆＃34;）但没有成功。 如果可能的话，我不想创建新变量，只需直接使用范围并避免＆＃34;。选择＆＃34;。 希望你们中的任何人都可以提供帮助。

Answer 1

这对你有用吗？

Sub Test()

    Dim l As Long
    Dim Geo1 As Range

    Set Geo1 = ThisWorkbook.Worksheets("Sdb pg1").Range("A1:H5")

    Geo1.Columns(2).Resize(, 2).MergeCells = True
    Geo1.Columns(4).Resize(, 5).MergeCells = True

End Sub

我手动添加了边框：