Visual Basic - Trabajo en excel.

Buenos días.

Tengo un Libro en excel (CTS modelo vacío.xls) con tres hojas: EMPLEADORES, CLIENTES y CLIENTES DIGITADO. y tres dbfs.: L000001.DBF, L000002.DBF y L000003.DBF
Por medio de un proyecto en Visual Basic 5 quisiera llenar las hojas CLIENTES y CLIENTES DIGITADO con la data de L000001.DBF para que se cree el archivo CTS L000001.xls
La data de L000002.DBF debe crear el archivo CTS L000002.xls
La data de L000003.DBF debe crear el archivo CTS L000003.xls

Agradezco de antemano vuestra ayuda.
Se trata de un asunto de suma urgencia.

Ebn sisntesis ...

deberias hacer un proyecto con conexion a dbf ...

luego hacer un select de los datos

plasmarlos a una hoja excel

Tienes un ejemplo de datos como para ayudarte con algo mas conciso .. que tienes tu?

Andrés, ¡buenas tardes!

Te enviaré las tablas

• App.rar(40,6 KB)

Bueno con eso ya lees los archivos... ahora te tocara la revision y exportarlos

Paa que funcione en el modulo cambia la ruta donde estan los DBF ... en este caso es la misma dondepones la carpta de este programa


Saludos
Si titnes alguna duda avisame
Espero te ayude

• dbftoxls.zip(75,8 KB)

Andrés.

Soy nuevo en estos menesteres, por lo que espero no incomodarte.

Aparece un mensaje de error cuando compilo en programa:
El subíndice está fuera del intervalo en la línea de código: Set Hoja = Libro.Worksheets(CLIENTES)

Adjunto el código fuente.

Gracias por tu valiosa ayuda.

• Lineas-de-codigo.rar(910,0 B)

Eso es que la hoja no existe, puedes intentar con el nombre de la hoja entre comillas
me avisas.

Set Hoja = Libro.Worksheets("CLIENTES")

Andrés.

Probé colocando comillas al nombre de la hoja y me sale el siguiente mensaje de error:
"SE REQUIERE UN OBJETO", en la línea de código:

oSheet.Range("A1").CopyFromRecordset

O debo cambiar esa línea de código para copiar el contenido del dbf.


Gracias, de antemano, por tu valiosa respuesta.

Pero haber ...
Yo ya te di una aplicacion que te lee los dbf

Ahora solo debes pasarlos a xls o un txt separado por tabulaciones

Puedes explicar mas tu necesidad ya casi estaba solucionado

otra seria leer todos los dbf de una carpeta y generar un xls por cada uno o ir creando una linea por cada uno.....

Antonio, ¡buenos días!

Al parecer el problema es con el procesamiento del excel
Te envío los pantallazos con los errores en la compilación.
No sé como solucionarlos.
Gracias, una vez más, por tu valiosísima colaboración.

• Errores-al-compilar.rar(133,9 KB)

Andrés, ¡buenos días!

El problema que mencioné en mi último e-mail ya fue solicionado.
Te explico lo siguiente (respecto al mismo proyecto):
Tengo un archivo L000001.DBF (lo conseguí abrir)
Tengo un archivo CTS Modelo vacío.xls (con tres hojas, pero que deben ser llenadas sólo la hoja 2 y 3)
Tengo dos inconvenientes:
- qué línea de código debo usar para que el archivo CTS modelo vacío.xls sea grabado como CTS modelo llenado L00000.xls
- cómo hacer para que las hojas sean llenadas completamente por todos los registros del dbf ya que solo me llena la primera fila

Gracias, una vez más, por tu apoyo.

• Lineas-de-codigo.rar(880,0 B)

- qué línea de código debo usar para que el archivo CTS modelo vacío.xls sea grabado como CTS modelo llenado L00000.xls

debes usar el

thisworkbook.saveas ' o algo asi ... estoy en el celular

- cómo hacer para que las hojas sean llenadas completamente por todos los registros del dbf ya que solo me llena la primera fila
recuerdas eu yo te di un proyecto ese tiene en el modulo como recorrer el recordset registro a regristro.... y lo vas poniendo en las lineas del excell...

¡Buenos días!

En referencia al proyecto relacionado con el excel, gracias a los aportes dados he conseguido todos los puntos concernientes a como abrir un archivo dbf, abrir un archivo excel y llenarlo. Sólo me falta el siguiente detalle:
El excel abierto se llama modelo.xls (que siempre está vacío)
LLeno la data tomada de la tabla L001.dbf
Quisiera grabar el archivo excel modificado con el nombre L001.xls y cerrarlo. El archivo modelo.xls no debe ser alterado.

Gracias.