Problema con asignacion de valores en un rango

[Rpabreu]

El codigo que dec te envió es correcto:

Código Delphi [-]
 var
   oleVar: OleVariant;
 begin
   ExcelA.Range['A1','E1'].Value[oleVar] :=
     VarArrayOf (['FECHA','NOMBRE','DOMICILIO','TELÉFONO','ATENDIÓ']);
 end;

Copìa con gran velocidad, la variable olevar, es el tipo y de variables que vas a pasar, en este caso es un olevariant. Ahora no logre hacer lo inverso, o sea, leer de excel para un variantarray, o mejor dicho logre leerlo pero el excel llena de musarañas raras al variant y finalmente no sirve para nada, si logras hacer el proceso inverso te agradeceria que me dijeras como.

Saludos Ramón.

Puedes enviarme la respuesta a [email protected]