paginar no userform

Formulários

Post Recente por davi026 10 anos atrás

5 Posts

4 Usuários

0 Reactions

1,483 Visualizações

RSS

davi026

(@davi026)

Posts: 4

New Member

Topic starter

Bom dia...

Criei um formulário em userform com múltiplas páginas e acrescentei um botão (próximo) para o usuário ir para a próxima página em vez de clicar na aba, porém não consegui achar o código para ativar o botão...
Alguém poderia me ajudar???

Agradeço

Davi Alexandre

Postado : 25/07/2014 7:43 am

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

davi026,

Bom dia!

Tente adaptar:

Private Sub cmdProximo_Click()
'set properties for CommandButton Next


Select Case MultiPage1.Value

'Name is required to be entered to proceed to next Page:
Case 0

If txtName.Value = "" Then

MsgBox "Please Enter Name"

Exit Sub

Else

MultiPage1.Pages(0).Enabled = False
MultiPage1.Pages(1).Enabled = True
MultiPage1.Value = 1

End If

End Select

End Sub

Obs- Coloquei um "txtName" só como exemplo!!

Att,

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

Postado : 25/07/2014 8:05 am

Halk

(@halk)

Posts: 54

Trusted Member

Tem um tópico interessante, veja aí:

viewtopic.php?f=23&t=2704

Postado : 25/07/2014 8:10 am

Wagner Morel

(@wagner-morel-vidal-nobre)

Posts: 0

Illustrious Member

davi026,

Boa Tarde!

veja se é assim.

Mudança de páginas no Userform.zip

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

Postado : 25/07/2014 12:20 pm