[gdlrinfo]

Estimados tengo que borrar las ultimas dos filas de un excel pero no logro hacer que las borre estoy usando esto:

Código Delphi [-]
    WrKs.Range['A1','Al1'].EnD[xldOWN].SELECT ; //Con esto VOy al final
    Excel.Activecell.rows.Offset[-2,0].Select; //Subo dos filas
   for i := 2 downto 1 do // Aqui las borro 
    begin
     WrkS.Rows[i].Delete;
    end;

El problema es que solo me selecciona la primer casilla y no toda la fila entonces no la borra nose como hacer para que me deja seleccionado todo el largo de la celda alguna sugerencia.-
Desde ya muchas gracias !!