Language Basics VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Language Basics
  4. The WithEnd With Structure
Sub withEnd()
    Range("A1:A10").Font.Bold = True
    Range("A1:A10").Font.Color = vbBlue
    Range("A1:A10").Font.FontStyle = "Italic"
    Range("A1:A10").Font.Size = 14
    Range("A1:A10").Font.name = "Comic Sans Serif"
    
    With Range("A1:A10").Font
        .Bold = True
        .Color = vbBlue
        .FontStyle = "Italic"
        .Size = 14
        .name = "Comic Sans Serif"
    End With
End Sub