Ver Mensaje Individual
  #3 (permalink)  
Antiguo 26/03/2008, 06:15
iaras66
 
Fecha de Ingreso: octubre-2007
Mensajes: 36
Antigüedad: 17 años, 6 meses
Puntos: 0
Re: Codigo Visual Basic 6.0 para Word

Gracias pero el caso es que el programa mediante un CommonDialog me habre el documento word que yo quiera para no tener que poner la ubicacion exacta del mismo.

La parte del codigo sería así:

Private Sub Command4_Click()

CommonDialog1.ShowOpen
OLE1.LoadFile(CommonDialog1.FileName)

Por lo que tu me dices para no tener que poner la ruta especifica y abrir cualquier word se podria poner lo siguiente????

CommonDialog1.ShowOpen
Set Doc = WordObj.Documents.Open(CommonDialog1.FileName)
paginas = Doc.ComputeStatistics(wdStatisticPages)
MsgBox paginas

O como sería???
¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿¿?????????????????????????? ???