Combobox excel

Question

Boa noite

Tenho um combobox escandeado e toda vez que o valor do conteúdo do é deletado para fazer alteração ele da erro em tempo de execução 381

Peguei esse código como exemplo na intenet e esta dando o mesmo problema.

Private Sub ComboBoxCategorias_Change()
    Call CarregaProdutos(Me.ComboBoxCategorias.List(Me.ComboBoxCategorias.ListIndex))
End Sub

Private Sub UserForm_Initialize()
    Call CarregaCategorias
End Sub

Private Sub CarregaCategorias()
    Dim linha As Integer, coluna As Integer
    linha = 2
    coluna = 1
    Me.ComboBoxCategorias.Clear
    With Sheets("Categorias")
        Do While Not IsEmpty(.Cells(linha, coluna))
            Me.ComboBoxCategorias.AddItem .Cells(linha, coluna).Value
            linha = linha + 1
        Loop
    End With
End Sub

Alguém poderia ajudar ?

Answer 1

Boa tarde, Alexandro. Tudo bem?

Obrigado por usar o fórum MSDN.

Conseguiu algum avanço no teu caso? O que você está precisando?

Atenciosamente,

---

Filipe B de Castro

Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita

MSDN Community Support

Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.

Answer 2

Boa tarde, 

Por falta de retorno essa thread está encerrada.

Se necessário favor abrir uma nova thread.

Atenciosamente,

---

Filipe B de Castro

Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita

MSDN Community Support

Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.