Compartilhando pessoal eu encontrei. Dim i As Integer i = 1 Me.Controls("ListBox" & i).AddItem "teste" Exemplo acima, tão si...

Ual!!!!!!!!!!!!!!!! Parabéns e obrigado eu sou muito grato a vocês, trabalho a um bom tempo com VBA e graças a pessoas como vocês hoje consigo desenvo...

Opa ja encontrei, deixo aqui para quem talvez precise disso .InitialFileName = "Z:Clientes" Inseri isso na chamada do FileDialog

Colega não funfo, olha o código abaixo Coloquei tanto dentro da SUB como antes a até na função Private Sub cadastrar_NomeArquivo_Click() 'Pegar nome ...

Tu é o CARA! Valeu!! joinha pra ti!

Manda a planilha, verifico e posso te ajudar melhor, ficou um pouco vago.

Com o Amigo MPrudencio respondeu esta correto. No Menu Lateral, clique em "EstaPasta_de_trabalho" E cole o seguinte código: Private Sub Wo...