Este fórum está sendo desativado

[avgsantos]

Boa tarde, Fórum

Utilizei o seguinte código de um botão para aumentar e voltar a normal o tamanho da tela, só aumentar a tela não está voltando o tamanho real da tela.

If UserForm1 > 390 Then
UserForm1.Height = 560

Else
UserForm1.Height = 400

End If

[Basole]

@ avgsantos, experimente desta forma:

Código: Selecionar todos

If UserForm1.Height > 390 And UserForm1.Height < 560 Then

[avgsantos]

Basole
Não deu certo, o código acima funciona para aumentar a tela ao clicar novamente no botão não volta a tela do tamanho original.

[Basole]

Tem que substituir esta linha que postei, no seu código.

Veja o anexo.

[avgsantos]

Ok, valeu