Bonjour

On peut assigner l'adresse d'une variable à un pointeur à l'aide de VarPtr(). Mais peut-on récupérer la valeur de la variable via son adresse (pointeur) ?
Petit exemple de code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Public Function TestPointeur()
    Dim Ptr As LongPtr, I As Integer
 
    I = 9
    Ptr = VarPtr(I)
 
    'Je voudrais pouvoir changer la valeur de I via le pointeur Ptr (une sorte de VarPtr inverse)
    &Ptr=7  'Ceci ne fonctionne pas
End Function
Merci d'avance