Excel: Tabellenblatt wechseln

[LiS]

Hallo!

Ich muss aus einer Excel-Datei Daten in mein Programm importieren. Dafür benutze ich folgende Anweisungen:

Delphi-Quellcode:

var
  Excel: OleVariant;
  i,j: integer;
begin
  try
    Excel := CreateOleObject('Excel.Application');
  except
    MessageDlg('Kein Excel installiert',mtError,[mbOk],0);
  end;
  Excel.WorkBooks.Open(Pfad);

  for i := 1 to 94 do for j := 1 to 16 do Tabelle[i,j] := Excel.ActiveSheet.Cells.Item[i+1,j].value;

  Excel.Workbooks.Close;
  Excel.Quit;
end;

Das klappt auch wunderbar, sodass alle Daten danach in dem Array of string "Tabelle" sind. Nun muss ich jedoch auch noch Daten vom 2ten Tabellenblatt der Excel-Datei holen. Wie wechsle ich denn nun das Blatt, von dem die Daten gelesen werden?