Код начинается так
   
уф=Новый COMОбъект("Excel.Application");
   внешний = уф.WorkBooks.Open (ПутьКфайлу1);
    группы = Новый Массив(6);
    группы[0]=0;
лист=внешний.Sheets(3);

Название листа = ?. Как его возвратить?

(0) а на куя Application
есть же ADOX
MyCon = Новый COMОбъект ("ADODB.Connection");
   MyCon.Open ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\1.xls;Extended Properties=""Excel 8.0;HDR=No;IMEX=1""");
   MyCat=Новый COMОбъект ("ADOX.Catalog");
   MyCat.ActiveConnection = MyCon;
   ИмяПервойСтраницы=MyCat.Tables.Item(0).Name;

(1)
а если я поменяю код, как у тебя, остальной код менять не придется?

а что, внешний.Sheets(3).Name уже не работает?

(2) лучше поменять, Excel.Application - зло

если нужно имя 4-го листа, не меняй

(3)
работает, спасибо