GetWorksheetByName

Die TSWorkbook-Klasse gibt einem die enthaltenen Arbeitsblätter zurzeit nur per Index (TSWorkbook.GetWorksheetByIndex). Sucht man nach einem Arbeitsblatt mit einem bestimmten Namen, schreibt man sich einfach eine Funktion:

FUNCTION GetWorksheetByName(workbook: TSWorkbook; name: String):
  TSWorksheet;
VAR
  i        : Integer;
  worksheet: TSWorksheet;
BEGIN
  result := NIL;
  FOR i := 0 TO workbook.GetWorksheetCount - 1 DO BEGIN
    worksheet := workbook.GetWorksheetByIndex(i);
    IF worksheet.Name = name THEN BEGIN
      result := worksheet;
      Break;
    END;
  END;
END;

Die Funktion gibt entweder die gesuchte TSWorksheet-Instanz zurück, oder NIL, wenn kein Arbeitsblatt mit dem Namen existiert.