Discussion :

[Patros]

Bonjour

Je suis un peu néophyte et j'aurai besoin d'aide.

Je voudrai créer et mettre à jour des champs dans un sous-formulaire à partir d'une valeur définie dans un champ du formulaire principal. Concrètement mon formulaire s'appelle "Dposition", mon sous formulaire : "D_position_debit". Mon formulaire principal contient un champ : texte11 qui reçoit une valeur (1 à 6). Je voudrai après avoir cliqué sur un bouton créer autant de ligne que la valeur saisie (1 à 6) dans mon sous-formualire en insérant dans un champ nommé position un numéro de 1 à la valeur saisie.

J'ai écrit le code suivant mais cela ne fonctionne pas

Private Sub Commande10_Click()
On Error GoTo Err_Commande10_Click
Dim nbe As Byte
nbe = Texte11


Form! [Dposition]![D_position_debit]

For i = 1 To nbe
DoCmd.GoToRecord , , acNewRec
Position = i
Next

Exit_Commande10_Click:
Exit Sub

Err_Commande10_Click:
MsgBox Err.Description
Resume Exit_Commande10_Click

End Sub

Merci par avance pour votre aide

[catoucat]

Quelle erreur obtiens-tu? Est-ce que tu as essaye de mettre des "MsgBox nbe" ou "MsgBox "on entre dans le record" & i" pour savoir ou ca bloque? Et a quoi sert le Form! [Dposition]![D_position_debit] au milieu? Pour lui indiquer qu'il doit traiter les champs du sous formulaire uniquement?

[Patros]

Cela bloque sur la ligne Form... et le message d'erreur est : Erreur de compilation, Utilistion incorrecte de la propriété.

En fait j'ai un nombre par exemple 4, dans le champ texte11 de mon formumaire principal. Je récupère ce nombre et je veux créer 4 enregistrements dans mon sous formulaire en insérant un numéro de 1 à 4 ici dans le champ position du sous formulaire.

Le code : Form! [Dposition]![D_position_debit] a pour but de passer dans le sous formualire pour créer ces enregistrements.

J'espère avoir été un peu plus clair !

[thb74]

Peut etre rajoute apres Docmd :
Form! [Dposition]![D_position_debit]!Position.value=I