Vba réalisation
Résolu/Fermé
bckflow
Messages postés
444
Date d'inscription
mercredi 7 janvier 2009
Statut
Membre
Dernière intervention
30 octobre 2021
-
24 juil. 2009 à 10:41
bckflow Messages postés 444 Date d'inscription mercredi 7 janvier 2009 Statut Membre Dernière intervention 30 octobre 2021 - 30 juil. 2009 à 13:51
bckflow Messages postés 444 Date d'inscription mercredi 7 janvier 2009 Statut Membre Dernière intervention 30 octobre 2021 - 30 juil. 2009 à 13:51
Bonjour,
Je souhaiterai réaliser un module access qui m'afficherait les enregistrements (qui correspondes dans deux tables différentes) dans un tableau access.
Quelqu'un aurait il une idée? Tout conseil de votre part étant bien évidemment le bien venu.
Je souhaiterai réaliser un module access qui m'afficherait les enregistrements (qui correspondes dans deux tables différentes) dans un tableau access.
Quelqu'un aurait il une idée? Tout conseil de votre part étant bien évidemment le bien venu.
91 réponses
jjsteing
Messages postés
1670
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
181
29 juil. 2009 à 16:13
29 juil. 2009 à 16:13
c'est un des premier appel quand tu charge (ou recharge) un formulaire .. c'est la dedans que je met le code pour vérifier les données (cf la bd d exemple)
bckflow
Messages postés
444
Date d'inscription
mercredi 7 janvier 2009
Statut
Membre
Dernière intervention
30 octobre 2021
7
29 juil. 2009 à 16:15
29 juil. 2009 à 16:15
Ok c'est bon, j'ai capté;)
bckflow
Messages postés
444
Date d'inscription
mercredi 7 janvier 2009
Statut
Membre
Dernière intervention
30 octobre 2021
7
30 juil. 2009 à 09:39
30 juil. 2009 à 09:39
Argh! j'uis un peu dans une impasse pour les requètes que tu m'a envoyées...C'est chiant d'être un noobie :(
En fait j'ai repris l'formulaire depuis que tu m'a envoyé bd1, et là actuellement j'essaye de trouver comment incorporer ce que tu m'a donné dans le formulaire... Dsl de cette incompétence.
En fait j'ai repris l'formulaire depuis que tu m'a envoyé bd1, et là actuellement j'essaye de trouver comment incorporer ce que tu m'a donné dans le formulaire... Dsl de cette incompétence.
jjsteing
Messages postés
1670
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
181
30 juil. 2009 à 10:56
30 juil. 2009 à 10:56
et donc, tu bloque où ?
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
bckflow
Messages postés
444
Date d'inscription
mercredi 7 janvier 2009
Statut
Membre
Dernière intervention
30 octobre 2021
7
30 juil. 2009 à 11:28
30 juil. 2009 à 11:28
Donc, j'ai mon formulaire qui m'affiche bien les enregistrements de mes deux tables les uns en face des autres, ok
Là tu m'a envoyé bd1 avec deux requêtes et un formulaire et deux table, ces requetes ont (ou doivent avoir) pour but de montrer les écarts entres les champs des enregistrement des deux tables et de les afficher en rouge, ok
là tout est ok dans ce qu'il me faut, sauf que...
J'ui une grosse m**** et que j'ai quand même compris que ce que tu m'a donné je doit l'adapter à mon formulaire, mais je ne sais pas comment incorporer ce que tu m'a donné avec ma base de donnée, en clair où mettre les requêtes? doit je créer deux requetes similaire dans ma bd?
Là tu m'a envoyé bd1 avec deux requêtes et un formulaire et deux table, ces requetes ont (ou doivent avoir) pour but de montrer les écarts entres les champs des enregistrement des deux tables et de les afficher en rouge, ok
là tout est ok dans ce qu'il me faut, sauf que...
J'ui une grosse m**** et que j'ai quand même compris que ce que tu m'a donné je doit l'adapter à mon formulaire, mais je ne sais pas comment incorporer ce que tu m'a donné avec ma base de donnée, en clair où mettre les requêtes? doit je créer deux requetes similaire dans ma bd?
jjsteing
Messages postés
1670
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
181
30 juil. 2009 à 11:33
30 juil. 2009 à 11:33
1) les requete que j ai mises sont juste pour te montrer que le formulaire marche avec une reference aux requete et non au table.. donc t'a rien à changer pour ca..
2) Le controle des différence se fait dans la propriete activate du formulaire :
je te recopie ici le code :
Dim NomCtrl1, NomCtrl2, NomCtrlExt As String
Dim NomControle
NomControle = "Requête1"
For Each cCont In Form_Formulaire1.Controls
'MsgBox TypeName(cCont) & " - " & cCont.Name
Select Case TypeName(cCont):
Case "ComboBox"
'ici code combo
Case "TextBox"
'
NomCtrl1 = Left(cCont.Name, InStr(1, cCont.Name, ".") - 1) 'Nom controle avant ex Requête1.N°=> Requête1
NomCtrl2 = Left(NomCtrl1, Len(NomCtrl1) - 1) & "2" 'Nom controle avec 2=> Requête2
NomCtrlExt = Right(cCont.Name, Len(cCont.Name) - InStr(1, cCont.Name, ".") + 1) 'extentetion => .N°
Set cCont2 = Form_Formulaire1.Controls(NomCtrl2 & "" & NomCtrlExt) 'fait reference à Requête2.N°
If NomCtrl1 = NomControle Then 'Si le ctrl s'appele comme ceux qu on cherche .. ici Requête1
If cCont.Value = cCont2.Value Then
cCont.BackColor = 8421631 'met en rouge
cCont.Locked = True 'block
cCont2.BackColor = 8421631 'idem pour ctrl2
cCont2.Locked = True 'block
Else
cCont.BackColor = 16777215 'Transparent
cCont.Locked = False 'deblock
cCont2.BackColor = 16777215
cCont2.Locked = False
End If
End If
'if cCont.Value = cCont
'cCont.Locked = lockctrl
Case "ListBox"
'ici listbox
Case "BalloonCheckBox"
'ici BalloonCheckBox
Case "OptionButton"
'ici OptionButton
End Select
Next
2) Le controle des différence se fait dans la propriete activate du formulaire :
je te recopie ici le code :
Dim NomCtrl1, NomCtrl2, NomCtrlExt As String
Dim NomControle
NomControle = "Requête1"
For Each cCont In Form_Formulaire1.Controls
'MsgBox TypeName(cCont) & " - " & cCont.Name
Select Case TypeName(cCont):
Case "ComboBox"
'ici code combo
Case "TextBox"
'
NomCtrl1 = Left(cCont.Name, InStr(1, cCont.Name, ".") - 1) 'Nom controle avant ex Requête1.N°=> Requête1
NomCtrl2 = Left(NomCtrl1, Len(NomCtrl1) - 1) & "2" 'Nom controle avec 2=> Requête2
NomCtrlExt = Right(cCont.Name, Len(cCont.Name) - InStr(1, cCont.Name, ".") + 1) 'extentetion => .N°
Set cCont2 = Form_Formulaire1.Controls(NomCtrl2 & "" & NomCtrlExt) 'fait reference à Requête2.N°
If NomCtrl1 = NomControle Then 'Si le ctrl s'appele comme ceux qu on cherche .. ici Requête1
If cCont.Value = cCont2.Value Then
cCont.BackColor = 8421631 'met en rouge
cCont.Locked = True 'block
cCont2.BackColor = 8421631 'idem pour ctrl2
cCont2.Locked = True 'block
Else
cCont.BackColor = 16777215 'Transparent
cCont.Locked = False 'deblock
cCont2.BackColor = 16777215
cCont2.Locked = False
End If
End If
'if cCont.Value = cCont
'cCont.Locked = lockctrl
Case "ListBox"
'ici listbox
Case "BalloonCheckBox"
'ici BalloonCheckBox
Case "OptionButton"
'ici OptionButton
End Select
Next
bckflow
Messages postés
444
Date d'inscription
mercredi 7 janvier 2009
Statut
Membre
Dernière intervention
30 octobre 2021
7
30 juil. 2009 à 11:37
30 juil. 2009 à 11:37
Encore merci! j'vais essayé de m'dépatouiller!(un peu d'courage comme dirait rambo)
Juste une dernière chose, où mettre ce code? (je doit creer un nouveau module VB pour ça?)
Merci encore pour ta patience exemplaire!
Juste une dernière chose, où mettre ce code? (je doit creer un nouveau module VB pour ça?)
Merci encore pour ta patience exemplaire!
jjsteing
Messages postés
1670
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
181
30 juil. 2009 à 12:14
30 juil. 2009 à 12:14
Ben faut lire un peu ;)
2) Le controle des différence se fait dans la propriete activate du formulaire :
Et oui, je sais, je suis tres tres tres patient... comme dirais colombo.. ma femme me (le) dit toujours... ;) :p
Allez, vas y rambo.. c'est presque fini :p
2) Le controle des différence se fait dans la propriete activate du formulaire :
Et oui, je sais, je suis tres tres tres patient... comme dirais colombo.. ma femme me (le) dit toujours... ;) :p
Allez, vas y rambo.. c'est presque fini :p
bckflow
Messages postés
444
Date d'inscription
mercredi 7 janvier 2009
Statut
Membre
Dernière intervention
30 octobre 2021
7
30 juil. 2009 à 13:38
30 juil. 2009 à 13:38
:D ok, et cerise sur le gateau, my boss m'a demandé de créer un explicatif word sur tout ce que j'ai fait depuis le début! XD Y sont fous ces patrons!
jjsteing
Messages postés
1670
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
181
30 juil. 2009 à 13:44
30 juil. 2009 à 13:44
ca c'est pour pouvoir refourger le bébé à quelqu'un quand tu partira.. qu il comprenne les méandres tres compliqué de tes manip ;)
un classique :p
Mais bon, comme t'a tout bien suivi et compris (enfin, j espere).. ca devrais pas etre compliqué ;)
Bon, t'as rajouter le code de mon formulaire activate dans le tient?? et ca marche comme tu veux ?
un classique :p
Mais bon, comme t'a tout bien suivi et compris (enfin, j espere).. ca devrais pas etre compliqué ;)
Bon, t'as rajouter le code de mon formulaire activate dans le tient?? et ca marche comme tu veux ?
bckflow
Messages postés
444
Date d'inscription
mercredi 7 janvier 2009
Statut
Membre
Dernière intervention
30 octobre 2021
7
30 juil. 2009 à 13:51
30 juil. 2009 à 13:51
éhéh! Euh...ouai, enfin j'y taf quoi,lol
Nan là ils m'ont demandés de faire l'explicatif en priorité (Oo?? ouai moi aussi j'comprend pas mais bon...)
Mais j'vais y arrivé, pour l'explicatif le prob, c'est qu'il commence au tout tout tout début, jusqu'a la création des enregistrement et tout et tout, et là c'est franchement long, mais bon faut que je procède par étape et que je me rappel de tout ce que j'ai fait,... pas simple!
Nan là ils m'ont demandés de faire l'explicatif en priorité (Oo?? ouai moi aussi j'comprend pas mais bon...)
Mais j'vais y arrivé, pour l'explicatif le prob, c'est qu'il commence au tout tout tout début, jusqu'a la création des enregistrement et tout et tout, et là c'est franchement long, mais bon faut que je procède par étape et que je me rappel de tout ce que j'ai fait,... pas simple!
