Excel VisualBasic Script

Sub bold()
    range("A1").font.bold = True
End Sub