Ver Mensaje Individual
  #2 (permalink)  
Antiguo 13/04/2005, 14:13
Avatar de pablinweb
pablinweb
 
Fecha de Ingreso: julio-2003
Mensajes: 283
Antigüedad: 21 años, 9 meses
Puntos: 0
Dim xPointer As Integer

xPointer = Screen.MousePointer
Screen.MousePointer = vbHourglass

comienza el procedimeinto
...
...
...
termina el procedimiento

Screen.MousePointer = xPointer