Ver Mensaje Individual
  #1  
Antiguo 08-05-2008
Avatar de voldemmor
voldemmor voldemmor is offline
Miembro
 
Registrado: ago 2006
Posts: 232
Reputación: 18
voldemmor Va por buen camino
Unhappy Resaltar celda de excel

hola amigos del foro espero que podais ayudar.

Código Delphi [-]
procedure TfrmActas.Button1Click(Sender: TObject);
var
i,j:Integer;
excel:Variant;
begin
  try
   Excel := CreateOleObject('Excel.Application');
   except
     Excel.Quit;
     showmessage('No se pudo crear el Objecto Excel o se produjo algún error.');
     raise;
     end;
//***** Asignamos el archivo a abrir *****//
    Excel.Workbooks.Open('c:\ejemplo.xls'); 
    excel.cells[1,3].value:='Listado de Alumnos '+ AnioActual;//renglon 5 columna 1
     excel.cells[2,3].value:='Especialidad :'+cbxEspecialidades.Text;
     excel.cells[3,3].value:='Curso :'+cbxCursos.Text;
     excel.cells[6,2].value:='Codigo';
     excel.cells[6,3].value:='Nombre y Apellido del Alumno';
     excel.rows[6].font.bold := true;
     with DataSource1.DataSet do
     begin
       First;
       j:= 7;
       while not Eof do
       begin
          if Fields[0].Visible then
          begin
          excel.cells[j,2].value := Fields[0].AsString;
          excel.cells[j,3].value := fields[1].AsString +' '+ Fields[2].AsString;
          inc(j);
          end;
          Next;
       end;
       excel.cells[4,3].value:='Total de alumnos :'+IntToStr(j-7);
     end;
     excel.cells.columns.autofit;
     excel.visible:=true;
  end;

con este codigo paso datos a un documento excel que lo tengo externamente, aun no he podido crear uno nuevo desde delphi, cada vez que lo requiero.

La duda

Quiero resaltar y remarcar los bordes de una celda de este documento excel, dado ciertas condiciones, claro esta, espero me podais orientar con esta duda, Si es posible con las instrucciones o que me digan donde puedo encontrar algun manual sobre esto, porque no lo he podido hallar


Gracias de antemano
__________________
tu mente es tu mas presiado tesoro, cultiva tu conocimiento
Responder Con Cita