Çalışma sayfasında ilgili hücrenin yazı biçimini altı çizili yapan VBA kodudur.
Option Explicit Sub HucredekiYaziyiAltiCiziliYap() Range("A1").Font.Underline = XlUnderlineStyle.xlUnderlineStyleSingle End Sub