Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Pesquisa resultou em 1537 ocorrências
- Ter Nov 25, 2014 3:44 pm
- Fórum: VBA Básico
- Tópico: Desafio "Delimitar Aquivos"
- Respostas: 15
- Exibições: 8376
Re: Desafio "Delimitar Aquivos"
Tentarei responder até amanha
- Ter Nov 25, 2014 12:57 pm
- Fórum: VBA Básico
- Tópico: Desafio "Delimitar Aquivos"
- Respostas: 15
- Exibições: 8376
Re: Desafio "Delimitar Aquivos"
mandei o email em MP
- Ter Nov 25, 2014 10:24 am
- Fórum: VBA Básico
- Tópico: Desafio "Delimitar Aquivos"
- Respostas: 15
- Exibições: 8376
Re: Desafio "Delimitar Aquivos"
Bem pela linha do cabeçalho aparentemente alguns titulos são duplos. Mas acredito que a linha de dados não são duplas. Então conte a segunda (ou terceira linha). Assim talvez de melhor resultado. Seria algo assim( segunda linha): Sub Encs() Dim Texto As String Dim Counter As Long, cLin As Long Dim m...
- Seg Nov 24, 2014 12:09 pm
- Fórum: VBA Básico
- Tópico: Desafio "Delimitar Aquivos"
- Respostas: 15
- Exibições: 8376
Re: Desafio "Delimitar Aquivos"
Pode-se efetuar uma rotina para cada quatde de colunas no arquivo. Então, sem muita analise, e levando em conta que a linha 1 do txt e o cabecalho, e que a separação dos titulos e é espaço. Pode-se "ler" a quantidade de colunas e assim executar uma ou outra rotina. Sub Encs() 'Seleção dos ...
- Seg Nov 24, 2014 9:47 am
- Fórum: VBA Básico
- Tópico: Pequena falha no Modelo de Aplicativo de Cadastro em VBA
- Respostas: 9
- Exibições: 6612
Re: Pequena falha no Modelo de Aplicativo de Cadastro em VBA
Não é necessário enfatizar os termos pois entendi o que deseja, apenas comentei que não considero um erro, aparentemente foi idealizado para assim ser. Ao realizar uma PESQUISA com o campo de CIDADE SELECIONADO, os demais campos de pesquisa não são levados em conta na pesquisa. Nesse modelo, ao real...
- Sáb Nov 22, 2014 12:07 pm
- Fórum: Geral
- Tópico: Primeira letra Maiúscula exceto "de" "da" das" "do" [RSLVDO]
- Respostas: 9
- Exibições: 12101
Re: Primeira letra Maiúscula exceto "de" "da" das" "do"
Acho que a sintaxe utilizada está equivocada
experimente:
experimente:
Código: Selecionar todos
Private Sub TxtNome_AfterUpdate()
TxtNome = TextConverte(TxtNome.Text)
End Sub
- Sáb Nov 22, 2014 11:57 am
- Fórum: Geral
- Tópico: Primeira letra Maiúscula exceto "de" "da" das" "do" [RSLVDO]
- Respostas: 9
- Exibições: 12101
Re: Primeira letra Maiúscula exceto "de" "da" das" "do"
Bem não consigo adivinhar o que fez, post seu modelo, e como está utilizando
- Sáb Nov 22, 2014 11:33 am
- Fórum: Geral
- Tópico: Primeira letra Maiúscula exceto "de" "da" das" "do" [RSLVDO]
- Respostas: 9
- Exibições: 12101
Re: Primeira letra Maiúscula exceto "de" "da" das" "do"
Se colocou a função em um modulo diferente do modulo do formulário, e como está como private deve se referir a função com o nome do modulo (Ex. Modulo1.TextConverte(...)
ou mover a função para o modulo do formulário ou ainda substituir Private por Public
ou mover a função para o modulo do formulário ou ainda substituir Private por Public
- Sáb Nov 22, 2014 10:35 am
- Fórum: Geral
- Tópico: Primeira letra Maiúscula exceto "de" "da" das" "do" [RSLVDO]
- Respostas: 9
- Exibições: 12101
Re: Primeira letra Maiúscula exceto "de" "da" das" "do"
Veja se lhe auxilia, uma UDF,copie para o modulo desejado, no evento afterupdate do text desejado utilize: TextConverte(suaText.text) Function TextConverte(Texto) As String 'by RMARCO Dim aArray As Variant, stem As Boolean Dim nText As String, sCon(11) As String 'Determina termos que não são maiuscu...
- Qua Nov 19, 2014 1:39 pm
- Fórum: Excel + Access
- Tópico: Erro Public Function Id()
- Respostas: 5
- Exibições: 4952
Re: Erro Public Function Id()
Não consegui entender o que deseja?