Esqueceu sua senha? Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

Pesquisa resultou em 1189 ocorrências

por Reinaldo
Sáb Ago 17, 2019 6:05 pm
Fórum: VBA Básico
Tópico: Atualizar célula já Cadastrada após a coluna Z
Respostas: 2
Exibições: 29

Re: Atualizar célula já Cadastrada após a coluna Z

Para constar, da maneira que esta a rotina informada. Como a célula/coluna inicial (activeCell) continua fixa em A2 ("Range("A2").Select"); todo deslocamento (Offset) tem como base essa referencia. ocorrem nas colunas: 'ATUALIZA OS DADOS ActiveCell.Offset(0, 0).Value = caixa_prontuario4 'Atualiza Co...
por Reinaldo
Qui Ago 15, 2019 12:40 pm
Fórum: VBA Básico
Tópico: Filtro Avançado com VBA
Respostas: 2
Exibições: 39

Re: Filtro Avançado com VBA

Uma possibilidade: Private Sub CommandButton1_Click() Dim data_ini As String Dim data_fin As String Dim Fornec As String If TextBox1.Text <> "" Then data_ini = Format(TextBox1, "mm/dd/yyyy") Else data_ini = Format("01/01/1900", "mm/dd/yyyy") End If If TextBox1.Text <> "" Then data_fin = Format(TextB...
por Reinaldo
Ter Ago 13, 2019 4:03 pm
Fórum: VBA Básico
Tópico: modelos de sistema - gestão de clinica.
Respostas: 17
Exibições: 272

Re: modelos de sistema - gestão de clinica.

Não entendi o objetivo da Sub Exames; principalmente o trecho abaixo que se repete varias vezes For COLUNA = 17 To 40 Next COLUN Pode fornecer maiores detalhes e em que tabela do access espera/precisa/deseja ter algo similar "...quero entender se ela abre... Veja se os comentários ajudam Sub fncMain...
por Reinaldo
Ter Ago 13, 2019 6:23 am
Fórum: VBA Básico
Tópico: modelos de sistema - gestão de clinica.
Respostas: 17
Exibições: 272

Re: modelos de sistema - gestão de clinica.

"...como consigo colocar formula na coluna do access de modo..." Há na definição de tipo do campo na tabela access (modo design) onde define texto/numero... um tipo considerado "Calculado", que ao ser selecionado abre o construtor de expressões. Nota: Usualmente não é recomendado incluir campo calcu...
por Reinaldo
Ter Ago 13, 2019 6:16 am
Fórum: VBA Básico
Tópico: modelos de sistema - gestão de clinica.
Respostas: 17
Exibições: 272

Re: modelos de sistema - gestão de clinica.

"...com banco de dados fechado..." Como sua rotina e bem segmentada, ao efetuar as checagens diversas a conexão com o BD e aberta e fechada constantemente. Em uma das sub rotinas o BD e fechado e retorna para a rotina inicial para fechar o bd, gerando o erro. Não pude precisar exatamente o ponto, po...
por Reinaldo
Sáb Ago 10, 2019 7:36 pm
Fórum: VBA Básico
Tópico: modelos de sistema - gestão de clinica.
Respostas: 17
Exibições: 272

Re: modelos de sistema - gestão de clinica.

Por favor, evite escrever tudo em maiúsculo, nos fóruns/internet representa estar gritando mesmo sendo verdade :mrgreen:), ou que não é legal. :D "...mas está dando os seguintes erros..." Ao utilizar o Access (ou outro banco ) é preciso alguns cuidados. O principal é: O banco somente irá aceitar inc...
por Reinaldo
Sáb Ago 10, 2019 7:21 pm
Fórum: VBA Básico
Tópico: Regra DataDiff
Respostas: 3
Exibições: 89

Re: Regra DataDiff

Na rotina acima não é indicado como é obtido o valor da Variável Vencimento? Assim fica dificil entender o que ocorre.
Mas tentemos supondo que a origem seja planilha coluna "A"
Veja no anexo a coluna B o retorno
por Reinaldo
Sex Ago 09, 2019 10:43 pm
Fórum: VBA Básico
Tópico: modelos de sistema - gestão de clinica.
Respostas: 17
Exibições: 272

Re: modelos de sistema - gestão de clinica.

Apesar do modelo cadastro ser muito bom e ter sido adaptado para uma infinidade de utilizações, o uso do mesmo (ou suas adaptações) em um ambiente multiusuário, eu particularmente, não vejo nenhum "Pro" .O sistema de "Trabalho em compartilhamento" do Excel deixa muito a desejar, e como o colega Tov ...
por Reinaldo
Sex Ago 09, 2019 10:15 pm
Fórum: VBA Básico
Tópico: Regra DataDiff
Respostas: 3
Exibições: 89

Re: Regra DataDiff

Algum motivo especifico para utilizar DataDiff? Pelo exposto a simples diferença de data, aparentemente, atende Supondo que o comparativo seja Vencimento vx Data de Hoje; teremos Algo +/- assim: =SE(DataVencimento-DataHoje>15;"No Prazo";SE(E(DataVencimento-DataHoje>0;DataVencimento-DataHoje<16);"Fal...
por Reinaldo
Sex Ago 09, 2019 6:22 am
Fórum: VBA Básico
Tópico: Textbox procurarando valor errado no arquivo TXT
Respostas: 6
Exibições: 120

Re: Textbox procurarando valor errado no arquivo TXT

Pela configuração desse campo em seu projeto.
No Editor VBE, Selecione o TxtLevel, vá na janela Propriedades e procure por PasswordChar; está "="
Se quiser ver o valor deixe sem nada