MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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

+2
Cláudio Más
pinto_duarte32
6 participantes

    [Resolvido]Codigo inativo - Botao Report (exportar)

    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 30/12/2012, 21:53

    Boas,

    Encontrei um codigo aqui no forum para exportar para informação para excel. Acontece que eu carrego no botão ao qual atribui o codigo e nao faz absolutamente nada nem sequer dá erro...

    Podem testar para ver se o problema é da minha versao do access ou qq coisa do género.

    O botão em causa está no report Objectivos DP Tester. Junto segue BD
    Anexos
    [Resolvido]Codigo inativo - Botao Report (exportar) AttachmentProdução.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (263 Kb) Baixado 8 vez(es)
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1306
    Registrado : 21/01/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  Cláudio Más 31/12/2012, 12:48

    Exclua a linha:

    Private Sub cmdExportarExcel_Click()

    Além disso, o código faz referência a duas sub-rotinas que não existem no BD:

    RecordsetVazioDAO() e FechaRecordsetDAO()

    Excluindo as linhas citadas, ou incluindo as sub-rotinas, pode ser que funcione.
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re:Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 31/12/2012, 13:17

    Olá Cláudio,

    Experimentei o que me disse e continua sem funcionar...


    È normal carregar-se no botao e não acontecer absolutamente nada? è que nao dá erro não faz nada...estarei a fazer alguma coisa mal? Estou a clicar com o lado direito do rato no botão e depois faço BuilEvents e registo o código...

    Encontrei este outro código mas também não funciona. Estará relacionado com a versão do VB ou algum conflito com a versão do Access? Precisava mesmo de ajuda nisto por favor...

    Private Sub Command13_Click()
    Set oConn = New ADODB.Connection
    oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    "Data Source=C:\Users\dp\Desktop\Mapa Execuções.xlsx;" & _
    "Extended Properties=""Excel 8.0;HDR=Yes;"";"

    ' cria o objecto command e define a conexao ativa
    Set oCmd = New ADODB.Command
    oCmd.ActiveConnection = oConn

    ' abre a planilha
    oCmd.CommandText = "SELECT * from [Sheet2$]"

    ' cria o recordset com os dados
    Set oRS = New ADODB.Recordset
    oRS.Open oCmd, , adOpenKeyset, adLockOptimistic

    'exibe os dados
    preenche_controles

    End Sub

    Obrigado
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1306
    Registrado : 21/01/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  Cláudio Más 31/12/2012, 13:30

    Ainda referente ao primeiro código, este faz referência a uma planilha "teste.xls".
    Você poderia enviar essa planilha, para facilitar com os testes?
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re:Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 31/12/2012, 13:32

    Boas cláudio,

    A planilha está em branco...não tem nada é mesmo uma planilha de teste.

    Obg
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty RE: Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 31/12/2012, 13:39

    Nota: A extensão do ficheiro em excel é xlsx já corrigi o codigo e continua tudo na mesma Sad
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1306
    Registrado : 21/01/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  Cláudio Más 31/12/2012, 13:51

    Tente adaptar o código para funcionar de acordo com a sua aplicação.
    Repare que são necessários alguns ajustes.
    Lembrando também que a planilha "teste.xls" precisa estar presente na mesma pasta do BD.

    Código:
    Private Sub Command35_Click()
    'Private Sub cmdExportarExcel_Click()
    Dim rst As DAO.Recordset, _
        strSQL As String, _
        strLivro As String, _
        xls As Object

    On Error GoTo cmdExportarExcel_Click_TratamentoDeErros

    Set xls = CreateObject("Excel.Application")

    strLivro = CurrentProject.Path & "\teste.xls"
    xls.Workbooks.Open (strLivro)

    xls.Visible = True

    'xls.Worksheets("Hoja1").Activate

    strSQL = "SELECT * FROM GestorDp_Objectivo"

    Set rst = CurrentDb.OpenRecordset(strSQL, dbOpenDynaset)

    'If Not RecordsetVazioDAO(rst) Then
        xls.ActiveSheet.Range("A1").Select
        xls.ActiveCell.CopyFromRecordset rst
    'End If

    xls.ActiveWorkbook.Save

    xls.Application.Quit
    Set xls = Nothing

    'FechaRecordsetDAO rst

    cmdExportarExcel_Click_Salir:
        On Error GoTo 0
        Exit Sub
     
    cmdExportarExcel_Click_TratamentoDeErros:

        MsgBox "Error " & Err.Number & " em proc. cmdExportarExcel_Click de Documento VBA Form_frmExportaraExcel (" & Err.Description & ")", vbOKOnly + vbCritical
        GoTo cmdExportarExcel_Click_Salir

    End Sub
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 31/12/2012, 14:54

    Olá cláudio,

    Tentei com esse código e continua tudo na mesma. Experimentei também tudo onde dizia xls, mudar para xlsx e continua tudo na mesma. Coloquei o ficheiro xls na mesma pasta e mesmo assim não dá...

    Náo é estranho eu clicar no botão e não fazer absolutamente nada? nao deveria correr o código e se houvesse erro apareceria?

    Junto segue BD.

    Peço desculpa de voltar a insistur é que acho estranho nao dar sequer qualquer erro...clico no botão e este fica inativo como se não houvesse qualquer macro associada..

    Já tentei em outros computadores com versoes diferentes do access, do excel e inclusivamente do windows.

    Pode testar na BD que segue em anexo?


    Obrigado
    Anexos
    [Resolvido]Codigo inativo - Botao Report (exportar) AttachmentTesteprodução.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (326 Kb) Baixado 3 vez(es)
    RafaelZorzo
    RafaelZorzo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 92
    Registrado : 25/08/2011

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  RafaelZorzo 31/12/2012, 15:23

    Amigo, testei o código que o Claudio postou para você e aqui funcionou perfeitamente (uso Access 2007)
    Baixe o BD e faça o teste:
    Anexos
    [Resolvido]Codigo inativo - Botao Report (exportar) AttachmentProdução.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (288 Kb) Baixado 8 vez(es)


    .................................................................................
    Aprendi muito aqui...
    [Resolvido]Codigo inativo - Botao Report (exportar) 45
    Arrow Regras do Fórum
    Arrow Faça uma busca no Fórum...
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 31/12/2012, 15:31

    Boas amigo,

    Então devo estar com algum problema no access...a sua versão é a 2007 quer excel, quer access?

    Baixei e não deu nada...o que o que é estranho é que o botão parece que não ordena nada...ou seja eu clico e é como se não tivesse qualquer código associado Sad

    Será que alguém me consegue ajudar?

    Obrigado
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 31/12/2012, 15:34

    está resolvido amigos...muito obrigadoooooooooo Smile
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  Silvio 31/12/2012, 15:43

    Boa tarde e Feliz 2013 para todos !

    Com a permissão dos colegas presente,

    Teste esse aqui, é o mesmo, porém com a alteração da extensão do Excel de *.XLs para *.XLSX.

    Testado e funcional.


    .................................................................................
    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
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty R: Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 31/12/2012, 16:13

    Boas amigos,

    E se eu quiser que os dados sejam exportados para uma determinada planilha específica? neste momento ela exporta para a ultima planilha aberta.

    Conseguem ajudar-me?

    Obrigado
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1306
    Registrado : 21/01/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  Cláudio Más 31/12/2012, 16:24

    Se eu entendi bem, é essa linha que já existe no código, porém desabilitada, que determina a planilha:

    xls.Worksheets("Hoja1").Activate

    Altere o nome "Hoja1" de acordo com a sua aplicação.
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 31/12/2012, 16:37

    Cláudio,

    Mais uma vez muito muito obrigado...só precisava de mais uma coisa SmileSmileSmile

    Mas se preferir abro outro topico!

    È que se eu na consulta colocar filtro de datas...entre a data x e a data y este código dá-me erro! Tem como adaptar para uma consulta com filtros de datas?

    Obrigado
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1306
    Registrado : 21/01/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  Cláudio Más 31/12/2012, 17:06

    Uma idéia é criar um formulário com duas caixas de texto: Data1 e Data2 e um botão para abrir o relatório.

    Na consulta GestorDp_Objectivo, substitua a expressão:

    Entre [Data inicial] e [Data final]

    por:

    Entre Forms!NomeForm!Data1 e Forms!NomeForm!Data2

    Crie uma cópia dessa consulta, sem o filtro de datas.
    No código, altere a linha abaixo:

    strSQL = "SELECT * FROM GestorDp_Objectivo_Cópia WHERE [Data_Proposta] Between #" & Forms!NomeForm!Data1 & "# And #" & Forms!NomeForm!Data2 & "#"
    HARYSOHN
    HARYSOHN
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12227
    Registrado : 01/03/2011

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  HARYSOHN 31/12/2012, 20:59

    Em resposta a contato do Duarte... Bem amigão em excel sou leigo..

    Mas está em ótimas mãos com o Colega Claudio, tenho certeza que ele o ajudará com presteza pois é um excelente profissional.

    Abraços a todos e Feliz Ano Novo.
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 1/1/2013, 10:07

    Obrigado vou experimentar
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 1/1/2013, 10:40

    Olá cláudio...Fiz tudo o que disse mas o problema começa logo na consulta...antes de criar o formulario estava a funcionar mas depois de criar deixou de funcionar... pode estar relacionado com as duas caixas de texto...tenho de criar duas caixas de texto simples e somente mudar o nome para Data1 e Data2? personalizei e coloquei formato data para ser mais facil mas também nao funciona...será que é aqui que está o problema? Adaptei o código que me enviei (dei o nome de Form1)...junto segue BD.

    Mais uma vez muito obrigado se conseguir colocar isto a funcionar ajudar-me-á imenso.

    Obrigado
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 1/1/2013, 10:41

    Agora com o anexo
    Anexos
    [Resolvido]Codigo inativo - Botao Report (exportar) AttachmentProdução01Jan_teste.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (337 Kb) Baixado 5 vez(es)
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1306
    Registrado : 21/01/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  Cláudio Más 1/1/2013, 11:13

    Olá,

    Parece que está tudo certo, faltou apenas nomear as caixas de texto no formulário. Não estão como Data1 e Data2.
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 1/1/2013, 11:53

    Muito obrigado Claudio...Esta resolvido. Custou mas foi.

    Bom ano 2013
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1306
    Registrado : 21/01/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  Cláudio Más 1/1/2013, 11:54

    Obrigado, feliz 2013!
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 1/1/2013, 18:14

    Olá claudio,

    Se eu quiser que ele depois da rotina de exportar abra o ficheiro qual é o codigo que tenho de acrescentar?

    Abraço
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1306
    Registrado : 21/01/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  Cláudio Más 1/1/2013, 18:26

    Não é necessário acrescentar código, basta excluir a linha:

    xls.Application.Quit

    Abs
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 1/1/2013, 21:57

    Obrigado mais uma vez...nem tenho palavras para exprimir a minha gratidão pela ajuda. Sites como este são de facto uma mais valia.

    desculpe as várias questões que lhe coloquei, o que é certo é que me ajudou mesmo muito. Agora acho que o assunto fica fechado de vez.

    Obrigado
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1306
    Registrado : 21/01/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  Cláudio Más 2/1/2013, 00:08

    De nada, fico feliz por ajudar.
    Não precisa pedir desculpas, e tendo outras questões, continue postando.
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 3/1/2013, 21:26

    Olá Cláudio,

    Só mais esta...quero que os campos na data de concretização sem valores também sejam filtrados...fiz esta modificação (acrescentei or null ao final mas dá-me erro erro...

    Codigo modificado
    strSQL = "SELECT * FROM GestorDp_Simuladorcópia WHERE [Data_Concretização] Between #" & Forms!Form5!Data1 & "# And #" & Forms!Form5!Data2 & "# or # Isnull "#"

    È que na consulta no acess fiz isto: Between [Forms]![Form5]![Data1] And [Forms]![Form5]![Data2] Or Is Null e funcionou perfeitamente...consegue dizer-me qual o problema na linha de código SQL??

    Obrigado
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10665
    Registrado : 04/11/2009

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  JPaulo 4/1/2013, 09:36

    strSQL = "SELECT * FROM GestorDp_Objectivo_Cópia WHERE [Data_Proposta] Between #" & Forms!NomeForm!Data1 & "# And #" & Forms!NomeForm!Data2 & "# Or [Data_Proposta] Is Null"


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Codigo inativo - Botao Report (exportar) Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Codigo inativo - Botao Report (exportar) Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Codigo inativo - Botao Report (exportar) Folder_announce_new Instruções SQL como utilizar...
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 4/1/2013, 11:12

    Olá jPaulo! Assim só dá os valores nulos e eu quero que sejam filtrados os valores entre aquelas datas quer sejam nulos ou não.

    Na consulta coloquei Between [Forms]![Form5]![Data1] And [Forms]![Form5]![Data2] Or Is Null e funcionou perfeitamente. Dá-me os valores que estejam entre as datas em causa e os nulos entre essas datas também.

    Pode ajudar-me?

    Obrigado
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1306
    Registrado : 21/01/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  Cláudio Más 4/1/2013, 11:30

    Bom dia,

    A instrução do JPaulo parece estar correta.

    Verifique se a instrução está de acordo com o nome do formulário e com o nome do campo.

    No exemplo do JPaulo, é NomeForm e Data_Proposta. Na sua consulta, é Form5 e Data_Concretização.
    avatar
    pinto_duarte32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 71
    Registrado : 25/12/2012

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  pinto_duarte32 4/1/2013, 14:31

    Resolvido meus amigos...pensei que o Jpaulo tivesse acrescentado ao codigo que eu tinha enviado a instrução e não efetuei as adaptações...assim sendo ficou resolvido.

    Obrigado mais uma vez
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10665
    Registrado : 04/11/2009

    [Resolvido]Codigo inativo - Botao Report (exportar) Empty Re: [Resolvido]Codigo inativo - Botao Report (exportar)

    Mensagem  JPaulo 4/1/2013, 14:58

    Ficamos felizes por funfar, creditos são do Grande Cláudio.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Codigo inativo - Botao Report (exportar) Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Codigo inativo - Botao Report (exportar) Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Codigo inativo - Botao Report (exportar) Folder_announce_new Instruções SQL como utilizar...

      Data/hora atual: 22/1/2022, 16:54