In diesem Beispiel wird der Inhalt der Zelle A1 in Sheet1 fett formatiert.
Worksheets("Sheet1").Activate boldCell = "A1" Application.Evaluate(boldCell).Font.Bold = True