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

    Comunicação entre excel da Porta Com

    Compartilhe

    Rbmartins
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 4
    Registrado : 17/06/2015

    Comunicação entre excel da Porta Com

    Mensagem  Rbmartins em Qua 17 Jun 2015, 11:52

    Bom dia,
    Tenho uma dúvida em VB.
    Tenho um excel que recolhe a informação(faz a leitura) de um equipamento com porta COM e devolve esse resultado de volta para o excel.
    Tudo estava a funcionar na perfeição até alterar o sistema operativo.
    Inicialmente o pc tinha XP e neste momento tem o WIN7 e desde o momento da atualização deixou de funcionar.
    Como resolver essa problema de comunicação?
    Alguém me pode ajudar?
    Desde já obrigada
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

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

    Re: Comunicação entre excel da Porta Com

    Mensagem  Silvio em Qua 17 Jun 2015, 12:31

    Bom dia...

    Seja bem vinda ao fórum de Access.

    RBMartins, esse fórum é destinado para o MS Access e não do Ms Excel.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    Rbmartins
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 4
    Registrado : 17/06/2015

    Minha questão prende-se a VB

    Mensagem  Rbmartins em Qua 17 Jun 2015, 14:05

    Olá Sílvio,
    Minha questão prende-se com VB a macro está num excel mas penso que o código em VB não será diferente.
    Meu problema é que a porta COM deixou de receber os dados depois de mudar o SO. Usei o seguinte código. (segue Parte do código para dares uma olhada se puderes).
    Private Sub MSComm1_OnComm()
    Dim msg As String
    Dim data As String
    Dim i As Integer
    Dim t As Long
    t = 1
    msg = ""
    Do
    msg = msg & Sheet2.MSComm1.Input
    '
    If t > 100000 Then
    If Len(msg) < 15 Then _
    MsgBox "Não é possível receber dados do sistema !" & vbLf & "(Verifique as ligações ...)"
    Exit Sub
    End If
    t = t + 1
    Loop While InStr(1, msg, vbLf, vbTextCompare) = 0
    If Left(msg, 1) = "N" Then
    data = Trim(Mid(msg, 2, InStr(1, msg, "g", vbTextCompare) - 2))
    data = Left(data, 1) + Trim(Right(data, Len(data) - 1))
    Else
    data = Trim(Mid(msg, 1, InStr(1, msg, "g", vbTextCompare) - 1))
    data = Left(data, 1) + Trim(Right(data, Len(data) - 1))
    End If
    MoveToNextCell data, "H"
    Sheet2.MSComm1.InputLen = 0
    End Sub
    avatar
    Administrador
    Administrador
    Administrador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 366
    Registrado : 02/11/2009

    Re: Comunicação entre excel da Porta Com

    Mensagem  Administrador em Qua 17 Jun 2015, 14:41

    Tópico movido para Off-Topic


    .................................................................................
    Admin
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4291
    Registrado : 15/03/2013

    Re: Comunicação entre excel da Porta Com

    Mensagem  ahteixeira em Qua 17 Jun 2015, 14:42

    Olá Renata.
    Sim, a linguagem no Access é a mesma que no Excel (VBA-Visual Basic for Applications).
    O código que postou, adaptado também poderá funcionar em Access e até ser util para outro utilizador aqui do fórum.
    Aparentemente o que faz a leitura do dispositivo deve ser um componente do driver ou software do equipamento.
    O código não tem nada de especial, apenas nesta parte é que deve estar a questão:

    Código:
    msg = msg & Sheet2.MSComm1.Input

    Verifique se o computador anterior tinha algum software especifico.
    Mais detalhes sobre o equipamento (marca e modelo) talvez ajude.

    Para informação mais especifica sobre Excel, concordo com colega Silvio, será melhor procurar um fórum de Excel.
    Abraço
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

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

    Re: Comunicação entre excel da Porta Com

    Mensagem  Silvio em Qua 17 Jun 2015, 19:43

    Bom vamos lá então....

    a- houve um Up Date ( atualização ) de sistema operacional.

    b- fica a pergunta, qual Ms Office era utilizado no Win Xp  e qual está sendo usado agora ( versão e se é 32 ou 64bits o Office) ?

    c- Precisa ver se  o Win 7 é de 32 ou 64 bits.

    d- esse sistema, quem desenvolveu o mesmo, está por perto de ti ?

    e- precisa ver se não está a faltar alguma referencia dentro do VBA.

    f- precisa ver em qual porta esta sendo feita a comunicação ( Com1, Com2 ) e se está ativa no WIn 7

    Bom, se tiver mais alguma coisa....eu posto aqui.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    Rbmartins
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 4
    Registrado : 17/06/2015

    Obrigada ahteixeira

    Mensagem  Rbmartins em Qui 18 Jun 2015, 09:16

    Muito obrigada pela ajuda.

    Rbmartins
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 4
    Registrado : 17/06/2015

    Vamos lá as respostas Sílvio :)!

    Mensagem  Rbmartins em Qui 18 Jun 2015, 09:28

    Sim o update foi no SO e no Office também.
    Quem programou não está perto de mim, apenas recebi o ficheiro em excel e através daí vejo o código VB das macros.
    Vou confirmar qual versão do Office e do Win7 está sendo utilizada e ver se poderá ser uma questão de compatibilidade com o equipamento.
    Agradeço desde já a vossa disponibilidade, entretanto se conseguir resolver tb posto aqui pois poderá ajudar mais pessoas
    Smile!
    Mais uma vez obrigada Sílvio!

      Data/hora atual: Seg 21 Ago 2017, 17:05