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]Limitar registro em um relatório.

    Ronaldo Costa
    Ronaldo Costa
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 214
    Registrado : 14/03/2011

    [Resolvido]Limitar registro em um relatório. Empty [Resolvido]Limitar registro em um relatório.

    Mensagem  Ronaldo Costa em 2/3/2020, 22:56

    Olá pessoal!

    Preciso que o meu relatório imprima uma quantidade de registro pre definido pelo usuário do sistema.

    Explico:

    No meu formulário, clico no botão 'Imprimir' aí ele aciona uma imputbox que solicita o número de registros que desejo que seja impresso; coloco a quantidade e o relatório me dar a quantidade solicitada de registros.

    Sei que usando 'top' na instrução de uma consulta, o access faz isso, mas como poderia fazer isso pelo vba?


    grato
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1230
    Registrado : 23/01/2018

    [Resolvido]Limitar registro em um relatório. Empty Re: [Resolvido]Limitar registro em um relatório.

    Mensagem  crysostomo em 8/3/2020, 21:12

    no repositório VBA te esse exemplos "imprimir quantidades de copias"


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Fernando Bueno
    Fernando Bueno
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2090
    Registrado : 13/04/2012

    [Resolvido]Limitar registro em um relatório. Empty Re: [Resolvido]Limitar registro em um relatório.

    Mensagem  Fernando Bueno em 10/3/2020, 21:27

    Boa tarde;

    Segue m anexo um exemplo.
    Anexos
    [Resolvido]Limitar registro em um relatório. AttachmentEscolher quantas copias imprimir.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (44 Kb) Baixado 11 vez(es)


    .................................................................................
    Um abraço
    Fernando Bueno


    O aumento do conhecimento é como uma esfera dilatando-se no espaço
    quanto maior a nossa compreensão,
    maior o nosso contacto com o desconhecido
    [Resolvido]Limitar registro em um relatório. 16rzeq
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1918
    Registrado : 22/11/2016

    [Resolvido]Limitar registro em um relatório. Empty Re: [Resolvido]Limitar registro em um relatório.

    Mensagem  DamascenoJr. em 11/3/2020, 00:03

    Amigos, a ideia não é quantidade de cópias a serem impressas, mas sim quantidade de registros a serem exibidos no relatório para impressão.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    Ronaldo Costa
    Ronaldo Costa
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 214
    Registrado : 14/03/2011

    [Resolvido]Limitar registro em um relatório. Empty Re: [Resolvido]Limitar registro em um relatório.

    Mensagem  Ronaldo Costa em 11/3/2020, 12:41

    Exatamente DamascenoJr!!
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1918
    Registrado : 22/11/2016

    [Resolvido]Limitar registro em um relatório. Empty Re: [Resolvido]Limitar registro em um relatório.

    Mensagem  DamascenoJr. em 12/3/2020, 02:36

    Tópico movido por tratar-se de dúvida relacionada mais a relatórios do que formulários.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1918
    Registrado : 22/11/2016

    [Resolvido]Limitar registro em um relatório. Empty Re: [Resolvido]Limitar registro em um relatório.

    Mensagem  DamascenoJr. em 12/3/2020, 03:36

    No evento "ao Abrir" do relatório.
    Código:
    Private Sub Report_Open(Cancel As Integer)

        Dim strValor As String
       
        Do
           
            strValor = InputBox("Quantos registros você quer?", "Quantidade")
           
            If StrPtr(strValor) = 0 Then 'clicou em cancelar
                Cancel = True 'cancela abertura do relatório
                Exit Sub
            ElseIf IsNumeric(strValor) Then
                'montando a fonte do registro do relatório
                Me.RecordSource = "SELECT top " & strValor & " cpCampo1, cpCampo2 FROM tblTabela ORDER BY cpCampo1;"
                Exit Do 'sai do loop para dar continuação ao código
            Else
                Call MsgBox("Informe um número.")
            End If
       
        Loop

    End Sub


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    Ronaldo Costa
    Ronaldo Costa
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 214
    Registrado : 14/03/2011

    [Resolvido]Limitar registro em um relatório. Empty Re: [Resolvido]Limitar registro em um relatório.

    Mensagem  Ronaldo Costa em 14/3/2020, 13:06

    Boas DamascenoJr, à primeira vista, acredito ser isso a solução. Estarei retornando com o resultado...
    Ronaldo Costa
    Ronaldo Costa
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 214
    Registrado : 14/03/2011

    [Resolvido]Limitar registro em um relatório. Empty Re: [Resolvido]Limitar registro em um relatório.

    Mensagem  Ronaldo Costa em 21/4/2020, 22:04

    Tudo certo. Dentro do que esperava.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1918
    Registrado : 22/11/2016

    [Resolvido]Limitar registro em um relatório. Empty Re: [Resolvido]Limitar registro em um relatório.

    Mensagem  DamascenoJr. em 23/4/2020, 05:14

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

      Data/hora atual: 4/6/2020, 11:20