Vídeo #70 - Deixe seu Userform VBA mais moderno e bonito com esse recurso 

Muito obrigado Fernando, sou muito fã do seu trabalho! Que continue esta parceria...

Eita que vou esperar essa estreia ansioso kkk

Seguro será algo extraordinario 😃😃😃 , ya estoy ansioso!

Gostei! 😄

Eu sou Analista de Dados numa Secretaria de Educação e como "hobby" eu auxilio o pessoal no quesito eficiência nos processos. Enfim, nesse contexto VBA auxilia horrores a criar soluções no trabalho, diminuindo muito o tempo de se executar uma tarefa/ação. E tipo, realmente coisas mais bonitas engajam as pessoas a usá-las e eu com certeza irei utilizar essa solução que, convenhamos, deixa um userform perfeito aos olhos de quem o vê. Parabéns.

Show o teu canal e do Ricardo, meus parabéns

Ótimo vídeo, conheci a pouco tempo o canal do Ricardo e é um excelente trabalho também. Essa parceria entre vocês todos é incrível, parabéns.

Incrível. Você é fera! Parabéns!

Gracias Senior Fernando

Excelente, muito obrigada por compartilhar.

Organics seu canal merece 10000000000 likes, sua disposição e prestação de serviço e sem igual, muito obrigado me inscrevi no teu canal e vou me inscrever no canal do Ricardo camisa também !!!!!!

Muito obrigado Fernando e Ricardo camisa por disponibilizar o código.

Muito bom👍

Show de bola Man foi colocar nos meus projetos

Show o vídeo. Fernando uma sugestão q acho a maioria iria gostar seria fazer um explicação de paginação, exemplo em um resultado mostrar de 5 em 5 registros (q poderia ser no listbox ou listview). Desde já grato

Olá Fernando, muito bom esse código, aqui tenho umas textbox que deixo invisivel , mas quando rodo o fomulário elas aparecem.

Quando clico em uma combobox o excel trava

queria saber como faz p mudar a cor da janela do sistema p esse ciano que vc usa?

Parabens pelo Video Fernando.Sou iniciante em VBA, ja tinha assistido o video no canal do Ricardo Camisa e não tinha conseguido colocar em meu projeto esta aplicação. Agora com seu video consegui. Só deu um erro. Tenho um campo de Observação em meu projeto que o campo é mais largo para abranger uma observação mais extensa. Esta linha que aparece abaixo das textbox neste campo fica sobreposta ao texto que fica na segunda linha deste campoobservação. Sabe como fazer para ou sumir esta linha ou fazer com que ela fique no final da minha textbox Observação? Forte Abraço.

Bom dia tudo bem. gostei do video. Gostaria de saber como fazer do tipo desse botão azul cadastrar

Gostei do recurso, mas gostaria de saber como faz para a janela do userform ficar da forma semelhante a sua

Uma duvida Como faz a importação dos modulos ?

Bom dia Fernando, é possível usar esse recurso com aquele seu menu interativo?

Excelente material. Tentei implementar e ficou show, mas infelizmente ele não funciona para textbox multiline, a linha abaixo do texto não se ajusta ao tamanho da caixa 😔 Existe alguma forma de realizar esse ajuste para a textbox no userform, no frame, multipage e multipage com frame. Desde já agradeço 😊

Realmente fico sem entender de como aplicar em meu userform1 que já tenho uns 10 botões, labels, combobox, etc....sem estragar os seus devidos códigos. Depois qual userform devo manter? Posso deletar o original? Sabe aquele receio de que pode dar merda? Tô doido pra fazer mas não tem um RU-vidr que explica e passa confiança, você, o Ricardo, Marcelo Nascimento .....

Prezados saudações, relativamente a estes códigos dizer que fiz todo procedimentos de acordo os códigos baixados,mas tem um problema sempre que eu tento acionar a combobox pra exibir algum resultado atendencia e sempre fechar o sistema,favor ajudem me obrigado

Código não funciona em formulários já criados - Erro em tempo de execução '13' Tipos incompatíveis ( alguém com esse problema)

Olá Fernando, tudo bem? Cara só quero dizer que você é top demais. Estou amando as suas vídeos aulas. Top top top. Uma dúvida que me aconteceu, eu tenho uma textbox com quebra de página e ao executar fica a linha em cima da minha escrita. Como posso solucionar este problema?

Como eu adiciono Beep no botão, com som diferente de beep

O LINK TA ZUADO!

Não sei o motivo , mas a hora que vou abrir o combobox da erro na planilha

Olá professor! Não consegui executar o código, quando coloco para rodar aparece uma caixinha dizendo: Erro de Compilação 'Sub' ou 'Function' não definida na parte Call TxtColor, saberia me ajudar no que pode estar havendo?

tem um problema ao importar o modolu de classe diz que eu não tenho acesso preciso de permissão

Hice todo el proceso, tengo un formulario con varias paginas pero los combobox no toman el efecto, los textbox si funcionan bien, he revisado y no se que estoy haciendo mal :(

Olá Professor, beleza? Fiz uma macro e gostaria de estar te enviando pra você analisar e, se ela for boa, utilize-a. Obrigado por tudo que você faz por nós. Somos eternamente gratos pelo seu trabalho no seu canal. Option Explicit Option Base 1 '========= Início da validação para somente números, ponto e vírgula no campo "TextBox1", 'ao digitar o ponto, o mesmo é substituído pela vírgula. ========= 'Crie um UserForm com duas TextBox, uma delas deve ter o nome de "TextBox1". 'Cole o código abaixo no escopo do seu UserForm. Se colar num módulo ou fora do escopo do UserForm. 'use o atalho Ctrl+U e substitua "TextBox1" por "UserForm1.TextBox1" se o nome do seu UserForm for "UserForm1". 'O código abaixo filtra os dados de entrada na "TextBox1" somente para números 'com conversão do ponto digitado no início para vírgula e conversão, também da vírgula para "0," 'sempre que digitar logo de início, um ponto ou uma vírgula, a digitação se torna "0,". 'Bloqueio da vírgula para ser digitada só uma vez. 'Possibilidade de deslocar a vírgula para a esquerda, exceto para a extrema esquerda. 'É possível colar números com vírgulas ou pontos, a macro filtra e tira as vírgulas ou pontos à direita, 'um número assim: "468.59.1245,456" se torna assim: "468,591245456". 'Limpa a vírgula do final do número se o último dígito for a vírgula ou ponto, ao sair do campo. 'Muito em breve, irei desenvolver novos recursos para essa sub-rotina para fazer cálculos de equações 'como essa: "((4^3-5)^0.5)-(43/3-8*pi)" que dá 18.4806 ou essa: "4pol" que dá 101.6mm 'para ser digitado no "TextBox" e ele já calcular. Até mesmo "2+2" que dá 4. rsrsrs 'Bom proveito Galera. 'Eugênio Private Sub TextBox1_Change() TextBox1 = Replace(TextBox1, ".", ",") If TextBox1 = "," Then TextBox1 = "0," End If If Len(TextBox1) > 1 And TextBox1 "0," And Left(TextBox1, 1) = "," Then TextBox1 = Replace(TextBox1, Left(TextBox1, 1), "", 1, 1) End If Dim ProxCaractEnt As Integer Dim CarAtualEnt As String Dim CompTotalEnt As Integer Dim ProxCaractMatriz As Integer Dim MatrizMaior As Integer Dim Virgula As String Dim Sobra As String Dim EntValidas As Variant EntValidas = Array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, ",") 'Se quiser ativar mais algum caractere, é só colocá-lo na matriz.