Quelqu'un qui connait access 2007

robyseb Messages postés 143 Statut Membre -  
robyseb Messages postés 143 Statut Membre -
Bonjour,
Je recherche quelqu'un qui si connait en access 2007 j'ai vraiment besoin d'aide

A voir également:

3 réponses

qmike549
 
bonjour
oui
mais quel est le souci
et quel est ton projet et quelles sont tes difficultés
1
robyseb Messages postés 143 Statut Membre 3
 
Voici 2 post que j'avait créer si tu veut on pourra continuer sur ceux-ci

https://forums.commentcamarche.net/forum/affich-21872096-requete-mise-a-jour-access-2007#p21872096

et

Merci beaucoup d'avance ... 3 jours et mon problème n'est pas réglé encore ouffff

https://forums.commentcamarche.net/forum/affich-21855767-access-2007-formule-dlook#p21864767
0
robyseb Messages postés 143 Statut Membre 3
 
j'ai travailler sur se code ce soir dit moi ce que tu en pense !!

Private Sub Commande42_Click()
Dim ID As Integer
ID = Me.relieaintervention

DoCmd.Hourglass (hourglasson)

DoCmd.GoToControl [Prénom]
If Not IsNull(Me.Prénom) Then
Prenom.SelStart = 0
Prenom.sellengh = Len(Me.Prénom)
DoCmd.RunCommand acCmdCopy
End If

DoCmd.OpenTable "interventions"
Table!interventions!ID.SetFocus
DoCmd.FindRecord ID
If Not IsNull(Me.Prénom) Then
DoCmd.RunCommand acCmdPaste
DoCmd.Close acTable, "interventions"
End If
DoCmd.OpenForm "nouveau patient"

DoCmd.GoToControl [Nom]
If Not IsNull(Me.Nom) Then
Nom.SelStart = 0
Nom.sellengh = Len(Me.Nom)
DoCmd.RunCommand acCmdCopy
End If

DoCmd.OpenTable "interventions"
Table!interventions!ID.SetFocus
DoCmd.FindRecord ID
If Not IsNull(Me.Nom) Then
DoCmd.RunCommand acCmdPaste
DoCmd.Close acTable, "interventions"
End If
DoCmd.Hourglass (hourglassoff)

End Sub
0