La meme valeur dans un champ sur plusieurs lignes

[JeanduB]

Bjr,

Dans une base de donnees access, je voudrais mettre la meme valeur ds un champ sur plusieurs lignes. Par exple dans les lignes 1 a 33, je voudrais mettre camenbert ds le champ produit, dans les lignes 34 a 123, je voudrais mettre Langouste ds le champ produit. Que faire ?

[LE VIEUX]

bonsoir
vois fonction Select Case

[mout1234]

Bonjour,

Envoyé par JeanduB

Bjr,

Dans une base de donnees access, je voudrais mettre la meme valeur ds un champ sur plusieurs lignes. Par exple dans les lignes 1 a 33, je voudrais mettre camenbert ds le champ produit, dans les lignes 34 a 123, je voudrais mettre Langouste ds le champ produit. Que faire ?

Précises un peu ton objectif STP: tu veux faire une mise à jour? tu veux le faire une fois ?

Envoyé par LE VIEUX

bonsoir
vois fonction Select Case

Pour autant que je sache, le CASE est une syntaxe non reconnue sous ACCESS.
Dans le même esprit, on peut s'en sortir avec des IIF...


Bon courage

[JeanduB]

Je voudrais le faire une fois.

[LE VIEUX]

Select Case est bien une fonction VBA supportée par Access
je l'utilise assez fréquemment
dans le cas précis le code serait :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Commande4_Click()
 
Select Case N°
Case 1 To 33
Produit.Value = "Camenbert"
Case 34 To 123
Produit.Value = "Langouste"
Case Else
Produit.Value = "Divers"
End Select
 
 
End Sub

a adapter bien sur N° peut être un Num auto
a mettre dans le cadre d'un recordset probablement tout dépend a quel niveau en est la table support

[JeanduB]

Merci,

On n inclut pas le nom de la table ?

[JeanduB]

J aimerais l executer a l aide d une macro, que faire ?

[mout1234]

Envoyé par LE VIEUX

Select Case est bien une fonction VBA supportée par Access

Désolé LE VIEUX, je croyais que tu parlais d'un CASE en SQL, comme sous SQL Server.

JeanduB, s'il s'agit de l'exécuter une seule fois, pourquoi te casser la tête à le coder: tu ouvres la table en direct, tu fais un filtre pour ne sélectionner que les lignes de 1 à 33, et tu fais un Edition Remplacer....

Sinon, pour revenir à ma proposition initiale, par le biais d'une expression combinant des IIF, tu peux sans doute le faire dans une requête Mise à jour.
Quelque chose du genre

Code :

1
2
 
UPDATE MaTable SET Produit =IIF(No>=1 AND No<=33,"Camembert",IIF(No<=123,"Langouste","Autre"))

[LE VIEUX]

no problème mout1234 - il me semblait bien, forcément, qu'on était pas sur la même longueur d'onde - moi-même je n'avais pas pensé au CASE SQL
Le problème pour aider notre ami c'est que je ne sais pas où il en est du remplissage de sa table -
à JeanduB où en est-tu du remplissage de ta table?
est-elle vide - si non que fait-on des enregistrements des autres champs
as tu un formulaire basé sur elle ?
pour la macro je ne te conseille pas trop de les utiliser "mais ça n'engage que moi !" il vaut mieux SQL a travers les Requêtes et/ou VBA
ent fait pour répondre à ta question il faudra effectivement faire, à un moment donné, référence à ta table
soit il y a déjà des enregistrements et effectivement on peut traiter le problème facilement par une requête filtrée où du recordset avec selectCase- soit elle est vide et il faut voir comment la remplir avec les conditions, le SelectCase ne servant qu'à remplir ces dernieres il se retrouvera au milieu d'un recordset probablement.