Boa tarde Mestres!
Preciso de uma grande ajuda de vocês, se puderem é claro,

Fiz um formulário para aparecer algumas informações de acordo com o código escolhido.
Funciona perfeitamente, porém gostaria de abri-lo em uma outra ABA da planilha.
Fiz um botão na aba "Dash" porém ao aciona´lo o formulario abre na aba "Dash", mas direciona para a aba "Demurrage_Info" que é onde estão os dados.

Tem como abri-lo na aba "Dash" e pemanecer na aba "Dash"?
O Userform tem que ficar na aba Dash.

Obrigado.

Segue código:

Private Sub UserForm_Click()

End Sub

Private Sub TextBox1_AfterUpdate()
Dim intervalo As Range
Dim texto As String
Dim codigo As Long
Dim pequisa
Dim mensagem

codigo = TextBox1.Text
Sheets("Demurrage_Info").Select
Set intervalo = Range("A5:H15")

On Error GoTo trataErro

pesquisa = Application.WorksheetFunction.VLookup(codigo, intervalo, 2, False)
pesq1 = Application.WorksheetFunction.VLookup(codigo, intervalo, 3, False)
pesq2 = Application.WorksheetFunction.VLookup(codigo, intervalo, 4, False)
pesq3 = Application.WorksheetFunction.VLookup(codigo, intervalo, 5, False)
pesq4 = Application.WorksheetFunction.VLookup(codigo, intervalo, 6, False)
pesq5 = Application.WorksheetFunction.VLookup(codigo, intervalo, 7, False)
pesq6 = Application.WorksheetFunction.VLookup(codigo, intervalo, 8, False)

TextBox2.Text = pesquisa
TextBox3.Text = pesq1
TextBox4.Text = pesq2
TextBox5.Text = pesq3
TextBox6.Text = pesq4
TextBox7.Text = pesq5
TextBox8.Text = pesq6
TextBox1.SetFocus

Exit Sub
trataErro:
   texto = "Produto não localizado!"
   mensagem = MsgBox(texto, vbOKOnly + vbInformation)
End Sub