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

Pesquisa resultou em 14 ocorrências

por kikoehu
Seg Mar 30, 2020 10:40 am
Fórum: VBA Básico
Tópico: projeto excel abrindo tres guias[resolvido]
Respostas: 1
Exibições: 5640

projeto excel abrindo tres guias[resolvido]

Bom dia; estou com um problema que não sei o motivo e muito menos a solução; Criei um projeto no vba para preencher um formulário. Até ai tudo bem. tratei meus comando e deixei próximo o do que quero, mas agora percebi que ao abrir o projeto , ele abre o excel contendo minha planilha e mais duas gui...
por kikoehu
Seg Mar 30, 2020 9:49 am
Fórum: VBA Básico
Tópico: limitar comando DO WHILE
Respostas: 0
Exibições: 9613

limitar comando DO WHILE

Olá a todos(de novo); tenho um código para apagar uma linha acima pelo comando do while. porem ela quando usada não tem um limitador que pare no cabeçalho do formulário, e acaba apagando as linha que devem permanecer nele, alguém pode me ajudar? Segue código: im w As Worksheet Dim ultcel As Range Di...
por kikoehu
Dom Mar 29, 2020 5:29 pm
Fórum: VBA Básico
Tópico: Dúvidas com Msgbox vbyesno[resolvido]
Respostas: 5
Exibições: 7911

Re: Dúvidas com Msgbox vbyesno

Então eu preciso de uma tratativa que faça com que meu codigo entenda que há algo escrito no textbox1, fazendo com que ele pule a etapa do msgbox anterior que é MsgBox("Deseja acrescentar uma observação?", vbYesNo, "Aviso"); e pule pra outra msgbox ("Deseja Prosseguir")...
por kikoehu
Dom Mar 29, 2020 10:07 am
Fórum: VBA Básico
Tópico: inserir dados em células em sequencia, e limitar a quantidade de linhas[RESOLVIDO]
Respostas: 2
Exibições: 7086

inserir dados em células em sequencia, e limitar a quantidade de linhas[RESOLVIDO]

Olá a todos; Tenho o seguinte código para inserir dados na minha planilha, porém, necessito que a inserção se limite a apenas 9 linhas a partir da linha 37, podem me ajudar? segue código: Private Sub CommandButton3_Click() Dim lin As Integer 'valor inicial da variavel lin lin = 37 Do Until ThisWorkb...
por kikoehu
Dom Mar 29, 2020 8:32 am
Fórum: VBA Básico
Tópico: Dúvidas com Msgbox vbyesno[resolvido]
Respostas: 5
Exibições: 7911

Re: Dúvidas com Msgbox vbyesno

Acho que me expressei de forma errada. Quando a Textbox1 está em branco e se clica no botão Cob_avançar, surge a MsgBox("Deseja acrescentar uma observação?", vbYesNo, "Aviso"); Ok, então ao clicar em sim ,a pessoa é enviada de volta ao textbox1, para digitar uma possivel observaç...
por kikoehu
Sáb Mar 28, 2020 10:18 am
Fórum: VBA Básico
Tópico: Dúvidas com Msgbox vbyesno[resolvido]
Respostas: 5
Exibições: 7911

Dúvidas com Msgbox vbyesno[resolvido]

Olá a todos; Poderiam me ajudar neste problema. Tenho um código de comando vba que ao clicar no botão avançar(Cob_avançar) surge uma msgbox caso a pessoa que está a preencher o formulário esqueça de acrescentar uma observação através do textbox1, portanto ao clicar no botão avançar surge a msg :Dese...
por kikoehu
Qui Out 04, 2018 11:39 pm
Fórum: VBA Básico
Tópico: Combobox ler zeros a esquerda na célula
Respostas: 1
Exibições: 1875

Combobox ler zeros a esquerda na célula

Boa noite, tenho um combobox que está associado a células que contém três números em cada célula. A maioria deles é centena mas os que são dezenas e unidade, precisei formatar a célula com 0# e 00# para aparecerem na célula com os zeros a esquerda respectivos. Pois bem, o problema é que o Combobox n...
por kikoehu
Sex Set 21, 2018 7:00 pm
Fórum: VBA Básico
Tópico: Problema em textbox com format cdate
Respostas: 5
Exibições: 4041

Re: Problema em textbox com format cdate

Opa Reinaldo blza, então não tive tempo antes, pude testar só agora, e deu certo, muito obrigado! Sem querer abusar, tenho um combobox que se determinada escolha de um conteúdo dele, deve automaticamente ativar o conteudo de outro combobox ou textbox se (se for o caso Altero, já que nesse combobox q...
por kikoehu
Qui Set 20, 2018 6:57 pm
Fórum: VBA Básico
Tópico: Problema em textbox com format cdate
Respostas: 5
Exibições: 4041

Re: Problema em textbox com format cdate

Na verdade Reinaldo, o comando eu acabei escrevendo errado aqui, pois cada um insere dados em uma celula específica. O comando correto é esse: Private Sub txt_data2_Change() If Len(txt_data2.Text) = 2 Then txt_data2 = txt_data2 + "/" End If If Len(txt_data2.Text) = 5 Then txt_data2 = txt_d...