Funciones de Excel.Application

[Yeimmy Eliana Ortiz Saenz]

Muy Buenos Dias A Todos!!

 

Les escribo ya que tengo una consula, estoy realizando una hoja de excel desde vfp 6.0 y requiero de la funcion pegado especial como valor, la cual no la encuentro y la generada grabando macros desde excel no funciona en VFP 6.0.

 

MIl gracias al compañero que me pueda colcaborar con esta consulta.

 

Yeimmy Ortiz

[Horacio Isaza]

Buenos días,

con el codigo que haces en el macro colocalo en un programa que se llama vbtovfp que convierte codigo visual basic en vfp

Saludos

 

Yeimmy Ortiz

--
 
 

--
Luis Horacio Isaza Arenas.

[Ricardo Pina]

Hola Yeimmy

 

Mira este enlace, tal vez te ayude.

 

http://msdn.microsoft.com/en-us/library/office/aa195818(v=office.11).aspx

 

Saludos

--
 
 

--

            

                   Ricardo Pina

Desarrollo y Servicios Informáticos

                  Profesionales
               www.dsip.com.ar

 

 

[Robert Martínez]

Buenas tardes,

Te dejo un código de ejemplo con un pegado especial que funciona (solo pega valores).

** Crear el objecto Excel

oExcel = CreateObject("Excel.Application")

if vartype(oExcel) != "O"

  return .F.

endif

oWorkbook = oExcel.Application.Workbooks.Add()

oExcel.visible = .t.

*** Escribo valores en dos celdas A1 y B1

oExcel.Range("A1").Value = "=10"

oExcel.Range("B1").Value = "=5"

*** Pongo una formula en C1

oExcel.Range("C1").Value = "=A1+B1"

*** Selecciono la celda C1

oExcel.Range("C1").Select

*** Copio la Celda C1 al Clipboard de Excel

oExcel.Selection.Copy

*** Selecciono la Celda D1 para hacer el copiado.

Z=oExcel.Range("D1").Select

*** Pegado especial en la celda seleccionada.

oExcel.Selection.PasteSpecial(-4163,-4142, .F.,.F.)

Espero esto te sirva de ayuda.

[Yeimmy Eliana Ortiz Saenz]

Hola Robert Muy Buenos Dias!!

 

 Mil y mil gracias por la funcion, pero no he podido montarla, me esta generando el siguiente error, yo estoy copiando de una hoja a otra, agradezco mucho si sabe algun otro truquito mil y mil gracias...

 

 

 

 

--
 
 

[Fox Learner]

No sé si sea del tema, pero recuerdo que el compañero Cesar Chalom, autor del Foxypreviewer, también programó una utilería para excel:

Foxy XLS

https://groups.google.com/forum/?fromgroups=#!searchin/publicesvfoxpro/Foxy$20Excel/publicesvfoxpro/nXTKHZqowLM/C7cZBGxAdMkJ

Saludos!

[Robert Martínez]

Saludos,

Que versión de XLS tienes instalada en tu equipo, también verifica si la celda en la que estas intentando pegar esta protegida. Es extraño que no te funcione, el ejemplo que puse en el foro me funciona tal y como estas, probaste a ponerle en un PRG, ejecutarlo y ver si funciona tal como está?, a mi me está funcionando en un Windows 7  Home Premium, VFP 9 SP2 con Microsoft Excel 2010. 

El jueves, 6 de diciembre de 2012 10:58:40 UTC-4, YEOS escribió: