Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 21/12/2010, 01h02   #1
Membre actif
 
Avatar de solaar
 
Homme
Inscription : septembre 2007
Messages : 355
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : Côte d'Ivoire

Informations professionnelles :
Secteur : Industrie

Informations forums :
Inscription : septembre 2007
Messages : 355
Points : 163
Points : 163
Envoyer un message via Yahoo à solaar
Par défaut Faire des modifs sur mon formulaire filtre.

Bonsoir.
j'Ouvre un formulaire pour une modification de mes données en utilisant un filtre et j'arrive pas à faire des modifs.
je vous présente mon code.
Code :
1
2
3
4
 
SEL = "[Code Société]=""" & SOC & """ AND [Code Etablissement]=""" & ETB & """ AND [Code Groupe]=""" & GRP & """ AND [Code Client]=""" & CLT & """ AND [Code Famille]=""" & FAM & """ AND [Code Sous Famille]=""" & SFAM & """ AND [Code Article]=""" & ART & """ AND [Date début]=" & DDBPS & ""
 
DoCmd.OpenForm "Remises Vente - Gestion", acNormal, "", SEL
Merci
solaar est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 21/12/2010, 09h18   #2
Membre Expert
 
Homme Jacques Petiot
Indépendant développeur et formateur
Inscription : octobre 2007
Messages : 891
Détails du profil
Informations personnelles :
Nom : Homme Jacques Petiot
Âge : 51
Localisation : France

Informations professionnelles :
Activité : Indépendant développeur et formateur
Secteur : Conseil

Informations forums :
Inscription : octobre 2007
Messages : 891
Points : 1 333
Points : 1 333
Hello
J'utilise régulièrement ce type de programmation et je n'utilise pas les triples guillements ce qui donne
Code :
1
2
3
SEL = "[Code Société]=" & SOC & " AND [Code Etablissement]=" & ETB & " AND [Code Groupe]=" & GRP & " AND [Code Client]=" & CLT & " AND [Code Famille]=" & FAM & " AND [Code Sous Famille]=" & SFAM & " AND [Code Article]=" & ART & " AND [Date début]=" & DDBPS 
 
DoCmd.OpenForm "Remises Vente - Gestion", , , SEL
De plus, pour la rapidité des opérations, il me semble utile de limiter le filtre aux variables vraiment utilisées: dans le genre:
Code :
If ETB > Then SEL = SEL & " AND [Code Etablissement]=" & ETB "
ainsi de suite.
à la fin, si on a tout sélectionné, on retrouve le même filtre. Mais dans tous les autres cas, il est beaucoup plus court

Note: on peut encore utiliser une petite liste déroulante avec =,<,>,<=,>= ce qui est utile pour les dates
Code :
If  [Date début]>0 Then  SEL = SEL & " AND [Date début]"  & OPé_date & DDBPS
__________________
-------------------Simplifi----------comme si tout était simple--------
Simplifi est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 21/12/2010, 14h29   #3
Membre actif
 
Avatar de solaar
 
Homme
Inscription : septembre 2007
Messages : 355
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : Côte d'Ivoire

Informations professionnelles :
Secteur : Industrie

Informations forums :
Inscription : septembre 2007
Messages : 355
Points : 163
Points : 163
Envoyer un message via Yahoo à solaar
Oké merci pour votre réponse.
Mais je me trouve confronté à un autres problème.
on me met erreur d'expression sur
Code :
SEL = "[Code Société]=" & SOC & " AND [Code Etablissement]=" & ETB & " AND [Code Groupe]=" & GRP & " AND [Code Client]=" & CLT & " AND [Code Famille]=" & FAM & " AND [Code Sous Famille]=" & SFAM & " AND [Code Article]=" & ART & " AND [Date début]=" & DDBPS
Qui est bien juste;
Je voudrais souligner une chose; mon programme tournais avant sur Access 97 et je l'ai simplement mis en 2007.
je constat que l'expression marche bien en Access 97.
Merci.
solaar est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 06h18.


 
 
 
 
Partenaires

Hébergement Web