Sub 罫線を消す①()

    Range("B2:C3").Borders.LineStyle = xlLineStyleNone
    
End Sub