Excel VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Excel
  4. Change range border style
Sub Extend()
  With Range("A1:E5")
    .Borders.LineStyle = xlLineStyleNone
    .Resize(.Rows.Count + 1).Name = "Database"
  End With
End Sub