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


3 participantes

    [Resolvido]Abrir formulário em um registro aleatório.

    Walter
    Walter
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 375
    Registrado : 17/04/2011

    [Resolvido]Abrir formulário em um registro aleatório. Empty Abrir formulário em um registro aleatório.

    Mensagem  Walter 15/11/2012, 22:43

    Boa noite a todos.
    Gostaria de saber uma forma de abrir um formulário atraves de um botão, e que esse abra em registro aleatório. Ou seja, cada vez que abre abrirá num registro diferente, mas com a possibilidade de abrir no mesmo anterior (pode haver repetição). Alguem pode me ajudar?
    Walter
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Abrir formulário em um registro aleatório. Empty Re: [Resolvido]Abrir formulário em um registro aleatório.

    Mensagem  criquio 15/11/2012, 22:47

    Dê uma pesquisada pela função Rnd no Help do VBA do Access. É só adaptar.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    Walter
    Walter
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 375
    Registrado : 17/04/2011

    [Resolvido]Abrir formulário em um registro aleatório. Empty Re: [Resolvido]Abrir formulário em um registro aleatório.

    Mensagem  Walter 15/11/2012, 23:15

    oK. Críquio.
    Vou dar uma estudada e retorno.
    Um abraço,
    Walter
    Walter
    Walter
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 375
    Registrado : 17/04/2011

    [Resolvido]Abrir formulário em um registro aleatório. Empty Re: [Resolvido]Abrir formulário em um registro aleatório.

    Mensagem  Walter 16/11/2012, 11:03

    Bom dia, Críquio.
    Nossa! Confesso prá você que não entendi quase nada do Help do VBA, sobre a função RND. Continuei sem saber como fazer o código para que o formulario abra em um registro aleatório. Se você tiver um exemplo me ajudaria muito. Estou tentando penetrar nos mistérios do VBA...
    Um abraço,
    Walter
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Abrir formulário em um registro aleatório. Empty Re: [Resolvido]Abrir formulário em um registro aleatório.

    Mensagem  JPaulo 16/11/2012, 12:42

    Faça o teste no evento VBA ao carregar do seu formulário;


    Private Sub Form_Load()
    DoCmd.GoToRecord , , acGoTo, Int(Rnd() * Me.RecordsetClone.RecordCount) + 1
    End Sub




    .................................................................................
    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]Abrir formulário em um registro aleatório. Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Abrir formulário em um registro aleatório. Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Abrir formulário em um registro aleatório. Folder_announce_new Instruções SQL como utilizar...
    Walter
    Walter
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 375
    Registrado : 17/04/2011

    [Resolvido]Abrir formulário em um registro aleatório. Empty Re: [Resolvido]Abrir formulário em um registro aleatório.

    Mensagem  Walter 6/12/2012, 08:26

    Consegui. Obrigado a todos.
    alter

    Conteúdo patrocinado


    [Resolvido]Abrir formulário em um registro aleatório. Empty Re: [Resolvido]Abrir formulário em um registro aleatório.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 08:48