[Formulaire]Recupérer valeur d'une cellule dans un sous formulaire tabulaire

**titof90** · 11/04/2007, 10h22

Bonjour,

J'ai bien regardé la FAQ dans laquelle il est expliqué comment récupérer la valeur d'une cellule dans un formulaire tabulaire.
J'ai essayé le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Private function Cells(Ligne as integer,Colonne as integer) as string
On error goto err
Dim R as dao.recordset
set r=me.recordsetclone
r.movefirst
While Ligne>0
r.movenext
ligne=ligne-1
Wend
Cells=R.fields(Colonne).value
err:
End Function

et j'ai pu accéder a la valeur de mon premier champ comme ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim champ as string
Champ=Cells(0,0)
MsgBox Champ

Cela fonctionne bien.
Cependant mon problème c'est que je voudrais accéder à un sous formulaire et non un formulaire pour ensuite insérer cette valeur dans une requete SQL.

Et la je ne vois pas trop comment faire.

Merci pour votre

**timoth** · 11/04/2007, 12h09

Si c'est pour faire ca, pourquoi ne pas travailler sur excel, la fonction est déja toute faite!
Enfin pourquoi pas.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set R=Forms.Mon_formulaire_principal.Mon_sous_formulaire.form.RecorsetClone

EN esperant repondre a ta question

**titof90** · 11/04/2007, 14h21

Merci pour ta réponse.
Mais en fait c'est un projet sous access et je préfère eviter de faire des liens vers excel a part a la limite pour faire des exports de listes a imprimer.