Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

problème code SQL et format de texte

6 réponses
Avatar
Sympatico
Bonjour,=20

avec l'assistant je veux cr=E9er une liste d=E9roulante sur=20
mon formulaire qui me permette d'afficher l'enregistrement=20
choisi.=20

Sans aucun format cela fonctionne :=20
[code]=20
Private Sub Modifiable104_AfterUpdate()=20
' Rechercher l'enregistrement correspondant au contr=F4le.=20
Dim rs As Object=20

Set rs =3D Me.Recordset.Clone=20
rs.FindFirst "[requi_ID] =3D " & Str(Me![Modifiable104])=20
Me.Bookmark =3D rs.Bookmark=20
End Sub=20
[\code]=20

Le probl=E8me est que si je format mon champ, avec @@@.@@@-
@, dans ma table et mon formulaire,=20
=E7a ne marche plus...!!!=20

est-ce que je dois modifier le code ou dois-je renoncer au=20
format ?=20


merci
_________________
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=20
SYMPATICO=20

Gen=E8ve - Suisse=20
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D

6 réponses

Avatar
Pierre CFI [mvp]
bonjour
to champ devient du texte donc des '
rs.FindFirst "[requi_ID] = '" & Str(Me![Modifiable104]) & "'"

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a écrit dans le message de news: 0bc701c3bb32$a620eb40$
Bonjour,

avec l'assistant je veux créer une liste déroulante sur
mon formulaire qui me permette d'afficher l'enregistrement
choisi.

Sans aucun format cela fonctionne :
[code]
Private Sub Modifiable104_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[requi_ID] = " & Str(Me![Modifiable104])
Me.Bookmark = rs.Bookmark
End Sub
[code]

Le problème est que si je format mon champ, avec @@@.@@@-
@, dans ma table et mon formulaire,
ça ne marche plus...!!!

est-ce que je dois modifier le code ou dois-je renoncer au
format ?


merci
_________________
=================== SYMPATICO

Genève - Suisse
====================
Avatar
Sympatico
merci.

mais il n'aime pas le "Str",

j'ai message d'erreur vba "Erreur de compilation, Projet
ou bibliothpue introuvable"


C'est quoi ?
-----Message d'origine-----
bonjour
to champ devient du texte donc des '
rs.FindFirst "[requi_ID] = '" & Str(Me![Modifiable104])
& "'"


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a écrit
dans le message de news: 0bc701c3bb32$a620eb40

$
Bonjour,

avec l'assistant je veux créer une liste déroulante sur
mon formulaire qui me permette d'afficher l'enregistrement
choisi.

Sans aucun format cela fonctionne :
[code]
Private Sub Modifiable104_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[requi_ID] = " & Str(Me![Modifiable104])
Me.Bookmark = rs.Bookmark
End Sub
[code]

Le problème est que si je format mon champ, avec @@@.@@@-
@, dans ma table et mon formulaire,
ça ne marche plus...!!!

est-ce que je dois modifier le code ou dois-je renoncer au
format ?


merci
_________________
====================
SYMPATICO

Genève - Suisse
====================


.



Avatar
Pierre CFI [mvp]
mais attends, ton champ requi_ID est toujours en numérique lui ? si oui, bien évidement il y a erreur

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a écrit dans le message de news: 0b6501c3bb38$f6b6be80$
merci.

mais il n'aime pas le "Str",

j'ai message d'erreur vba "Erreur de compilation, Projet
ou bibliothpue introuvable"


C'est quoi ?
-----Message d'origine-----
bonjour
to champ devient du texte donc des '
rs.FindFirst "[requi_ID] = '" & Str(Me![Modifiable104])
& "'"


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a écrit
dans le message de news: 0bc701c3bb32$a620eb40

$
Bonjour,

avec l'assistant je veux créer une liste déroulante sur
mon formulaire qui me permette d'afficher l'enregistrement
choisi.

Sans aucun format cela fonctionne :
[code]
Private Sub Modifiable104_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[requi_ID] = " & Str(Me![Modifiable104])
Me.Bookmark = rs.Bookmark
End Sub
[code]

Le problème est que si je format mon champ, avec @@@.@@@-
@, dans ma table et mon formulaire,
ça ne marche plus...!!!

est-ce que je dois modifier le code ou dois-je renoncer au
format ?


merci
_________________
=================== >SYMPATICO

Genève - Suisse
=================== >

.



Avatar
Sympatico
oui, il est toujours numérique.

alors , comment puis-je faire ?
-----Message d'origine-----
mais attends, ton champ requi_ID est toujours en
numérique lui ? si oui, bien évidement il y a erreur


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a écrit
dans le message de news: 0b6501c3bb38$f6b6be80

$
merci.

mais il n'aime pas le "Str",

j'ai message d'erreur vba "Erreur de compilation, Projet
ou bibliothpue introuvable"


C'est quoi ?
-----Message d'origine-----
bonjour
to champ devient du texte donc des '
rs.FindFirst "[requi_ID] = '" & Str(Me![Modifiable104])
& "'"


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a écrit
dans le message de news: 0bc701c3bb32$a620eb40

$
Bonjour,

avec l'assistant je veux créer une liste déroulante sur
mon formulaire qui me permette d'afficher
l'enregistrement


choisi.

Sans aucun format cela fonctionne :
[code]
Private Sub Modifiable104_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[requi_ID] = " & Str(Me![Modifiable104])
Me.Bookmark = rs.Bookmark
End Sub
[code]

Le problème est que si je format mon champ, avec @@@.@@@-
@, dans ma table et mon formulaire,
ça ne marche plus...!!!

est-ce que je dois modifier le code ou dois-je renoncer
au


format ?


merci
_________________
====================
SYMPATICO

Genève - Suisse
====================


.




.




Avatar
Pierre CFI [mvp]
ben, c'est de transformer en num le contenu de la liste (l'inverse de str)

rs.FindFirst "[requi_ID] = " & val(Me![Modifiable104])
ou cnum , cdbl ......


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a écrit dans le message de news: 0a6801c3bb3b$9af6dc80$
oui, il est toujours numérique.

alors , comment puis-je faire ?
-----Message d'origine-----
mais attends, ton champ requi_ID est toujours en
numérique lui ? si oui, bien évidement il y a erreur


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a écrit
dans le message de news: 0b6501c3bb38$f6b6be80

$
merci.

mais il n'aime pas le "Str",

j'ai message d'erreur vba "Erreur de compilation, Projet
ou bibliothpue introuvable"


C'est quoi ?
-----Message d'origine-----
bonjour
to champ devient du texte donc des '
rs.FindFirst "[requi_ID] = '" & Str(Me![Modifiable104])
& "'"


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a écrit
dans le message de news: 0bc701c3bb32$a620eb40

$
Bonjour,

avec l'assistant je veux créer une liste déroulante sur
mon formulaire qui me permette d'afficher
l'enregistrement


choisi.

Sans aucun format cela fonctionne :
[code]
Private Sub Modifiable104_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[requi_ID] = " & Str(Me![Modifiable104])
Me.Bookmark = rs.Bookmark
End Sub
[code]

Le problème est que si je format mon champ, avec @@@.@@@-
@, dans ma table et mon formulaire,
ça ne marche plus...!!!

est-ce que je dois modifier le code ou dois-je renoncer
au


format ?


merci
_________________
=================== >>SYMPATICO

Genève - Suisse
=================== >>

.




.




Avatar
Sympatico
...Ca marche pas

j'ai convertit en texte [requi_ID] et avec Str ca marche
pas.

j'ai également essayé en numérique et avec val, lng ou
d'autres ca marche pas non plus,

....je continue à chercher...
-----Message d'origine-----
ben, c'est de transformer en num le contenu de la liste
(l'inverse de str)


rs.FindFirst "[requi_ID] = " & val(Me![Modifiable104])
ou cnum , cdbl ......


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a écrit
dans le message de news: 0a6801c3bb3b$9af6dc80

$
oui, il est toujours numérique.

alors , comment puis-je faire ?
-----Message d'origine-----
mais attends, ton champ requi_ID est toujours en
numérique lui ? si oui, bien évidement il y a erreur


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a écrit
dans le message de news: 0b6501c3bb38$f6b6be80

$
merci.

mais il n'aime pas le "Str",

j'ai message d'erreur vba "Erreur de compilation, Projet
ou bibliothpue introuvable"


C'est quoi ?
-----Message d'origine-----
bonjour
to champ devient du texte donc des '
rs.FindFirst "[requi_ID] = '" & Str(Me![Modifiable104])
& "'"


--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"Sympatico" a
écrit



dans le message de news: 0bc701c3bb32$a620eb40
$
Bonjour,

avec l'assistant je veux créer une liste déroulante sur
mon formulaire qui me permette d'afficher
l'enregistrement


choisi.

Sans aucun format cela fonctionne :
[code]
Private Sub Modifiable104_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[requi_ID] = " & Str(Me![Modifiable104])
Me.Bookmark = rs.Bookmark
End Sub
[code]

Le problème est que si je format mon champ, avec
@@@.@@@-



@, dans ma table et mon formulaire,
ça ne marche plus...!!!

est-ce que je dois modifier le code ou dois-je renoncer
au


format ?


merci
_________________
====================
SYMPATICO

Genève - Suisse
====================


.




.




.