[_NewEnum] et déboggage global
Bonjour,
J'ignorais jusqu'à aujourd'hui qu'il était possible de compiler tout le code VBA à la différence de la compilation "on-the-fly" avec Options / Compile / Compile on Demand décoché.
Néanmoins, je me rends compte que ça bloque notamment sur la "pseudo-méthode" [_NewEnum] des classes itérables.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
| Private pCollection As New Collection
'
Public Function NewEnum() As IUnknown
Attribute NewEnum.VB_UserMemId = -4
Attribute NewEnum.VB_MemberFlags = "40"
Set NewEnum = pCollection.[_NewEnum] 'bloque à la compilation
End Function
'
Private Sub Class_Initialize()
Set pCollection = New Collection
End Sub
'
Private Sub Class_Terminate()
Set pCollection = Nothing
End Sub |
Est-ce possible passer outre ce blocage pour poursuivre le débug de l'ensemble du code ?
Merci par avance ! ;)
