如何通过宏改变工作表样式？

Sub ChangeWorksheetStyle()
    ' 设置工作表对象
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Worksheets("Sheet1") ' 将"Sheet1"替换为目标工作表的名称

    ' 设置样式
    With ws
        .Cells.Font.Bold = True ' 设置字体加粗
        .Cells.Interior.Color = RGB(255, 0, 0) ' 设置背景颜色为红色
        .Cells.Borders.LineStyle = xlContinuous ' 设置边框样式为实线
    End With
End Sub