Programación - Saber que celdas están ocultas

Esta misma consulta la había hecho el mes pasado, pero es algo mas
específico: me gustaría que cuando estoy reccorriendo un archivo excel celda
por celda, me pueda identificar si la celda que está consultando está oculta
o nó. ¿El resultado a mostrar es un valor lógico o numérico? por ejemplo si
está oculta que me devuelve 1 o .T. si es visible 0 o .F. Bueno algo así.
Quiero en tiempo de ejecución que: si está oculta pase a la siguiente y si es
visible lea los datos que contiene.

Gracias de antemano.


"Yuver" wrote:

Buen día,

Gracias de antemano por su ayuda.

Desde VFP estoy abriendo y recorriendo un archivo Excel columna por columna,
el archivo Excel tiene columnas ocultas, estas columnas ocultas tienen datos
que deseo ignorar pues solo se procesan los datos de las columnas visibles.
¿Que función uso para saber si una celda está oculta? Así podré ignorarla y
no procesar el dato que ella contiene.

Gracias de nuevo.

"Yuver" escribió

Esta misma consulta la había hecho el mes pasado, pero es algo mas
específico: me gustaría que cuando estoy reccorriendo un archivo excel
celda
por celda, me pueda identificar si la celda que está consultando está
oculta
o nó. ¿El resultado a mostrar es un valor lógico o numérico? por ejemplo
si
está oculta que me devuelve 1 o .T. si es visible 0 o .F. Bueno algo así.
Quiero en tiempo de ejecución que: si está oculta pase a la siguiente y si
es
visible lea los datos que contiene.

Gracias de antemano.


"Yuver" wrote:

Buen día,

Gracias de antemano por su ayuda.

Desde VFP estoy abriendo y recorriendo un archivo Excel columna por
columna,
el archivo Excel tiene columnas ocultas, estas columnas ocultas tienen
datos
que deseo ignorar pues solo se procesan los datos de las columnas
visibles.
¿Que función uso para saber si una celda está oculta? Así podré ignorarla
y
no procesar el dato que ella contiene.

Gracias de nuevo.

Hola,

Una opción para saber si una celda está oculta es saber si su altura o su
ancho son 0.
La siguiente función devuelve verdadero si la celda tiene estas propiedades
iguales a 0.

Function EsOculta(Celda As Range) As Boolean
If Celda.Width = 0 Or Celda.Height = 0 Then
EsOculta = True
Else
EsOculta = False
End If

End Function

Un saludo,
Juan



__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 3997 (20090409) __________

ESET NOD32 Antivirus ha comprobado este mensaje.

http://www.eset.com

Correcto Juan, muchas gracias.

"Juan M" wrote:

"Yuver" escribió
>
> Esta misma consulta la había hecho el mes pasado, pero es algo mas
> específico: me gustaría que cuando estoy reccorriendo un archivo excel
> celda
> por celda, me pueda identificar si la celda que está consultando está
> oculta
> o nó. ¿El resultado a mostrar es un valor lógico o numérico? por ejemplo
> si
> está oculta que me devuelve 1 o .T. si es visible 0 o .F. Bueno algo así.
> Quiero en tiempo de ejecución que: si está oculta pase a la siguiente y si
> es
> visible lea los datos que contiene.
>
> Gracias de antemano.
>
>
> "Yuver" wrote:
>
>> Buen día,
>>
>> Gracias de antemano por su ayuda.
>>
>> Desde VFP estoy abriendo y recorriendo un archivo Excel columna por
>> columna,
>> el archivo Excel tiene columnas ocultas, estas columnas ocultas tienen
>> datos
>> que deseo ignorar pues solo se procesan los datos de las columnas
>> visibles.
>> ¿Que función uso para saber si una celda está oculta? Así podré ignorarla
>> y
>> no procesar el dato que ella contiene.
>>
>> Gracias de nuevo.

Hola,

Una opción para saber si una celda está oculta es saber si su altura o su
ancho son 0.
La siguiente función devuelve verdadero si la celda tiene estas propiedades
iguales a 0.

Function EsOculta(Celda As Range) As Boolean
If Celda.Width = 0 Or Celda.Height = 0 Then
EsOculta = True
Else
EsOculta = False
End If

End Function

Un saludo,
Juan



__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 3997 (20090409) __________

ESET NOD32 Antivirus ha comprobado este mensaje.

http://www.eset.com

Muy beuna apreciación. Muchas gracias.