Public Sub Form_Open() Dim pf As New PointF pf.x = "414235.32" Print pf.x End = 1202590843 ??????????????? Je comprend mieux pourquoi je n'avait aucun shapes sur ma carte :-) Le problème est le même en utilisant explicitement cfloat... -- Fabien Bodard