Ver Mensaje Individual
  #1 (permalink)  
Antiguo 26/07/2006, 16:29
AprendizMexicano
 
Fecha de Ingreso: julio-2006
Mensajes: 19
Antigüedad: 17 años, 9 meses
Puntos: 0
Ayuda con macro

Hola a todos

Solicita de su valiosa ayuda para corregir la siguiente macro

Sub macro1()
For Each sh In Worksheets
sh.Select
Cells.SpecialCells(xlCellTypeFormulas).Select
For Each xcell In Selection
paso = xcell.Value
xcell.Value = paso
Next xcell
Next sh
End Sub

Me marca error si encuentra una hoja que no tenga formulas

Como le haria para corregir ese error, ya que puede haber hojas sin formulas.

La idea es que recorra todo el libro y quite las formulas

Gracias por su valiosa ayuda

Saludos