04/03/2006, 11:15
|
| | | Fecha de Ingreso: agosto-2003
Mensajes: 272
Antigüedad: 22 años, 2 meses Puntos: 0 | |
| que tal esta:
Range("A1").select
dim i as integer
i = val(activeCell.formulaR1C1)
Private Sub hola()
If i < 2 Then
MsgBox ("hola a todos")
End If
End Sub |