Si el cxGrid es de tipo TcxGrid (los componentes de DevExpress), es aún más sencillo que lo que expone jeremiselxi: Solo tienes que adicionar la unidad
cxGridExportLink y en el código colocas lo siguiente
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
ExportGridToExcel('C:\PRUEBA.XLS', CXGRID1);
end;