Boa noite!!

Me desculpa mas ainda não entendi, tente adaptar

Private Sub UserForm_Initialize()
MultiPage1.Value = 0
MultiPage1(0).ScrollBars = 2
MultiPage1(0).ScrollHeight = MultiPage1.Height * 2
End Sub

Boa noite!!

Me desculpa mas ainda não entendi, tente adaptar

Private Sub UserForm_Initialize()
MultiPage1.Value = 0
MultiPage1(0).ScrollBars = 2
MultiPage1(0).ScrollHeight = MultiPage1.Height * 2
End Sub

Muito obrigado pela resposta, então ajudou sim, mas ainda estou com alguns problemas.
Agora, como tive que adicionar uma barra de rolagem para a userform também... um problema que está ocorrendo é que não a userform não abre já com a scroll no topo... ela já desceu um pouco.
Abaixo adicionei o "Userform1.ScrollTop= 0" esperando que isso resolvesse meu problema... não adianta.

Private Sub UserForm_initialize() 'start to load for userform

Sheets("BDCadastro").Select

Call loadinfos
UserForm1.ComboBox1.RowSource = "listanomes"
UserForm1.ComboBox2.RowSource = "listacpf"
UserForm1.ScrollBars = 2
UserForm1.ScrollTop = 0
UserForm1.ScrollHeight = UserForm1.Height * 1.1
UserForm1.MultiPage1.Value = 0
UserForm1.MultiPage1(2).ScrollBars = 2
UserForm1.MultiPage1(2).ScrollHeight = MultiPage1.Height * 1.25
UserForm1.CommandButton7.Caption = "Salvar Conversa"
UserForm1.CommandButton8.Caption = "Realizar Pedido"

For i = 3 To 5
UserForm1.Controls("CommandButton" & i).Caption = "Editar"
Next
End Sub

Abaixo a imagem da userform carregada com a scrollbar que não carrega no topo.

http://i42.tinypic.com/5wkqrk.jpg

Por último estou, para "desenhar" a userform, quero expandir (arrastar para baixo ainda mais quadradinho branco para baixo) porém parece que está no limite... não vai... há como fazer? Abaixo segue a imagem do que estou me referindo.

http://i39.tinypic.com/30j1y7m.jpg

Obrigado pela atenção.
att
Final