[Anel Hernandez]

Gracias, ya lo encontre, era un mensaje del 2006, por eso no lo encontre.

al final lo hice asi:

Código Delphi [-]
for I:=1 to Excel.Worksheets.Count do
 listBox1.Items.Add(Excel.Worksheets[i].Name);