About MrExcel
Consulting Services
Learn Excel Resources
Challenge of the Month
MrExcel Seminars

Message Board

MrExcel Store


Meredith asks "I am writing a macro that will assign a check to the active cell i have
chosen. My code is as follows:

ActiveCell.FormulaR1C1 = "x"

I want to know how to change the font from arial to wingdings in my macro.

Can you help me figure out the code to format my active cell with a
specific font and assign my "*" symbol???

Thank you for your help."

Ranges have a Font object, that handle all the things that you can do with it, that is, make it bold, change its size and change the font, among others. All you have to do is:

ActiveCell.Font.Name = "Wingdings"

By Juan Pablo Gonzalez on 08-Feb-2002 Consulting can be hired to implement this concept, or many other cool applications, with your data. provides examples of Visual Basic procedures for illustration only, without warranty either expressed or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose. The Visual Basic procedures on this web site are provided "as is" and we do not guarantee that they can be used in all situations.


Excel is a registered trademark of the Microsoft® Corporation.

All contents Copyright 1998-2008 by MrExcel Consulting.