title: Reading a label VBA - Excel
body: <p>I have a problem with VBA programming. I want to read the text of a label that represents the interpolation of a curve. 
  I used this code:</p>
  
  <pre><code>ActiveChart.SeriesCollection(Numero_serie).Trendlines(1).DataLabel.Select
  
  Selection.NumberFormat = "0.000000"
  
  ' estrae dall'etichetta di una interpolazione i coefficienti e li ricopia in celle scelte dall'utente
  Dim s, x3, x2, x, c, R As Double
  Dim i1, i2, i3, f1, f2, f3, ic, fc
  
  s = ActiveChart.SeriesCollection(Numero_serie).Trendlines(1).DataLabel.Text
  f4 = InStr(s, "x4")
  x4 = Val(Replace(Mid(s, i4, f4 - i4), ",", "."))
  Worksheets("Interpola").Range("B" &amp; 6) = s
  </code></pre>
  
  <p>The code works but it writes in B6 always the same label even if I change the number format to "0.0000". 
  Thanks for your attention, 
  Andrea</p>