Voce tem que atribuir o endereço da célula a ser vinculada com o seu objeto. Utilize a propriedade LinkedCell para fazer isso, informando o endereço (Exemplo: $A$2)

Realizei um teste e utilizei este comando.
Private Sub UserForm_Initialize()
txt_prov1.Value = Sheets("lançamentos").Range("l5")
txt_prov1 = Format(Range("l5"), "R$#,##0.00")
Dim wsCadastro As Worksheet

Set wsCadastro = Worksheets("lançamentos")

lastRow = wsCadastro.Cells(Rows.Count, 1).End(xlUp).Row - 1

txt_doclanc.Value = Format(lastRow + 1, "1000")

Me.cbo_cta.SetFocus

End Sub

Como faço para quando eu entrar com dados o textbox seja atualizado automaticamente, sem ter a necessidade de sair da tela e depois voltar para que seja atualizado