Contém o valor máximo permitido no objeto (a propriedade EnableLimits deve ser igual a Verdadeiro). Exemplo:

Sub CommandButton3_Click()
  Screen.Item("Texto1").MaxLimit = Screen.Item("Texto6").Value
End Sub