Código Delphi [-] var WorkBook: OleVariant; begin for Ind := 1 to WorkBook.Worksheets.Count do ListBox1.Items.Add(WorkBook.Worksheets[Ind].Name);
var WorkBook: OleVariant; begin for Ind := 1 to WorkBook.Worksheets.Count do ListBox1.Items.Add(WorkBook.Worksheets[Ind].Name);