Msg error (overflow)

Mamud,

Normal:

Me.ListBox1.Font.Name = "Wingdings"

I’ve tried, but for one or two columns in the listbox would not succeed.

Me.ListBox1.List(ListBox1.ListIndex, 3).Font.Name = "Wingdings"

Sorry.