Advertisement
tolikpunkoff

Switch fonts in MS Word using VBA

Jan 29th, 2015
367
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Sub SetCourier()
  2.     Selection.Font.Name = "Courier New"
  3. End Sub
  4. Sub SetTimes()
  5.     Selection.Font.Name = "Times New Roman"
  6. End Sub
Advertisement
RAW Paste Data Copied
Advertisement