Columnas dinámicas en Excel - VB-MUNDO

sotica · #1 (**permalink**) 04-10-2004, 12:13:01

Buenas.
Quiero exportar a Excel unos datos. El problema es que tanto las filas como las columnas son dinámicas, por lo que no puedo utilizar las letras A,B.. en el Range.
¿Alguien sabe que parámentros o funciones puedo emplear para no tener que especificar las columnas con letras?.
He intendado pasar números a range pero no me funciona.
Muchas gracias de antemano.

acalanto · #2 (**permalink**) 04-10-2004, 12:20:44

Puedes utilizar la propiedad <cells>

MiWorkBook(<nombredehoja>).cells(fila, columna)

Naturalmente adapta los nombres que utilices.

sotica · #3 (**permalink**) 05-10-2004, 08:05:47

Ahora solo me sale una duda.

excelHoja.cells(fila,columna) = valor o excelHoja.cells(fila,columna).value = valor no me funciona, me da error, ¿qué estoy haciendo mal?¿cómo hago para pasarle el valor?.

Un saludo y gracias

J.M.Movilla · #4 (**permalink**) 05-10-2004, 08:15:24

excelHoja.cells(fila,columna) = valor

Esa línea está bien y tiene que funcionarte sin problemas. Si te da error tendrás que mirar a ver si tienes bien definida excelHoja; te quedaría bien si lo hicieras así

Código:

    Dim excelHoja As Object
    If Val(excel_app.Application.Version) >= 8 Then
        Set excelHoja = excel_app.ActiveSheet
    Else
        Set excelHoja = excel_app
    End If

donde excel_app sería el nombre de tu objeto Excel