Ir para conteúdo
Fórum Script Brasil

MrMALJ

Moderadores
  • Total de itens

    2.152
  • Registro em

  • Última visita

Tudo que MrMALJ postou

  1. Ele executará requery para todos somente se você não referenciar pra qual objeto é a ação, no exemplo que passei eu sempre estou indicando qual objeto será atualizado.
  2. Então utilizando seu subformulário como Formulário Continuo você vai poder tratar cada objeto com os codigos VBA que passei, bem como ter várias linhas (anos) de registro ok.
  3. Pelo que pude ver pela imagem que postou do seu formulário o código que passei anteriormente não funciona dessa forma que está trabalhando o subformula (está como folha de dados) , mude para formulário continuo caso queira utilizar o que postei antes.
  4. Em vez disso repasse o valor referenciando o caminho onde o objeto estará, pelo que percebi os dois campos se chamam matricula, então vou supor que seus formularios sejam "prin" e "subform" respectivamente então por exemplo na propridade de evento após atualizar do matricula do prin faça um código assim: forms!prin!subform!matricula.value= forms!prin!matricula Isso deve resolve, aguardo retorno.
  5. Faça um código assim: dim dataAtual as date dataAtual=date() Select Case dataAtual Case 1 seuTexto.value="Janeiro" Case 2 seuTexto.value="Fevereiro" Case 3 seuTexto.value="Março" Case 4 seuTexto.value="Abril" Case 5 seuTexto.value="Maio" Case 6 seuTexto.value="Junho" Case 7 seuTexto.value="Julho" Case 8 seuTexto.value="Agosto" Case 9 seuTexto.value="Setembro" Case 10 seuTexto.value="Outubro" Case 11 seuTexto.value="Novembro" Case 12 seuTexto.value="Dezembro" End Select Adapte ao seu projeto. Aguardo retorno.
  6. Sim é possivel, basta que você faça a consulta da origem da linha da combo utilizando como critério a combo anterior. Supondo que tenhamos a combo1, combo2 e combo3, a combo 3 tem como critério a combo 2 que por sua vez utiliza a combo 1, assim, quando eu escolher algo na combo1 na propriedade de evento "Após atualizar" dela úse um código assim me.combo2.requery E faça o mesmo na combo2 quando atualiza-la me.combo3.requery Isso deve resolver, adapte ao seu projeto e nos dE^o retorno.
  7. MrMALJ

    abrir excel

    Por que não faz essa macro no próprio Access?
  8. Um código assim deve resolver o que deseja. dim db as database dim rst as dAo.recordset set db = currentdb() set rst = db.openrecordset("suaTabela") for i = me.caixaText1 to me.caixaText2 rst.AddNew rst![seuCampo] = i rst.Update next rst.close set rst = Nothing set db = Nothing Como você não deu maiores detalhes da sua aplicação, estou usando DAO para abrir a tabela e logo depois tem um laço que deve inserir o intervalo desejado. Faça as modificações necessárias para adequar ao seu projeto.
  9. MrMALJ

    Comparar valores do campo

    Só ressaltando que para funcionar o formulário onde o objeto se encontra deve estar aberto, mesmo que sem foco ou minimizado.
  10. MrMALJ

    Comparar valores do campo

    Basta referecenciar o objeto do formulário que conterar o falar que deseja se comparado: Private Sub Contator_5_AfterUpdate() Select Case Me.Contator_5 Case Is <= forms!seuFormulário!seuObjeto Me.Texto44.ForeColor = 0 'Vermelho Me.Texto44.FontBold = True Me.Texto44 = "Não tomar nenhuma ação" Case Else Me.Texto44.ForeColor = 255 'Preto Me.Texto44.FontBold = True Me.Texto44 = "Solicitar troca deste componente" End Select End Sub
  11. MrMALJ

    Access + POO

    O maior problema que o Access enfrenta é a desconfiança sobre sua capacidade armazenamento, mais para armazenamento você pode criar bases de dados externas e utiliza-las no própiro access. A facilidade de desenvolver com access é muito boa, sistemas simples que levariam muito tempo para serem desenvolvidas em outras ferramentas e são implementadas rapidamente no access. Já desenvolvi algumas aplicações relativamente grandes em access com um controle para um Jornal local, que controlava desde os grandes contratos de publicidade, até os anuncios menos, emitia recibos e diversos relatórios de cobrança e gerenciais gerado apartir da inserção dos dados nas tabelas. Esse sistema rodou bem em quase 30 estações durante 2 anos, quando a diretoria achou que deveria adota uma outra tecnologia. Claro que o que deixei pronto serviu como espelho para algumas rotinas necessárias ao jornal. Acho que comercialmente o access enfrentaria muita resistências. Mas mesmo assim boa sorte, sua ideia é bem interessante.
  12. Num entendi o que quer, poderia dar maiores detralhes ou explicar melhor o que deseja fazer?
  13. Para a 1ª dúvida basta dá uma lida neste conteúdo: http://office.microsoft.com/en-us/access/HP052408601033.aspx E sim você pode trabalhar com vários usuário aconselho a usar um fron-end e um back-end. Quanto a segunda o access gera arquivos temporário para gerenciar as transações e outras funçoes internas.
  14. Na propriedade mascara do objeto em questão digite 9999. Isso resolve a questão da mascara númerica!
  15. Não entendi muit do que explicou, entendi que você quer limitar a quantidade digitados, dessa forama aconselho você a utilizar mascara em vez de tentar fazer códigos de valaidação.
  16. MrMALJ

    Problema com relatorios

    Para o critério funcionar bem, é necessário que o formulário onde ele se encontre esteje aberto.
  17. utilize a função dlookup() para realizar a busca na tabela algo assim: If not isnull(dlookup("[pedido]","pedidos","pedido=" & Me.pedido)) then MsgBox "Pedido não cadastrado no Sistema.", vbCritical, "Violação do Sistema" DoCmd.CancelEvent Me.Undo End If Isso deve resolver!
  18. Faça um procedimento na propriedade de evento Após atualizar do campo X, note que os campos teem de ser acoplados se bem explicou e entendi você está utilizando objetos não acoplados logo de forma direta não teria como armazenar.
  19. Usa o localizar é substituir para substituir os dados de uma das duas tabelas para que os campos fiquem iguais. Texto como endereços é muito dificil de padronizar tendo em vista que na digitação podem ser informada de diversas formas o mesmo endereço.
  20. As tabelas que forem necessárias para retornar o que você deseja fazer!
  21. MrMALJ

    Barra de menus

    Crie sua própria barra de menu, vou deixar um link que explica como. http://office.microsoft.com/pt-br/access/HP051890051046.aspx
  22. No modo design/estrutura clique no botão TOTAIS, assim será exibida uma nova propriedade da consulta TOTAL que vem logo abaixo do nome da tabela de origem dos campos, depois escolha o que você quer fazer em cada campo tipo: Agrupar, somar, etc...
  23. No caso a opção de anexar arquivos ao forum é restrita, e para disponibilizar seu(s) arquivo (s) aqui faça o upload para algum server como o 4shared e disponibilize o link para download.
  24. Num primeiro momento não vi problemas no seu BD, o que aconselho e que divida o seu banco de dados em duas partes o back-end (só com as tabelas) e o front-end (que vai ficar nas estações de trabalho) com formulários, consultas, modulos e tudo que for necessário para o sistema funcionar com exceção das tabelas que não existirão no front-end apenas estarão vinculadas.
×
×
  • Criar Novo...