• Sábado 14 de Diciembre de 2024, 10:42

Autor Tema:  Acceso A Word  (Leído 914 veces)

desire

  • Miembro activo
  • **
  • Mensajes: 26
    • Ver Perfil
Acceso A Word
« en: Jueves 28 de Septiembre de 2006, 18:31 »
0
Estoy intenando buscar un texto en un documento de word y siempre me lo encuentra independientemente de lo que busque

   xlSeleccion = xlApp.Exec(PropertyGet("Selection"));   
   xlFin = xlSeleccion.Exec(PropertyGet("Find"));
 
   AnsiString texto;
   texto = "sdfasdfaserwarwer324324asrwvc41cxq3w4vc4xaeqw3";
   xlFin.Exec(Procedure("ClearFormatting"));
   xlFin.Exec(PropertySet("Text") << texto); //FileName debe tener extensiòn .xls
   
  if(xlFin.Exec(Procedure("Execute")))
      ShowMessage("siiiiiiiiiiiii");
  else
 ShowMessage("nooooooooooo");