Приложение Visual basi c, написанное для файлов Jira и Excel, сообщение об ошибке - PullRequest
Новая
       37

Приложение Visual basi c, написанное для файлов Jira и Excel, сообщение об ошибке

0 голосов
/ 07 мая 2020

у нас есть импортер для Jira, который импортирует проекты и настраивает их. Я не писал код сам, и по нему нет абсолютно никакой технической документации.

Через несколько дней go он начал показывать сообщение об ошибке

Я проверил каталог и права доступа к файлам и все остальное, но он все еще не работает. Другое дело, что он не работает только на одного человека. Есть у кого-нибудь идеи? 

 Public Sub getValuesFromFile()

    ' if the property excelDefaultValues has already values in it break this sub
    If excelDefaultValues.Count > 0 Then
        Exit Sub
    End If

    ' Definitions
    Dim ExcelFolder As String
    Dim selectedfile As String
    Dim excel As Application
    Dim workbook As Workbook
    Dim sheet As Worksheet
    Dim column As Integer = 0
    Dim row As Integer = 0

    ' Define the location and name of the default values file
    ExcelFolder = "R:\PM\01_Team\01_Allgemein\07_Jira_Importer\Masterfile"
    selectedfile = ExcelFolder & "\" & "DefaultValues.xlsx"

    ' try to open excel and the file
    Try
        excel = New Application
        excel.DisplayAlerts = False
        excel.Workbooks.Open(selectedfile)
        workbook = excel.ActiveWorkbook
        sheet = workbook.Worksheets(1)

        ' fails if the file does not exist, open a message box.
    Catch

        MsgBox("file template not found! please make sure that the file is in this directory:" & vbCrLf & selectedfile, MsgBoxStyle.OkOnly, "warning!")

        Exit Sub

    End Try
...