Как узнать имена всех открытых книг?
Узнать имена всех книг экземпляра Excel.Application можно в цикле, например, так:
Delphi:
for i := 1 to XL.Workbooks.Count do
XL.Assistant.DoAlert('Книга', XL.Workbooks[i].Name, msoAlertButtonOK, msoAlertIconInfo, msoAlertDefaultFirst, msoAlertCancelDefault, False); // а вот так имя книги с полным путем к ней (свойство FullName)
for i := 1 to XL.Workbooks.Count do
XL.Assistant.DoAlert('Книга', XL.Workbooks[i].FullName[lcid], msoAlertButtonOK, msoAlertIconInfo, msoAlertDefaultFirst, msoAlertCancelDefault, False);
C#:
int R = 0; foreach (Excel.Workbook WB in XL.Workbooks) { oSheet.get_Range("A1", Type.Missing).get_Offset(R, 0).Formula = WB.FullName; R++; }
