我想尝试和改变当前文本的字体颜色在Excel中的一个文本框。 我目前使用python访问对象,但我不能够这样做。
ActiveSheet.Shapes.Range(Array("Text1")).Select
Selection.ShapeRange(1).TextFrame2.TextRange.Characters.Text = "7"
With Selection.ShapeRange.TextFrame2.TextRange.Font.Fill
.ForeColor.RGB = RGB(255, 0, 0)
下面的代码是VBA等效分配数7至文本框并改变文本的字体颜色为红色的。 我一直在使用各种迭代试图和整个下面的Python代码来执行相同的动作。
Currentsheet.Shapes.Range("Text1").TextFrame2.TextRange.Characters.Text= 7
Currentsheet.Shapes.Range("Text1").TextFrame2.TextRange.Font.ForeColor.RGB('255','0','0')
代码的第一部分的工作,我能值7分配到文本框。 但是,我无法将字体颜色分配给红色。 在这方面的任何帮助,将不胜感激。