Jump to content

Recommended Posts

Posted

Hola de nuevo:

Maldecireis el día que entré en este foro,, ja,ja,ja...

Ahora me voy a poner un poco mas serio, últimamente he descubierto el potencial de SpecialCells, cosa que ha supuesto un gran descubrimiento para mi porqué lo desconocía. Por si os interesa ahí va un ejemplo para encontrar todas las fórmulas en la hoja hoja activa, ni que decir tiene que ActiveSheet.Cells, puede ser sustituido por cualquier rango.

'
ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas).Select
For Each Celda In Selection.Cells
'Aquí incluimos lo que hay que hacer para cada celda
Next
[/CODE]

Pues lo mismo para:

[CODE]'xlCellTypeAllFormatConditions Celdas con cualquier formato.
'xlCellTypeAllValidation Celdas con criterios de validación.
'xlCellTypeBlanks Celdas vacías.
'xlCellTypeComments Celdas que contengan notas.
'xlCellTypeConstants Celdas que contengan constantes.
'xlCellTypeFormulas Celdas que contengan fórmulas.
'xlCellTypeLastCell La última celda del rango.
'xlCellTypeSameFormatConditions Celdas que tengan el mismo formato.
'xlCellTypeSameValidation Celdas que tengan los mismos criterios de validación.
'xlCellTypeVisible Todas las celdas visibles
[/CODE]

Y para complementar el aporte, nada mejor que las respuestas de Maurico en:

-duda-en-specialcells-type-value-11641/"]https://www.ayudaexcel.com/foro/f10/[solucionado]-duda-en-specialcells-type-value-11641/

Saludos a todos y "happy weekend". Antoni.

Posted

Solo tener en cuenta que la cantidad maxima de celdas no continuas (areas) que SpecialCells puede manejar son 8192.

Saludos

Posted
Solo tener en cuenta que la cantidad maxima de celdas no continuas (areas) que SpecialCells puede manejar son 8192.

Sailepaty podemos saber donde descubriste o donde esta declarada esa limitante de speciacells?

Antoni no me queda mas que agradecerte por todo lo que haces en el foro! y yo no te maldicereis jejeje nunca ok

Saludos

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
×
×
  • Create New...

Important Information

Privacy Policy