 
			
				03/03/2006, 02:50
			
			
			     |  
        |     |    |    Fecha de Ingreso: enero-2006  
						Mensajes: 166
					  Antigüedad: 19 años, 10 meses Puntos: 0     |        |  
  |      Introduje el código Private Sub Worksheet_SelectionChange(ByVal Target As Range)   
If Range("a1").Value < 2 Then 
MsgBox ("hola a todos") 
End If     
End Sub   
en el editor de visual (herramientas/macro/editor de visual basic y en la hoja que quería que me saliera el msgbox pegué el código, y ya está. Dada vez que el valor de a1 es inferior a 2 salta el msgbox. Después cambié  Worksheet_SelectionChange por Worksheet_Change para que no estuviera saltando el msgbox todo el tiempo.  
Saludos           |