Aprenda a utilizar esta interessante ferramenta e aproveite para exercitar suas habilidades com o Visual Basic.
Por Maximiliano Meyer em 12/12/2013 - atualização: 18/12/2017 08:13
Do Until Plan1.Cells(lin, 1) = "" - serão captados os dados das células da Planilha 1 e da coluna 1 até que se encontre uma célula vazia ("").
Visualize a ação clicando no ícone
. Perceba que o formulário irá abrir na planilha e, clicando em sua caixa de seleção, estarão todos os produtos.