SftDirectory1.
Font
.Name = "Times New Roman" SftDirectory1.
Font
.Size = 12