Olá Amigos do forum, quero aqui desde ja agradecer pelas ajudas que tive atraves de vcs, estou com um probleminha, estou fazendo uma consulta e essa consulta e pra da o resultado em uma plan10 através de um listbox, ate ai esta tudo beleza ela joga as infomações correta, o que eu quero é que ela jogue as informações do list no caso se o list tiver até 10 produtos ele joga da linha 2 até a linha 12 mais se passar de 10 produtos no list, ele joga 10 na linha 2 até a linha 12 o restante ele pula a linha 13 até a 19 fazendo un step jogando a patir da linha 20, eu não consiguir fazer esse step deve ser um detalhe, o codigo estai é so acrescentar o que for preciso e agradeço a todos!
Dim i As Integer
Dim cont As Integer
i = 1
For cont = 0 To Form_vendas.ListBox_produto.ListCount - 1
Plan10.Range("A" & i + 1) = Form_vendas.ListBox_produto.List(cont, 0)
Plan10.Range("B" & i + 1) = Form_vendas.ListBox_produto.List(cont, 1)
Plan10.Range("C" & i + 1) = Form_vendas.ListBox_produto.List(cont, 2)
i = i + 1
Next
Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
listbox
-
- Colaborador
- Mensagens: 35
- Registrado em: Sex Jan 28, 2011 9:02 pm