04/03/2006, 11:15
|
| | Fecha de Ingreso: agosto-2003
Mensajes: 272
Antigüedad: 21 años, 4 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 |