Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Pesquisa resultou em 147 ocorrências

por milton
Qua Jul 03, 2019 9:48 am
Fórum: VBA Básico
Tópico: [Resolvido] Texto em negrito - vba
Respostas: 2
Exibições: 6857

[Resolvido] Texto em negrito - vba

Bom dia amigos! É possível deixar em negrito somente parte do texto por vba? Tenho a frase abaixo e gostaria que ficasse em negrito somente o texto da CbbNomeDoCurso e TxtHoras. Label1 = "no curso " & CbbNomeDoCurso & " com a carga horária de " & TxtHoras & "...
por milton
Qua Mai 29, 2019 2:27 pm
Fórum: VBA Básico
Tópico: [Resolvido] Editar ListBox sem alterar na Planilha
Respostas: 1
Exibições: 1809

Re: Editar ListBox sem alterar na Planilha

Já consegui pessoal.

Vou deixar em anexo caso alguém precise.

Abraço!
por milton
Qua Mai 29, 2019 10:55 am
Fórum: VBA Básico
Tópico: [Resolvido] Editar ListBox sem alterar na Planilha
Respostas: 1
Exibições: 1809

[Resolvido] Editar ListBox sem alterar na Planilha

Bom dia Pessoal.

Tem como editar a ListBox sem alterar na Planilha?

Desde já obrigado!
por milton
Ter Mai 28, 2019 8:07 am
Fórum: Geral
Tópico: Validação de Dados
Respostas: 1
Exibições: 4250

Re: Validação de Dados

jairoriele bom dia! Veja se seria isso e adapte para o seu projeto. Coloque dentro da TextBox. Abraço Private Sub TextBox1_AfterUpdate() 'Se F12 for menor que a data digita... If Plan1.Range("F12").Value > TextBox1 Then TextBox1.Enabled = False 'Bloqueia MsgBox "Erro", vbCritical...
por milton
Ter Mai 28, 2019 7:19 am
Fórum: VBA Básico
Tópico: [RESOLVIDO] Alerta de vencimento, envio de email automático - VBA
Respostas: 5
Exibições: 15079

Re: [RESOLVIDO] Alerta de vencimento, envio de email automático - VBA

Bom dia petrossski.
Abre um novo tópico, se possível tbm anexo o arquivo e manda o link aqui.
Abraço
por milton
Qui Mai 09, 2019 10:34 am
Fórum: VBA Básico
Tópico: [Resolvido] Carregar somente números na textbox
Respostas: 2
Exibições: 3012

Re: Carregar somente números na textbox

Bom dia Mikel. Não consegui adaptar, mas usei a macro abaixo e funcionou perfeitamente. Muito obrigado por sua atenção linha = 3: strTel = "" Sheets("Plan1").Select Range("D" & linha).Select Do While Range("D" & linha) <> "" If Plan1.Range(&q...
por milton
Qua Mai 08, 2019 2:03 pm
Fórum: VBA Básico
Tópico: [Resolvido] Carregar somente números na textbox
Respostas: 2
Exibições: 3012

[Resolvido] Carregar somente números na textbox

Boa tarde Pessoal.

Pessoal na pesquisa do nome na CbbNome é carregado o numero de telefone na TxtWhatsApp, porém preciso que carregue somente os números ignorando os caracteres () -.

Eu poderia mudar na BD, mas não pode ser alterado lá.

Desde já agradeço

Segue parte do arquivo em anexo
por milton
Qua Mai 01, 2019 8:33 pm
Fórum: VBA Básico
Tópico: [Resolvido]Abrir 2 UserForm, sendo o 2 na frente o 1.
Respostas: 1
Exibições: 1744

[Resolvido]Abrir 2 UserForm, sendo o 2 na frente o 1.

Galera boa noite. Alguém pode me dar um auxilio? Após a função imprimir, necessito que seja aberto o userfor1 e na frente o userform2. Problema: O userform2 abre por trás do userform1; E quando o userform2 abre na frente, se eu clicar no userform1 o 2 vai pra trás. Necessito que abra os 2 e o UserFo...
por milton
Ter Nov 27, 2018 6:42 am
Fórum: VBA Básico
Tópico: dimensoes das pictures
Respostas: 2
Exibições: 2471

Re: dimensoes das pictures

O formato é .bmp
O tamanho pode ser 72x72, porém mesmo sendo maior a imagem se ajusta.

abs
por milton
Ter Out 30, 2018 1:16 pm
Fórum: Modelo de Aplicativo de Cadastro em VBA no Microsoft Excel
Tópico: Transferir os dados dos campos de um userform para campos específicos de uma planilha
Respostas: 3
Exibições: 16570

Re: Transferir os dados dos campos de um userform para campos específicos de uma planilha

Diovanino Cassio boa tarde!

Veja se atende.

Exemplo:
Sheets("NOME DA PLANILHA").Select
Plan1.Range("A1").Value = Registro.Value
Plan1.Range("A2").Value = DataProd.Value