VBA Compiler - Collection

XLS Padlock
1

An error was thrown at Set pt = New Collection
How can I work around this error?

2

Here is an example that uses the ArrayList class from .net framework. It’s similar to the Collection object.

Sub MyProtectedSub3(Param1)
Dim AL1 As Object
AL1 = CreateObject("System.Collections.ArrayList")
AL1.Add("Test0")
AL1.Add("Test1")
MsgBox(Al1.Item[0])
                  
End Sub

Our VBA compiler can create OLE objects and manipulate them.