MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Nivel Sigma para mais de um campo (Normsinv)

    Compartilhe

    BR4V0
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 15
    Registrado : 31/05/2016

    [Resolvido]Nivel Sigma para mais de um campo (Normsinv)

    Mensagem  BR4V0 em Seg 11 Jul 2016, 13:49

    Srs. estou com dificuldade em resolver a seguinte situação:

    tenho um Form baseado em uma consulta, no qual realiza alguns calculos, ex: produção, perdas etc. Estou calculando também o seu nivel SIGMA onde consegui realizar o mesmo para um campo do formulário, porém preciso para 3.

    Eu inseri esse código no formulário

    Option Compare Database
    Option Explicit

    Public xlApp As Object 'Excel.Application

    Private Sub Form_Close()
       
       xlApp.Quit
       Set xlApp = Nothing
           
    End Sub

    Private Sub Form_Load()
    Set xlApp = CreateObject("Excel.Application")
       
       Me.Visible = False

    End Sub


    onde abre e fecha o excel no formulário possibilitando a utilização da função Normsinv do excel

    Criei um Módulo com o código:

    Function MyNormsInv(calcNatual As Double) As Double
       
       MyNormsInv = Form_Consolidado.xlApp.WorksheetFunction.Norm_S_Inv(calcNatual)
           
    End Function



    com isso, consegui obter o valor sigma, funciona legal!! mas não consegui aplicar para outros dois campos em meu formulário!

    Alguém poderia me ajudar???

    estou postando o arquivo de exemplo pra ajudar.
    Anexos
    teste.zip
    Help!!
    Você não tem permissão para fazer download dos arquivos anexados.
    (370 Kb) Baixado 4 vez(es)

    BR4V0
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 15
    Registrado : 31/05/2016

    Consegui!!

    Mensagem  BR4V0 em Qua 13 Jul 2016, 19:03

    Srs. Obrigado aqueles que desprenderam de seu tempo para verificar este post! consegui resolver o problema fazendo o calculo (perda / produção) na consulta e não no formulário.. E coloquei o código q chama o excel em um formulário em branco, com isso eliminei todas as falhas e obtive o resultado esperado. (as vezes estamos tão focados no objetivo q ficamos cegos quanto a solução mais simples).

    Para aqueles quem tiver interesse estou postando o arquivo funcionando.
    Anexos
    teste.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (334 Kb) Baixado 2 vez(es)

      Data/hora atual: Qui 08 Dez 2016, 23:56