Attribute VB_Name = "testapplicaiotnother2"
Sub ƒeƒXƒg()

    Application.DisplayAlerts = False
    
    Range("B2:C2").Merge

    Application.DisplayAlerts = True

End Sub