Спасибо всем, кто отвечает на вопросы здесь. Я использую этот сайт все время. Я не обучен официально, но собрал некоторые вещи в прошлом. Вот что выполняет мой Кодекс. У меня есть файл Excel с поддержкой макросов, который я храню в SharePoint. Мои пользователи редактируют Excel и запускают макрос, который сохраняет их изменения в CSV-файл, который мы используем для импорта в JIRA. Я был в состоянии создать макрос, чтобы сделать все это, и он прекрасно работает, когда я его использовал. Но когда другие члены моей группы используют его, они получают ошибку «Не удается выполнить в режиме прерывания». Я думаю, что мне не хватает некоторого проверочного кода, но я не уверен, как этого добиться. Любая помощь будет принята с благодарностью! Я так близко !!
'''
Sub Save_CSV_Debugger()
Dim ws As Worksheet
Set ws = ActiveWorkbook.Sheets("Sheet1")
'Makes a copy of the Worksheet
ws.Copy
'Creates New FileName - Concatenates username and Desktop path with for
New Name
NewName = Environ("USERPROFILE") & "\Desktop\" & Range("A2").Value & " -
JIRA Import" & ".CSV"
Application.DisplayAlerts = False
'Saves WB with NewFileName
ActiveWorkbook.SaveAs Filename:=NewName, _
FileFormat:=xlCSV, CreateBackup:=False
Application.DisplayAlerts = True
'Hides saves dialog
If SaveAsUI = True Then Cancel = True
' Shows user a message
MsgBox "File saved to Desktop for JIRA Import " & vbNewLine & NewName
ActiveWorkbook.Close
'Reopens CSV File Without Macro - Clean CSV
Application.Workbooks.Open (NewName)
End Sub
'''