Exemplo das propriedades Enabled, EnterFieldBehavior, SelLength, SelStart, SelText

O exemplo seguinte monitoriza as propriedades relacionadas com a seleção (SelLength, SelStart e SelText) que são alteradas à medida que o utilizador move o ponto de inserção e expande a seleção com o teclado.

Este exemplo também utiliza as propriedades Enabled e EnterFieldBehavior .

Para usar este exemplo, copie esta amostra de código para a parte Declarações de um formulário. Verifique se o formulário contém:

• Uma Caixa de Texto grande com o nome TextBox1.
• Três controlos de Caixa de Texto numa coluna chamada TextBox2 a TextBox4.

Private Sub TextBox1_KeyUp(ByVal KeyCode As _ 
 MSForms.ReturnInteger, ByVal Shift As Integer) 
 TextBox2.Text = TextBox1.SelStart 
 TextBox3.Text = TextBox1.SelLength 
 TextBox4.Text = TextBox1.SelText 
End Sub

Private Sub UserForm_Initialize() 
 TextBox1.MultiLine = True 
 TextBox1.EnterFieldBehavior = _ 
 fmEnterFieldBehaviorRecallSelection 
 
 TextBox1.Text = "Type your text here. Use " _ 
 & "CTRL+ENTER to start a new line." 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.