title: font.TintAndShade cannot change brightness of the text
body: <p>I select a text and change its color and it tells me this</p>
  
  <pre><code>Range("A7").Select
  With Selection.Font
      .ThemeColor = xlThemeColorAccent2
      .TintAndShade = -1
  End With
  </code></pre>
  
  <p>But when I run this code the <code>TintAndShade</code> fails to work. The brightness of the text in a cell cannot bot be assigned by vba.  Are there any alternative of changing the brightness of the text? Or how can I make <code>TintAndShade</code> work?</p>