MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    [Resolvido]Formulas em código VBA

    avatar
    CPimenta
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 05/01/2017

    [Resolvido]Formulas em código VBA Empty [Resolvido]Formulas em código VBA

    Mensagem  CPimenta em 2/11/2018, 18:24

    Boa tarde a todos

    Agora estou com este problema:

    Já inseri este código e está a dar erro, alguem me pode ajudar?

    Insert Into Tbl_Movimento_da_Pernoita(Nome, Idade, Género, Especialidade_Cirúrgica, Cirurgião, Intervenção_Cirurgica, Data_Pernoita)Select (Nome, Idade, Genero, Especialidade_Cirurgica, Cirurgiao, Intervenção_Cirurgica, Data_Entrada_Recobro)From Tbl_Resgisto_Recobro.

    Ou terei que por tambem "CmdRunSql" antes do Insert Into

    Abraço a todos
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2880
    Registrado : 21/04/2011

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  Marcelo David em 2/11/2018, 18:34

    Boa tarde,

    Se está no construtor de consultas, não precisa, deve funcionar ao executar a consulta.
    Agora, se está no VBA, pode fazer assim:

    Código:
    CurrentDb.Execute "Insert Into Tbl_Movimento_da_Pernoita(Nome, Idade, Género, Especialidade_Cirúrgica, Cirurgião, Intervenção_Cirurgica, Data_Pernoita)Select (Nome, Idade, Genero, Especialidade_Cirurgica, Cirurgiao, Intervenção_Cirurgica, Data_Entrada_Recobro)From Tbl_Resgisto_Recobro.", dbFailOnerror


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    avatar
    CPimenta
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 05/01/2017

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  CPimenta em 2/11/2018, 18:41

    Boa tarde

    Não amigo, inserir esta formula, num Btn de comando que ao clicar, eu quero ele passa directamente os dados  para a outra tabela.
    mas está a dar erro.




    Um abraço
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2880
    Registrado : 21/04/2011

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  Marcelo David em 2/11/2018, 18:51

    Qual erro?


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    avatar
    CPimenta
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 05/01/2017

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  CPimenta em 2/11/2018, 19:23

    posso por a base, para o amigo ver.

    Um abraço
    Anexos
    [Resolvido]Formulas em código VBA AttachmentRecobro Teste1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (245 Kb) Baixado 9 vez(es)
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2880
    Registrado : 21/04/2011

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  Marcelo David em 2/11/2018, 19:59

    Vou sair, a noite, ao voltar, posto as alterações.


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    FranklinJSP
    FranklinJSP
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 298
    Registrado : 25/02/2016

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  FranklinJSP em 2/11/2018, 23:13

    Oi CPimenta

    Primeiro: Não é bom usar espaços no nome do campo dos bancos de dados.
    Segundo: Não use acentos ou caracteres como "ç ã ê " e outros no nome do campo

    Eu espero que seja o que você precisa

    Saludos desde Bolivia


    .................................................................................
    Meu Português não é muito bom,
    mas eu gosto de colaborar... em qualquer idioma
    Smile "Access... minha paixão"
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6379
    Registrado : 15/03/2013

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  ahteixeira em 14/6/2019, 08:43

    Olá a todos,

    Carlos Pimenta, como ficou a situação?
    Os membros do fórum merecem e agradecem o retorno.

    Abraço a todos
    avatar
    CPimenta
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 05/01/2017

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  CPimenta em 14/6/2019, 15:24

    Boa tarde

    Peço desculpa, pelo atraso, relativamente ao post que fiz, está quase resolvido, mas agora estou com problema que tenho 2 form que vão buscar a informação a duas Cons, e não consigo por a fncionar 2 caixa de combinação.

    Um abraço a todos que me tem ajudado.

    Carlos Pimenta
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6379
    Registrado : 15/03/2013

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  ahteixeira em 15/6/2019, 14:35

    Olá a todos,

    Carlos Pimenta,
    Se a dúvida esta relacionada com o tópico dê mais detalhes para se verificar.
    Caso contrário, dê o tópico como Resolvido e abra novo tópico para a dúvida.

    Abraço a todos
    avatar
    CPimenta
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 05/01/2017

    [Resolvido]Formulas em código VBA Empty Codigo VBA

    Mensagem  CPimenta em 17/6/2019, 14:07

    Boa tarde

    Segue a base para dar uma vista de olhos.

    Muito obrigado a todos.

    Um Grande Abraço
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6379
    Registrado : 15/03/2013

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  ahteixeira em 17/6/2019, 14:41

    Olá Carlos,

    Deve dar mais detalhes do que está acontecer (onde) e o que pretende.

    Abraço a todos
    avatar
    CPimenta
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 05/01/2017

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  CPimenta em 18/6/2019, 17:32

    Boa tarde amigos

    O que acontece é que em dois formulários não consigo adicionar nenhuma informação, ou seja, os Form_Domicilio e Form_Serv_Domici, estão como a origem dos dados atraves da Cons_Domicilio e Cons_Serv_domicilio, e já tentei de todo mas não consigo que seja adicionada a restante informação, será que tenho que por que a origem dos dados têm que ser atraves das tabelas, mas se for não consigo inserir as formulas para que sejam copiados os dados necessários.

    Um abraço a todos

    Carlos Pimenta
    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4466
    Registrado : 20/04/2011

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  Silvio em 18/6/2019, 17:44

    A origem de dados qualquer formulário....tem que ser e deve ser as tabelas em questão !!!

    No formulário em questão...ir para:
    1- folha de propriedades.
    2- aba Dados.
    3- fonte de registro...chama o construtor de consulta. Coloque todos os campos necessários nessa consulta que vai ser criada.
    4- coloque tuas formulas nos campos dessa consulta criada.

    Teste e nos informe.


    Bons estudos.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    avatar
    CPimenta
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 05/01/2017

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  CPimenta em 18/6/2019, 18:27

    Boa tarde

    Tentei por o codigo seguinte:

    Me.Processo_Clinico = DLookup ("ProcessoClinico", "TabRegistroRecobro")

    e não deu
    avatar
    renpv
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 217
    Registrado : 12/01/2015

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  renpv em 18/6/2019, 19:27

    A função DLookup retorna o valor de um único campo com base nas informações especificadas nos critérios. Embora o critério seja opcional, se você não fornecer um valor para critérios, a função DLookup retorna um valor aleatório na tabela consultada.

    Se nenhum registro satisfizer os critérios ou a tabela não contiver registros, a função DLookup retorna Nulo.

    Se mais de um campo atende aos critérios, a função DLookup retornará a primeira ocorrência. Você deve especificar critérios que garante que o valor do campo retornado pela função DLookup seja exclusivo.

    Aí eu pergunto: O que você espera que retorne? Você já tentou pelo menos jogar esse valor num msgbox?
    avatar
    CPimenta
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 05/01/2017

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  CPimenta em 24/6/2019, 14:50

    Boa tarde

    Valeu pela dicas, ficou a funcionar.

    Um grande abraço

    Conteúdo patrocinado

    [Resolvido]Formulas em código VBA Empty Re: [Resolvido]Formulas em código VBA

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/11/2019, 17:28