Textbox vs Botão

2024 - VBA & Macros

Post Recente por kurkas 9 anos atrás

5 Posts

3 Usuários

0 Reactions

1,010 Visualizações

RSS

kurkas

(@kurkas)

Posts: 85

Trusted Member

Topic starter

Olá,
Estou farto de dar voltas e não me sai bem o que passo a citar.
No userform1 tenho a textbox2 onde digito valores.
Ela só envia para a planilha os valores após primir o botão "Guardar".
Como faço para que, sempre que a textbox estiver vazia o botão está lock, e quando a textbox tem valores o botão fica unlock?
Agradecido

Postado : 07/09/2015 7:39 pm

messiasmbm

(@messiasmbm)

Posts: 223

Estimable Member

Ta meio confuso mas acho que é isso que vc quer...

Postado : 07/09/2015 8:16 pm

kurkas

(@kurkas)

Posts: 85

Trusted Member

Topic starter

Á primeira vista julgo ser isso.
Vou testar e depois dou feedback.
Obrigado

Postado : 07/09/2015 8:23 pm

Weslei S.

(@weslei-s)

Posts: 6

Active Member

Tente este codigo.

Private Sub TextBox1_Change()
If TextBox1 = "" Then
    CommandButton1.Enabled = False
End If
If TextBox1 <> "" Then
    CommandButton1.Enabled = True
End If
End Sub

Postado : 08/09/2015 3:45 am

kurkas

(@kurkas)

Posts: 85

Trusted Member

Topic starter

Já resolvi,
tive que colocar o procedimento no botão:

Private Sub guardar_Click()
If TextBox2.Value = Empty Then
mensagem.Caption = "Não há registos a atualizar"
End If
If TextBox2.Value <> Empty Then
mensagem.Caption = ""
Call Atualizar

End If

Ora, se este textbox2 estiver vazio, não atualiza.

Agradecido na mesma aos dois.

Abraço

Postado : 08/09/2015 12:01 pm