Recherche:

Ou


monDoc = ThisComponent
unForm = monDoc.DrawPAge.Forms.getByName("Form1")
valCtrl = unForm.getByName("Controle")
val = valCtrl.getByName("Champ")

@+.

Avec quelque chose comme cela :

oForm = oEv.Source.Model.Parent
valChamp = oForm.getbyname("Champ1").CurrentValue

@+.

Je ne comprends pas, où se trouve ton champ : dans un formulaire, dans une table, etc.

@+.

Si ton répertoire est toujours le même, il te suffit de faire :


Sub test
dim val as string
val = "home/felix/Images/2013/11/08/IMGP0995.JPG"
val =...

Salut,

Voici une fonction qui te permettra de faire ce que tu veux :

Sub test
dim val as string
val = "home/felix/Images/2013/11/08/IMGP0995.JPG"
msgbox getChemin(val)
End Sub