| Al final parece que "mariconeando" un poquito he llegado a una solucion que me sirve... aunque no sé si es muy ortodoxa ... aki la pego por si a alguien le sirve
---------------------------
Private Sub Form_Current()
Dim ultimo As Integer
ultimo = Me.RecordsetClone.RecordCount
If CurrentRecord > 1 Then
Me.Anterior.Enabled = True
Me.Primero.Enabled = True
End If
If CurrentRecord = 1 Then
Me.Anterior.Enabled = False
Me.Primero.Enabled = False
End If
If CurrentRecord = ultimo Then
Me.Siguiente.Enabled = False
Me.ultimo.Enabled = False
End If
If CurrentRecord < ultimo Then
Me.Siguiente.Enabled = True
Me.ultimo.Enabled = True
End If
--------------
ai veces k solo ai k kaminar un pokito para llegar a la meta ... |