Boa noite, gilbertjrs Nesse site aqui tem uma solução próximo do que precisa, basta realizar as devidas adaptações: https://www.mrexcel...

fernando.fernandes Obrigado, deu certo com o código que indicou, agora vou fechar o tópico. Reinaldo Obrigado pela força.

Reinaldo, Essa parte que mandou esta tranquilo, o que não estou conseguindo fazer essa parte: Do While Not rst.EOF Plan2....

Varra os campos pra colocar os nomes na linha 1, e em seguida: range("A2").copyfromrecordset rst e corre pro abraço Obrigado fernan...

Reinaldo Eu tenho um UserForm que preencher conforme o banco selecionado na tabela especifica. O usuário ira selecionar as estações que vão no WHE...

Eu simplifiquei o code. Para mim achei melhor assim: Tanto o código extenso como o código simplificado funcionou pfarias no ruWindows 8.1 Pro 64 bits...

Eu não precisei habilitar nada, copiei, colei e executei, qual versão do seu Office e windows ? Office Versão 16.0.6965.2092 RuWindows 8.1 Pro 64bits ...

Tentei utilizar o código indicado nosso amigo pfarias, mas apresentou o seguinte erro: Onde estou errando? Preciso referenciar algum biblioteca?

Boa tarde, rizzatto. Acho que o arquivo anexo servirá como base para montar o que precisa.

Boa tarde, amazonasmc. Troque o código de seu botão NOVO por esse código abaixo, pra ver sé o resultado esperado. Private Sub btn_novo_Click() Dim ...

queria mais ou menos assim txt_codigo = Format(Now, "yyyymm") & " - " & teste Não entendi, poderia explicar e/ou postar u...

Boa tarde, amazonasmc. Não sei como será realizado esse lançamento, mas uma das inúmeras formas de verificar se ocorreu a troca de mês de forma dinâm...

Boa noite, Srs. Com ajuda do Mikel Silveira Fraga Em outro fórum consegui resolver o problema, nesse link http://www.tomasvasquez.com...

Juauvitor, Cara seu UserForm esta um pouco bagunçado mas vamos lá ... Primeiro a titulo de organização em propriedades altere a nomenclatura dos seu...