Event 'Querydragdrop' wird 2x ausgeführt

[v_haderer]

Hallo Zusammen,
ich habe gerade das Querydragdrop-Event einer Kalenderansicht anprogrammiert - leider wird
dieses Event beim Drag&Drop ständig 2x aufgerufen, egal wieviele Dokumente gerade markiert sind.

Heißt..

Sub Querydragdrop(Source As Notesuiview, Continue As Variant)   
   Messagebox source.ViewAlias     ' > ich messageboxe 2x hintereinander   
End Sub

Ich wäre sehr dankbar wenn mir jemand sagen könnte warum dieser Code 2x ausgeführt wird  - THX
lg
V