아래 코드 참고하세요

Sub Macro1()

    Dim Asht As Worksheet
    Dim lR&, sttRw&, sRw&, eRw As Long
    Dim rngMg As Range
    
        Application.ScreenUpdating = False
        Set Asht = ActiveSheet
        
        'lR = Asht.Cells(Asht.Rows.Count, "A").End(xlUp).Row
        lR = 54
        If lR < 7 Then Exit Sub
        
        Asht.Range("B7:B" & lR).UnMerge
        
        sttRw = 7
        Do While sttRw <= lR
            If Asht.Cells(sttRw, "A").MergeCells Then
                Set rngMg = Asht.Cells(sttRw, "A").MergeArea
                sRw = rngMg.Row
                eRw = rngMg.Row + rngMg.Rows.Count - 1
                
                If sRw < 7 Then sRw = 7
                If eRw > lR Then eRw = lR
                
                If eRw > sRw Then
                    Asht.Range("B" & sRw & ":B" & eRw).Merge
                End If
                
                sttRw = eRw + 1
            Else
                sttRw = sttRw + 1
            End If
        Loop
    
End Sub

​

1, 2행이 A열과 B열이 병합되어 있어서 그런것 같습니다.

A3부터 아래로 선택하신 후 서식 복사하고 B3에 클릭하시면 A열 서식이 그대로 복사됩니다. 배경색까지~