Retroceder   Foros del Web > Temas generales de computación > Programación > Visual Basic

Respuesta
 
Herramientas Desplegado
Antiguo 20-feb-2006, 10:24   #1 (permalink)
neomau no se puede cailificar en este momento
 
Fecha de Ingreso: enero-2006
Mensajes: 8
Exclamación De Visual Basic a un archivo Excel existente

Hola amigos de foros del web, tengo el siguiente problema. Con mucho esfuerzo pude hacer que en una plantilla de excel se incertaran valores que tengo en unas cajas de texto. Bueno, hasta ahi va todo bien, pero mi problema es el siguiente, como hago para hacer lo mismo, solo que en un archivo existente?. O sea, que se habra el archivo existente, y se cargen los datos. No es que sea vago en buscar por internet o leer, es que no encontre absolutamente nada que me resuelba este problema, en todos lo ejemplos y tutoriales que lei, siempre se crea una nueba plantilla.
Desde ya Muchas Gracias.
neomau está desconectado   Responder Citando
Antiguo 20-feb-2006, 12:44   #2 (permalink)
Skalitiko ha deshabilitado el karma
 
Avatar de Skalitiko
 
Fecha de Ingreso: febrero-2005
Mensajes: 81
Tienes que agragar la referencia Microsoft Excel X.X desde project->references
Dim Ex as new Excel.Application

Sub Command1_Click()
with ex
.visible=true
'Abro el archivo excel
.workbooks.open "C:\Donde_Tengas_El_Archivo_Excel\Archivo_Excel.xl s"
'Seleciono la hoja del libro con la que voy a trabajar
.workbooks(.workbooks.count).sheets("LA_Hoja_A_Tra bajar").select
'Agrego datos
.workbooks(.workbooks.count).activesheet.cells(1,1 ).value = "Un dato"
.workbooks(.workbooks.count).activesheet.cells(1,1 ).value = "Otro dato"

.workbooks(.workbooks.count).save
.workbooks(.workbooks.count).close
.quit
end with
set ex=nothing
End SUb

Te recominedo que grabes macros desde el mismo excel para que te quede más claro
Skalitiko está desconectado   Responder Citando
Antiguo 20-feb-2006, 14:37   #3 (permalink)
neomau no se puede cailificar en este momento
 
Fecha de Ingreso: enero-2006
Mensajes: 8
MUCHAS GRACIASS!!!!!! la verdad es que me salvaste la vida!!!, el codigo me sirvio muchicimo, es mas logre mi objetivo en menos de 15 min, sos un capo, te agradesco de corazon loco, sos lo +

Muchas Gracias!!

PD: especialmente te agradesco la rapidez con la que respondiste
neomau está desconectado   Responder Citando
Respuesta
No hay votos aún.


Herramientas
Desplegado

Normas de Publicación
No puedes crear nuevos temas
No puedes responder temas
No puedes subir archivos adjuntos
No puedes editar tus mensajes

BB code is Activado
Caritas están Activado
[IMG] está Activado
Código HTML está Desactivado


La Zona horaria es GMT -6. Ahora son las 23:24.


Message Board Statistics

LinkBacks Enabled by vBSEO 3.1.0

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93