OVH Cloud OVH Cloud

Tester une valeur

4 réponses
Avatar
Shewy du 80 !!
Bonjour

Je cherche une fonction en VBA, qui me permettrais de rechercher dans une
table, une valeur, correspond en fait à la clé primaire.

En effet, je pilote depuis Excel, les tables Access, mais pour l'ajout d'une
nouvelle valeur, je dois tester, que l'indice n'est pas déjà atribué et kil
est strictmt supérieur au dernier .

Comment faire ??

4 réponses

Avatar
www.eztree-msdn.com \( Laurent Jordi \)
Salut

Les règles de l'art voudraient que tu utilise une clef autoincrémentée...
mais il est possible que les n° générés ne se suivent plus si tu détruits un
enreg...

Tu peux egalemetn utiliser une petite requête
Select max(MaClef)+1 from MaTable
pour trouver le prochain indexe.

@+

LJ
www.eztree-msdn.com




"Shewy du 80 !!" <not> a écrit dans le message de
news:
Bonjour

Je cherche une fonction en VBA, qui me permettrais de rechercher dans une
table, une valeur, correspond en fait à la clé primaire.

En effet, je pilote depuis Excel, les tables Access, mais pour l'ajout
d'une

nouvelle valeur, je dois tester, que l'indice n'est pas déjà atribué et
kil

est strictmt supérieur au dernier .

Comment faire ??




Avatar
Raymond [mvp]
Bonjour.

Tu peux utiliser la fonction DMax qui te ramènera la valeur maxi:

numéro = DMax("Numéro", "table") +1

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Shewy du 80 !!" <not> a écrit dans le message de
news:
Bonjour

Je cherche une fonction en VBA, qui me permettrais de rechercher dans une
table, une valeur, correspond en fait à la clé primaire.

En effet, je pilote depuis Excel, les tables Access, mais pour l'ajout
d'une

nouvelle valeur, je dois tester, que l'indice n'est pas déjà atribué et
kil

est strictmt supérieur au dernier .

Comment faire ??




Avatar
Shewy du 80 !!
si j'utilise une cle autoincrémenté, Excel me provoque un plantage lorsque
j'essai d'ajouter une valeur

En fait, je contourne le pb en obligeant à saisir l'index ... mais de ce
fait il me faut tester la valeur


"www.eztree-msdn.com ( Laurent Jordi )" a écrit dans le
message de news:
Salut

Les règles de l'art voudraient que tu utilise une clef autoincrémentée...
mais il est possible que les n° générés ne se suivent plus si tu détruits
un

enreg...

Tu peux egalemetn utiliser une petite requête
Select max(MaClef)+1 from MaTable
pour trouver le prochain indexe.

@+

LJ
www.eztree-msdn.com




"Shewy du 80 !!" <not> a écrit dans le message de
news:
Bonjour

Je cherche une fonction en VBA, qui me permettrais de rechercher dans
une


table, une valeur, correspond en fait à la clé primaire.

En effet, je pilote depuis Excel, les tables Access, mais pour l'ajout
d'une

nouvelle valeur, je dois tester, que l'indice n'est pas déjà atribué et
kil

est strictmt supérieur au dernier .

Comment faire ??








Avatar
Shewy du 80 !!
j'arrive pas à mettre en aplication cette fonction.

J'ai pas préciser que je suis sous Excel, en VBA dans un userform.

Voici ma fonction:
---------------------------------------------------------------------
Private Sub testINDEX_Click()

sql = "select * from Clients"

numéro = "select dmax(Index) * from Clients"

MsgBox numéro

End Sub
--------------------------------------------------------------------------
sachant que :
'Pour le chemin de la base
Public db As Database

'Pour les tables à lire dans la base
Public rs As Recordset

'Pour les chaines sql
Public sql As String

à l'init du UserFOrm
Set db = OpenDatabase("C:bd1.mdb")
----------------------------------------------------------------------------
--------------


"Raymond [mvp]" a écrit dans le message de
news:
Bonjour.

Tu peux utiliser la fonction DMax qui te ramènera la valeur maxi:

numéro = DMax("Numéro", "table") +1

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Shewy du 80 !!" <not> a écrit dans le message de
news:
Bonjour

Je cherche une fonction en VBA, qui me permettrais de rechercher dans
une


table, une valeur, correspond en fait à la clé primaire.

En effet, je pilote depuis Excel, les tables Access, mais pour l'ajout
d'une

nouvelle valeur, je dois tester, que l'indice n'est pas déjà atribué et
kil

est strictmt supérieur au dernier .

Comment faire ??