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

Respuesta
 
Herramientas Desplegado
Antiguo 18-may-2007, 13:36   #1 (permalink)
ideasking ha deshabilitado el karma
 
Fecha de Ingreso: junio-2006
Mensajes: 209
Escribir En Celdas De Excel Desde Visual

Hola amigos, estoy haciendo una aplicacion desde Visual Basic 6.0 que consiste en crear un archivo .xls en el directorio que asi lo desee. Eso ya lo tengo bien y funciona, me crea un archivo "libro1.xls" pero quisiera que asi como me lo crea me copie en determinadas celdas los valores contenidos en los text del formulario, pero en la celda que yo indique en el código fuente, pues intente hacer eso pero sí me escribe lo que hay en los text pero en una sola fila en la Hoja del archivo de excel, de corrido, sólo que me lo separa con comas(,), quisiera especificarle que me en vez de escribir de corrido, me escriba en determinados rangos. Intente usar lo que se usa en excel, Range("a1"), por ejemplo, pero no funciona.

El codigo que me crea el archivo lo escribi así:

Open "c:\libro1.xls" For Output As 1

item = text1.text
item2 = text2.text

Write #1, item, item2

Close #1

Esto me crea el archivo correctamente y me escribe lo que hay en text1 y text2, pero de corrido en la fila, quisiera que en el rango A1 escribiera lo del text1 y en A2 lo del text2.

Alguien me puede ayudar?

GRACIAS
ideasking está desconectado   Responder Citando
Antiguo 22-may-2007, 13:10   #2 (permalink)
ideasking ha deshabilitado el karma
 
Fecha de Ingreso: junio-2006
Mensajes: 209
Re: Escribir En Celdas De Excel Desde Visual

Creo que ya encontre algo, lo estudiare.
ideasking está desconectado   Responder Citando
Antiguo 31-may-2007, 14:17   #3 (permalink)
dmdl ha deshabilitado el karma
 
Fecha de Ingreso: mayo-2007
Mensajes: 4
Re: Escribir En Celdas De Excel Desde Visual

Hola, ya para estas fechas lo habras solucionado, soy nuevo y estaba revisando los post y me intereso: el codigolo tengo hecho en exel, es decir, que hice un macro y con el VBA(alt+F11) lo edite y me inserta el texto en la fila 33, columna 10
code:
fila.Cells(10, 33) = TxtEmitio.Text ' inserta quien hizo
Code
dmdl 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 18:59.


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