14/04/2004, 07:38
|
| | | Fecha de Ingreso: enero-2002
Mensajes: 14
Antigüedad: 23 años, 4 meses Puntos: 0 | |
| Aqui va !!..
Dim ApExcel
Set ApExcel = CreateObject("Excel.application")
ApExcel.Visible = True
ApExcel.Workbooks.open("C:\PruebaExcel.xls")
ApExcel.run "PruebaExcel.xls!enviar"
Eso es todo.....recuerda que en la planilla, PruebaExcel.xls, debe existir la macro con nombre en este cado "enviar"
Salu2 !! |