title: Get Font Size List in Powerpoint VBA
body: <p>This code prints out every entry in the Font Size list combo box in Excel 2007 :</p>
  
  <pre><code>Sub FontSizeList()
  
  Dim combo As CommandBarComboBox
  
  Dim i As Integer
  Dim j As Integer
  
  For i = 1 To Application.CommandBars("Formatting").Controls.Count
      If Application.CommandBars("Formatting").Controls(i).Caption = "&amp;Font Size:" Then
          Set ctl = Application.CommandBars("Formatting").Controls(i)
          For j = 1 To ctl.ListCount
              Debug.Print ctl.List(j)
          Next j
      End If
  Next i
  
  End Sub
  </code></pre>
  
  <p>However, when I run the same code in Powerpoint 2007 the List is Empty?  How can I intialize  the Font Size combo box in Powerpoint VBA?  I have checked both Font Size properties 'Visible' and 'Enabled', and they are both set to True.</p>
  
  <p>Thanks very much</p>
  
  <p>Joe  </p>