Exemplo de formulário de usuário Excel por Kadr L.

O usuário pode visualizar os registros com botões de controle anterior e próxima de controle facilmente .Também nesta forma,

Se você clicar no botão "cmdFirst", o formulário vai para o primeiro record.Or Se você clicar no botão "cmdlast", o formulário vai para a última record.While visualizar registros em caixa de listagem, você pode ver a ordem de registros em "TextBox"

Nature imagem foi utilizada como fundo do presente userform.Very bom modelo

Códigos de Botão Anterior:.

Se ListBox1.ListIndex = 0 Then

MsgBox "First Record", vbCritical

Exit Sub

Else

TextBox6 = TextBox6 - 1

Com Me.ListBox1

.ListIndex = .ListIndex - 1

End With

End If

Códigos de Botão seguinte:

Se ListBox1.ListIndex = ListBox1.ListCount - 1 Então

MsgBox "Last Record", vbCritical

Exit Sub

Else

TextBox6 = TextBox6 + 1

Com Me.ListBox1

.ListIndex = .ListIndex + 1

End With

End If

http://youtu.be/HqF1NdILrLs

Mais Ver

Baixe