[VBA] parametr procedury ByVal

Jak zmodyfikować obiekt O w procedurze, w której jest on przekazywany jako ByVal?
Nie można zmienić definicji funkcji. (wiem, że ByRef rozwiązałby problem, ale musi zostać ByVal)

Private Sub Nazwa(ByVal O As Object)

• ... tutaj modyfikacja obiektu O ...*
  End Sub

Da się wymusić byval, ale byref nie, dlaczego musi zostać definicja?

W jaki sposób można wymusić ByVal?

Nie jest to moja procedura tylko jest to procedura systemowa i nie można jej zmodyfikować.

Wymusić byval mozna przez przekazanie parametru w nawiasie:

nazwa (zmienna)
' przy wielu parametrach
nazwa (z1),(z2)

No to chyba nie poradzisz