У меня есть интересная проблема, в которой я пытаюсь задействовать петлевый диапазон, и перед циклом к следующей точке данных он сохраняет копию рабочего листа. У кого-нибудь есть опыт, когда я пытаюсь внести изменения, это вызывает проблемы с моим оператором Next в нижней части кода.
'' 'Sub Excel1 ()
Dim rngLoopRange As Range Dim wsSummary As Worksheet Dim rngDealers As Worksheet
Установить wsSummary = Sheets ("PL")
для каждого rngLoopRange в рабочих листах ("AUX"). Диапазон ("A1: A38") wsSummary. Range ("C12"). Значение = rngLoopRange.Value
Application.Run "TM1REFRESH"
Dim wb As Workbook
Set wb = Workbooks.Add
wb.SaveAs ThisWorkbook.Path & "\" & Range("C12")
ws.Copy before = wb.Worksheets(1)
Далее rngLoopRange
Установить wsSummary = Nothing
MsgBox "Complete!", vbInformation
End Sub '' '*