Aula 3 Cadastro VBA - Usando dados previamente carregados de uma ListBox e exibindo na textbox
Galera, Segue mais uma postagem sobre VBA, como usar os dados contidos em uma Lista Box. Acesse http://www.zedasplanilhas.com.br/utilizandodadosdalistbox.html e veja como fazer. e faça o download do exemplo. Abaixo o código que utilizei. Private Sub ListBox1_Click() Dim Resultado As String Resultado = ListBox1 linha = 1 Do Until Sheets("Fornecedores").Cells(linha, 2) = Resultado linha = linha + 1 Loop TextBox2 = Sheets("Fornecedores").Cells(linha, 2) TextBox3 = Sheets("Fornecedores").Cells(linha, 3) TextBox2.Locked = True TextBox3.Locked = True End Sub Abraços e seja feliz.