Я создал макрос для копирования макроса шаблона столько раз, сколько строк в моей таблице.
Однако я получаю следующую ошибку:
Ошибка 429 Компонент ActiveX не может создать объект.
Он работал нормально, когда я его создал год назад
Часть кода, вызывающая проблему, - это первая строка, начинающаяся с lastcell (см. Код ниже)
Кто-нибудь знает, почему он не работает?
Погуглил ответ, но не смог найти, почему он не работает.
Возможно, это связано с тем, что я создал макрос в более старой офисной версии (2013), тогда я сейчас работаю (2016)
Sub Aanmaaktabbladen()
lastcell = ThisWorkbook.Worksheets("Bonussen").Cells(Rows.Count, 1).End(xlUp).Row
For i = 3 To lastcell
With ThisWorkbook
newname = ThisWorkbook.Worksheets("Bonussen").Cells(i, 1).Value
Set wsVOORBEELD = ActiveSheet
wsVOORBEELD.Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = newname
End With
Next
ThisWorkbook.Worksheets("Bonussen").Activate
ThisWorkbook.Worksheets("Bonussen").Cells(1, 1).Select
End Sub