11/12/2008, 05:04
|
| | Fecha de Ingreso: noviembre-2008
Mensajes: 37
Antigüedad: 16 años, 1 mes Puntos: 0 | |
Respuesta: Evaluar formula en macro Solucionado!
al final lo he conseguido así:
__For z = 1 To 32
____Sheets("Hoja1").Select
____Cells(z, j).Select
____If Cells(z, j).Value = "" Then
______Sheets("Hoja2").Select
______ActiveCell.Formula = ""
____Else
______Sheets("Hoja2").Select
______ActiveCell.Formula = "='Hoja1'!" + columna + CStr(z)
____End If
____ActiveCell.Offset(1, 0).Select
__Next z
Saludos! |