Попытка слить ячейки в VBA - PullRequest
0 голосов
/ 25 марта 2020

Может кто-нибудь объяснить мне, почему это не работает?

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

Ошибка времени выполнения '1004':

Ошибка приложения или объекта

Я пытаюсь объединить столбцы B: F в строке 2, и я не могу понять это. Спасибо

Ответы [ 2 ]

1 голос
/ 25 марта 2020
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
1 голос
/ 25 марта 2020

Похоже, вы путаете синтаксис Range и Cells, хотя все, что вам нужно:

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

Если вы хотите использовать Cells:

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