Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access conflit de code

conflit de code

7 réponses
Avatar
tonio
Bonjour,


Private Sub Cmb_Search_AfterUpdate()
Me.RecordsetClone.FindFirst "NUM = " & Me!Search.Column(3)
Me.Bookmark = Me.RecordsetClone.Bookmark
End Sub

Ceci fonctionne trés bien

Private Sub Btn_Copy_File_Click()
On Error GoTo Err_Btn_Copy_File_Click


DoCmd.GoToRecord , , acNewRec
DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70 'Paste Append

Exit_Btn_Copy_File_Click:
Exit Sub

Err_Btn_Copy_File_Click:
MsgBox Err.Description
Resume Exit_Btn_Copy_File_Click

End Sub

Cela aussi

Mais les 2 associés le deuxième me génére une erreur et pointe sur la première

Que ce pass-t-il?

Merci

--
Tonio
Me.[Débutant]=Null
;-);-);-)
Signaler un problème avec ce contenu

7 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
3stone
Salut,

"tonio"
|
|
| Ceci fonctionne trés bien
|
|
| Cela aussi
|
| Mais les 2 associés le deuxième me génére une erreur et pointe sur la première
|
| Que ce pass-t-il?




Que cherche tu a faire ??


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
tonio
3stone a écrit dans son message <# :
Salut,
Salut,

"tonio"


Ceci fonctionne trés bien


Cela aussi

Mais les 2 associés le deuxième me génére une erreur et pointe sur la
première

Que ce pass-t-il?






Que cherche tu a faire ??


J'ai une liste déroulante qui me permet de faire une recherche sur un client de
ma base et lorsque je clic dessus sa fiche apparait (la zone recherche est dans
l'en-tête de mon formulaire)

Private Sub Cmb_Search_AfterUpdate()
Me.RecordsetClone.FindFirst "NUM = " & Me!Search.Column(3)
Me.Bookmark = Me.RecordsetClone.Bookmark
End Sub

J'ai un bouton qui me permet de dupliquer la fiche en cours dans une nouvelle.

Private Sub Btn_Copy_File_Click()
On Error GoTo Err_Btn_Copy_File_Click
DoCmd.GoToRecord , , acNewRec
DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70 'Paste Append
Exit_Btn_Copy_File_Click:
Exit Sub
Err_Btn_Copy_File_Click:
MsgBox Err.Description
Resume Exit_Btn_Copy_File_Click
End Sub

C'est pas compliqué. mais y a un blème.


merci d'avance pour le coups de main

--
Tonio
Me.[Débutant]=Null
;-);-);-)


Avatar
3stone
re,

"tonio"
| J'ai une liste déroulante qui me permet de faire une recherche sur un client de
| ma base et lorsque je clic dessus sa fiche apparait (la zone recherche est dans
| l'en-tête de mon formulaire)



Private Sub Cmb_Search_AfterUpdate()
Me.RecordsetClone.FindFirst "NUM = " & Me!Search.Column(3)
Me.Bookmark = Me.RecordsetClone.Bookmark


With DoCmd
.RunCommand acCmdSelectRecord
.RunCommand acCmdCopy
.GoToRecord , , acNewRec
.RunCommand acCmdPaste
End With

End Sub

mais tu auras sûrement un problème avec la clé primaire
ou un champ indexé unique...

Plus souple serait d'utiliser quelque chose comme ceci :
http://mypage.bluewin.ch/w.stucki/Formulaires.htm#Tag


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
tonio
3stone a écrit dans son message :
re,
Re-salut,


Et meric pour ton coup de main mais...


Private Sub Cmb_Search_AfterUpdate()
Me.RecordsetClone.FindFirst "NUM = " & Me!Search.Column(3)
Me.Bookmark = Me.RecordsetClone.Bookmark
la recherche fonctionne


' j'ai mis le code qui suit dans mon Btn_Copy_File_Click
With DoCmd
.RunCommand acCmdSelectRecord
.RunCommand acCmdCopy
.GoToRecord , , acNewRec
.RunCommand acCmdPaste
End With
lors de la copy tout les champs sources sont copiés avec leur nom dans le

premier champs de mon nouvelle enregistement

mais tu auras sûrement un problème avec la clé primaire
ou un champ indexé unique...
j'ai un champs NUM en NumAuto (clé primaire)

Plus souple serait d'utiliser quelque chose comme ceci :
http://mypage.bluewin.ch/w.stucki/Formulaires.htm#Tag
pour quel partie de ma question?

le recherche ou la copie

Encore merci

--
Tonio
Me.[Débutant]=Null
;-);-);-)

Avatar
3stone
re,

"tonio"
[..]
| > Plus souple serait d'utiliser quelque chose comme ceci :
| > http://mypage.bluewin.ch/w.stucki/Formulaires.htm#Tag
| pour quel partie de ma question?
| le recherche ou la copie


Tu es certain d'avoir été lire ??


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
tonio
3stone a écrit dans son message :
re,
re re,

"tonio"
[..]
Plus souple serait d'utiliser quelque chose comme ceci :
http://mypage.bluewin.ch/w.stucki/Formulaires.htm#Tag
pour quel partie de ma question?

le recherche ou la copie




Tu es certain d'avoir été lire ??


En fait je me suis mal exprime.

j'ai bien vue A copier

seulement ce que je veux c'est copié l'enregistrement dans son integralité.

--
Tonio
Me.[Débutant]=Null
;-);-);-)



Avatar
3stone
re,

"tonio"

| j'ai bien vue A copier
|
| seulement ce que je veux c'est copié l'enregistrement dans son integralité.



Production industrielle de doublons ? ;-))

et la clé primaire ?


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/