Question
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
If Lang = "P" Then
Text15 = [books.name_p]
Text15FontName i want to set font name here kindly help
Else If Lang = "E" Then
Text15 = [books.name_e]
Else
Text15 = [books.name_h]
End If
End Sub
This is my code. I want to set a font name here and I do not know which property to use.
Solution
To set a Font in VBA, use the following:
Me!Text.FontName = "Courier"
Do you like this tip? Subscribe to my free Newsletter to receive tips via email. Click Here to subscribe.