Tópicos relacionados a códigos VBA, gravação de macros, etc.
  • Avatar do usuário
#67471
To a horas aqui tentando resolver e não encontro o problema.
Carrego a lista na ComboBox, e quando escolho o usuário deveria carregar a senha do usuário na textbox
Porém quando faço a escolha do usuário vem o seguinte erro:

"Não foi possível obter a propriedade List. Argumento inválido."

Segue o código:

-------------------------------------------------------------------------------------
Private Sub UserForm_Initialize()

Dim CONT As Integer

On Error Resume Next

CONT = Range("Usuarios!A2").End(xlDown).Row
ComboBox1.RowSource = "Usuarios!A2:A" & CONT

End Sub
-------------------------------------------------------------------------------------
Private Sub ComboBox1_Change()

TextBox1 = ComboBox1.List(ComboBox1.ListIndex, 1)

End Sub
#67474
Anexa a planilha, por favor.
#67497
Tente assim:
Código: Selecionar todos
Dim xRg As Range

Private Sub ComboBox1_Change()
    Me.TextBox1.Text = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, xRg, 2, False)
End Sub

Private Sub UserForm_Initialize()
    Set xRg = Worksheets("Usuarios").Range("A2:B10")
    Me.ComboBox1.List = xRg.Columns(1).Value
End Sub
Mesclar no VBA

@osvaldomp Sim eu lembro, instalei os dois e […]

Pessoal, boa tarde! Antes de postar aqui tentei d[…]

Boa Tarde! Se Possível, Em funç&atil[…]

Show de bola, você foi em cima do problema, […]

Dida, Bom Dia. Detalhe no anexo Confere se &eacu[…]

Tente colocar TRUE() na SWITC ...SWITCH ( TRUE(),[…]

Olá, @felipefaccini . Grato pelo retor[…]

[RESOLVIDO]VBA Crashando

Olá, @PedroRamirez . Ao abrir o seu […]