Unless I'm missing something, you're trying to set an unitialised array of
longs equal to an object :

Dim result As Object
Dim aResults() As Long

Set result = API.AddCampaigns(AccountID, var)
aResults = result

NickHK

"Okiebug" wrote in message
...
I am having issues after upgrading the VB.NET to use .NET 2 as needed per
a
Web Service.
I am having problems with the return variable from the VB.NET to the VBA
code:

VBA invoked from Excel:
<code

Public Sub MSNAddTemplateCampaigns(ByVal AccountID As Long, ByRef
MonthlyBudget As Long)

Dim API As New ADcenter.API

Dim result As Object

Dim Row As Integer

Dim aResults() As Long

Dim Campaigns() As ADcenter.AdCenterCampaign

Dim var As Variant



Dim sheet As Worksheet