Consulting

Results 1 to 5 of 5

Thread: Add-ins don't work

  1. #1
    VBAX Newbie
    Joined
    May 2017
    Posts
    3
    Location

    Add-ins don't work

    Hello.

    I got a problem with two add-ins on Microsoft Excel 2013 x86.

    I receive the next messages when i try load them:


    Add-in number 1:

    Sin título.jpg


    Add-in number 2:

    Sin título2.jpg


    I know how to discover the add-in code (Visual Basic: Alt+11), but i'm not the programmer , so i can't understand the lines.

    Sin título3.jpg


    Can someone help me with this issue? I have no idea. Apparentely, the add-ins are in the right path.

    Thanks.

  2. #2
    Are these publicly available add-ins?
    Regards,

    Jan Karel Pieterse
    Excel MVP jkp-ads.com

  3. #3
    VBAX Newbie
    Joined
    May 2017
    Posts
    3
    Location
    No, i'm in a company. Old add-ins connects with a program. I have extracted the part of the code which process the error:

    ___________________________________________________________________________ ________________________

    Public Sub VentanaInicio()
    Dim i As Long
    Dim RutaIni As String
    Dim UtilesComunes As ****UtilidadesComunes.Utilidades
    Dim ObjUtiles As Object

    On Local Error GoTo ControlError

    Set UtilesComunes = New ****UtilidadesComunes.Utilidades
    Set ObjUtiles = CreateObject("****_Util.utiles")
    RutaIni = ObjUtiles.GetReg("HKEY_LOCAL_MACHINE\SOFTWARE\****\****_Tesoreria", "RutaAplicacion")

    RutaBD = UtilesComunes.GetProfile(RutaIni & "\cmt.ini", "BaseDa******vidor", "RutaBDServer", "")
    RutaBDTT = UtilesComunes.GetProfile(RutaIni & "\cmt.ini", "BDTAyATesoreria", "RutaBDTT", "")
    InformeProceso = UtilesComunes.GetProfile(RutaIni & "\cmt.ini", "BaseDa******vidor", "InformeProceso", "")
    Set ObjUtiles = Nothing
    Load Ficha
    Ficha.Show
    Set UtilesComunes = Nothing
    Exit Sub
    ControlError:
    MsgBox "Error Nș: " & Err.Number & ", " & Err.Description, vbCritical

    End Sub

    ___________________________________________________________________________ __________________________

    HKEY_LOCAL_MACHINE\SOFTWARE\****\****_Tesoreria doesn't exist.

    MsgBox "Error Nș: " & Err.Number & ", " & Err.Description, vbCritical is the dialog which appears on the screen.

    **** is a word which i prefer don't show on forums.

  4. #4
    The error message means that the VBA code is looking for a certain key in your computer's registry, but is unable to find that key. But this is a different error than the one you showed us in your first post?
    Regards,

    Jan Karel Pieterse
    Excel MVP jkp-ads.com

  5. #5
    VBAX Newbie
    Joined
    May 2017
    Posts
    3
    Location
    Actually, the error for all add-ins is this:

    Sin título.jpg

    I think as you, it must fails because that key register is missing. Really, I can't think another reason. Maybe, i should try to make the key register, althought the content would be wrong and watch that happens.

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •