Problem getting bet detail

[Bez]

I have an Access databae that is using the COM interface very successfully except that I cannot retrieve a BetDetail object.

Here is my simplified code
Dim Dtl As BettingAssistantCom.BetDetail
Dim Bets
Dim Bet
Bets = ba.getBets
If Not IsEmpty(Bets(0)) Then
For Each Bet In Bets
Debug.Print Bet.Ref
Dtl = ba.getBet(Bet.Ref)
Next
End If

This code crashes on the ba.getBet line
The debug line produces the reference 27514713692
When I checked my Betfair statement which shows bet references the reference appears to be correct with 27514713692

I get Error (91) Object variable or With block variable not set

Any suggestions would be most gratefully received.

[kiint]

I think your problem is that you need to use the Set statement to assign an object to an object.
You should probably Dim your objects accordingly as well.

I don't know if it'll work as I can't test it here but try the following:

Dim Dtl As object
Dim Bets as object
Dim Bet as object
Set Bets = ba.getBets
If Not IsNothing(Bets(0)) Then
For Each Bet In Bets
Debug.Print Bet.Ref
Set Dtl = ba.getBet(Bet.Ref)
Next
End If

[Bez]

Thanks for responding.

I made those changes but still get the same error.

BTW, IsNothing is not a legal statement.

It appears to get the list of bets because it gets the correct ref but the getBet using that ref fails. I even tried assigning the Bet.Ref to a string in case it was a datatype issue but that made no difference either. This driving me nuts.

[Bez]

I have cracked it.

I tried several things but then changed the DIM for the bet detail to DIM Dtl as Betdetail and I'm now getting results.
Many thanks for looking at this for me.

[peleus]

Thanks Bez. This did it for my brother in law too.

changed the DIM for the bet detail to DIM Dtl as Betdetail