Изменение цвета текста выделенного узла Treeview - VB

Формулировка задачи:

Здравствуйте. Пишу программу в Excel VBA. На форме есть контрол Treeview. При его заполнении, текст некоторых узлов делаю красного цвета. После того как кликаю мышью на узел, текст выделенного узла становится белым. Каким образом можно изменить текст узла при выделении со стандартного белого, например на красный? Заранее благодарен за ответ.

Решение задачи: «Изменение цвета текста выделенного узла Treeview»

textual
                            Листинг программы 
                        
                            SetWindowTheme(TreeView1.hwnd, "explorer", vbNullString) 'стиль для Висты-8.1

  Public Declare Function SetWindowTheme Lib "uxtheme.dll" _
...