Change Cell color error when re-running vba

[MWhiteDesigns]

Good morning,

The below code changes a range of cells color to white among some other things (may not be the cleanest way)

I run the code for the first time and it works fine. However If I run it again, I receive a few errors. All the below at different points.

1004: Application-defined or object defined error.
Unable to set the linestyle property of the borderclass

Why is this happening? I'm assuming i have some conflicting code. Any assistance in cleaning this up would be awesome.

Sheets("Production").Select

    Range("A1:Z3").Select
     
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorDark1
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
    With Selection.Font
        .ThemeColor = xlThemeColorDark1
        .TintAndShade = 0
    End With
    
    Selection.Borders.LineStyle = xlNone
    
    With Selection.Borders(xlEdgeBottom)
        .LineStyle = xlContinuous
        .ColorIndex = 0
        .TintAndShade = 0
        .Weight = xlThin
    End With
    
     With Worksheets("Production").Range("D1:Z1")
            .Borders.LineStyle = xlNone
        End With
        Columns("E:Z").Select
    Selection.ColumnWidth = 11
  
    With Selection
        .VerticalAlignment = xlCenter
        .HorizontalAlignment = xlCenter
        .WrapText = True
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = False
    End With
    
    Range("D5:D12").Select


    Selection.InsertIndent 1
    
    Range("D4,D13").Select
    With Selection
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = False
    End With

 

[Snakehips]

Probably, not really helpful but the above code runs without issue for me time and time again.