How to Pass an array of implement(ed) object(s) to a sub/function?

[Aflatoon]

So... UnderScore is the syntax to use with Implemented Classes?

Dim Temp As ProperName 
Temp.NamedData_Name = "Bill"

Yes, if you declare the variable as ProperName. But the point of using Implements is to be able to declare it as NamedData, then access the properties from that interface:

Dim Temp As NamedData
Set Temp = New ProperName
Temp.Name = "Bill"

Thus the OP's original code should have been something like:

Dim ProperNames(10) As NamedData

Sub xMain()
    Dim n                     As Long
    For n = 1 To 10
        Set ProperNames(n) = New ProperName
    Next n
    LoadNamedData ProperNames
End Sub
 
Sub LoadNamedData(oND() As NamedData)
     ' do stuff
End Sub

in order to be able to pass the array.