VBA ... CurrentRecord ... Problème d'utilisation

Eh bye les gens ...

Alors j'ai fait une petite recherche dans l'aide VB et j'ai trouvé la fonction CurrentRecord qui permet d'avoir le N°de l'enregistrement en cours ...

J'aimerais utiliser le code ci-dessous pour que j'ai un message qui s'affiche dès que j'ouvre mon formulaire ... j'ai essayer de mettre les lignes de code ci-dessous sur l'évènement Form_Load mais cela ne marche pas ...

Comment puis-je faire pour que mon message s'affiche ???

Code:

---

1 2 3 4 5 6 7 8

Sub CurrentFormRecord(frm As Form) Dim lngrecordnum As Long   lngrecordnum = FORM_controle_poids_entree_matiere.CurrentRecord   MsgBox lngrecordnum   End

---

Merci de vos réponses ...

En utilisant DAO :

Code:

---

1 2 3

Sub CurrentFormRecord(frm As Form) MsgBox frm.Recordset.AbsolutePosition End

---

Bien le bonjour Tofalu et merci de ta réponse ...

Je crois que je ne m'y prends pas bien pour faire ce que je veux ... :oops:

En faite, voici ce que j'ai fait :

Code:

---

1 2 3

Private Sub Form_Load() MsgBox FORM_controle_poids_entree_matiere.Recordset.AbsolutePosition End Sub

---

J'aimerais que le MsgBox s'affiche dès que le formulaire est ouvert ... mais cela ne marche malheureusement pas ... j'ai un message d'erreur qui me dit :

Erreur :

Citation:

---

Erreur d'exécution '424'
Objet Requis

---

Qu'est ce que j'ai fait de faux ??? Je ne le vois pas trop ... merci pour vos réponses ...

+++

Cette programmation n'est pas bonne. Il te faut appeler les objets par leur instance et non leur classe.

Ici, l'objet formulaire est : Me C'est à dire le formulaire courant.

Tu fais un gros amalgame entre les objets et leur classe :wink:

Code:

---

1 2 3

Private Sub Form_Load() MsgBox Me.Recordset.AbsolutePosition End Sub

---

Merci Tofalu ... cela marche comme je voulais ... c'est parfait ...

Je vais me renseigner un peu plus sur ce que tu m'as dit c'est à dire sur les objets et leur classe ... Car c'est vrai, je suis un peu dans le floue de tout cela ... en gros, vive la programmation quand on débute ... :)

Merci encore pour ton aide ...

Je n'avais pas remarqué j'ai une question importante quand même ...

Dsl d'avoir fait une fausse joie en cliquant sur le bouton résolu ..

Est ce que c'est nomal que la numérotation de mes enregistrements commence à "0" ???

Merci des réponses ...

oui c'est normal.

La plupart des collections en VBA commence à 0

Ahhh alors pas de soucis à me faire dans l'histoire ...

:D :D

Le problème est donc maintenant et définitivement résolu ... !!!

Merci vraiment pour tout ...

:D