Código:
La tengo para que cuando haya un error en la aplicación me llame esa subrutina y si el cursor en la pantalla donde dió error estaba en hourglass pues que lo ponga a Default.Public Sub RutinaError(Optional frm As Form) If cnn(1).Errors.Count > 0 Or cnn(1).State = 1 Then cnn(1).RollbackTrans cnn(1).Errors.Clear End If MsgBox Err.Number & ": " & Err.Description, vbExclamation + vbOKOnly, "Error..." Err.Clear frm.MousePointer = vbDefault End Sub
Sucede que hay veces que error se produce en un módulo y cuando llamo a la subrutina, no le le puede pasar el form ya que como dije anteriormente es un módulo.
La pregunta es: Como yo puedo preguntar si he recibido el parámetro frm o no?
![Pensando](http://static.forosdelweb.com/fdwtheme/images/smilies/scratchchin.gif)