【问题标题】:Trying to merge Cells in VBA尝试在 VBA 中合并单元格
【发布时间】:2020-07-06 04:22:33
【问题描述】:

谁能向我解释为什么这不起作用?

Worksheets("Print_page").Range("2:2,2:7").Merge 

运行时错误“1004”:

应用程序定义或对象定义的错误

我正在尝试合并第 2 行的 B:F 列,但我无法弄清楚。谢谢

【问题讨论】:

    标签: excel vba merge


    【解决方案1】:

    您似乎对 RangeCells 语法感到困惑,尽管您只需要:

    Worksheets("Print_page").Range("B2:F2").Merge 
    

    如果你想使用Cells:

    With Worksheets("Print_page")
        .Range(.Cells(2, 2), .Cells(2, 7)).Merge
    End With
    

    【讨论】:

    • 有没有办法用数字做到这一点?我正在使用计数和查找功能来获取我的单元格和列位置。
    • 效果很好!我不知道您可以将 Cells 放入一个范围内,这将对未来的编程非常有帮助,谢谢。我会尽快标记答案。
    【解决方案2】:
    Sub test()
        Range("2:3").Merge '<~~ row merge row 2, 3
        Range("b:c").Merge '<~~ column merge b,c
    
        Cells.UnMerge '<~~ cells unmerge
    
        Range("b2:f2").Merge '<~ specific range merge
    End Sub
    

    【讨论】:

    • 我没有尝试过,但我应该想到它是合乎逻辑的。感谢您这么快回复。
    猜你喜欢
    • 2016-10-18
    • 2021-05-10
    • 1970-01-01
    • 2013-11-23
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2023-03-03
    相关资源
    最近更新 更多