Recherche:

trouvé en modifiant la ligne en If IsNull(rstType.Fields(0).Value) Then et ça fonctionne !

Petite question... comment intégrer "proprement" dans le code la suppression de la table. Je suppose que...

Mon erreur vient bien de cette partie

Je teste le critère T ou vide. Si je remplace par T ou " " je ne récupère que les enregs avec T, ceux qui sont vides ne s'ajoutent pas... Et le problème c'est...

Ma table est bien effacée avant.

un truc que je ne comprends pas trop et qui pose peut-être problème :

rst2.AddNew
rst2.Fields(0) =...

Désolé de revenir sur ce sujet

Je viens de réadapter le code VBA à ma base de production, et avec le code impossible de copier les enregs dans la TableResultat.
Je ne comprends pas ce qui se...

Bonjour,
Après moultes essais, j'en arrive à la conclusion que la version VBA est plus compréhensible et plus adaptable à mes besoins.
Merci encore pour tes 2 pistes (sql et vba) qui fonctionnent...

Merci encore pour cette autre piste, dès que je sors du train ;) je m'y mets pour essayer de comprendre et d'adapter ton code.

a+

Je suis aussi encore à réfléchir au sujet, et c'est compliqué...
Je vais tester ta piste et je reviendrai donner le résultat
Merci en tout cas pour ton aide..

Effectivement après transposition dans ma base, j'obtiens les mêmes datas pour tous les départements, mais je ne vois pas pourquoi.
La sélection des TOP 4 et TOP 9 est sans doute le problème car ces...

Merci beaucoup pour cette piste prometteuse... je reviendrai pour donner le résultat !
Merci encore

Bonjour, je vous soumets mon problème à propos duquel je ne trouve pas de solution.

J'ai une table qui contient mes enregistrements.
je dois extraire de cette table, tous les jours,
220...

Bonjour, je vous fait part d'un problème. Dans mon entreprise, nous sommes en cours de migration vers Office 2016.
J'ai développé plusieurs applications ACCESS sous 2010, diffusées par copie des...

Bonjour,
J'utilise SharePoint et sa fonctionnalité des liens promus, en affichage "Mosaïques".
Connaissez vous une possibilité pour modifier la taille des carrés ?

Merci d'avance pour vos idées...

Bonjour, j'ai une fonction qui permet de déplacer des messages outlook d'un répertoire à un autre.

J'aimerai que ce code ne fasse le déplacement QUE pour les messages déjà lu, mais je n'arrive pas...

C'est bon j'ai trouvé


Dim oDb As DAO.Database
Dim oRst As DAO.Recordset
'Instancie la base de données
Set oDb = CurrentDb
'Ouvre le curseur retournant tous...

Bonjour, petite question..
Dans une application j'ai un champ de type mémo "remarques" qui permet d'indiquer des commentaires sur un client.
J'ai une table qui contient un ensemble de mots-clés qui...

Super merci c'est exactement ça !!

Le problème si je mets tous les caractères sur une même ligne, je ne pourrai pas choisir la composition du mot de passe comme actuellement, à moins qu'y ait une possibilité que je ne vois pas.

Fred

Bonjour, j'ai un petit souci avec la génération aléatoire de mot de passe que j'ai implémenté dans une de mes applications, il arrive que des mots de passe soient doublonnés, et pourtant, par...

Merci pour cette solution ! ça fonctionne

Fred

bonjour, j'essaie ça et je te tiens au courant

Fred

Bonjour, j'aurai besoin de votre aide pour résoudre le problème suivant.

Dans mon entreprise, je dois gérer des clients à partir de leur identifiant, composé de leur date de naissance (ex :...

Bonjour, j'ai le problème suivant dans une de mes applications. Je dois générer des n°s de souches automatiquement pour chaque joueur.

J'ai une table avec :
champ1 = idjoueur
champ2 = qte de...

Oui je sais c'est pas clair, je reprends...

Moi, j'envoie un mail a partir de ma boite outlook pro sur un prestataire extérieur et ça ...ça marche, le mail sera bien parti de MA boite outlook
...

Merci...je vais effectivement corriger l'écriture des recordset...

Pour en revenir à mon souhait :

Exemple : je suis un utilisateur d'une appli, qui possède une boite mail outlook perso et je...

Je viens de réécrire mon code de manière un peu plus "lisible", mais ça ne change pas le résultat

Private Sub btnGenerationMail_Click()
Dim MonOutlook As Outlook.Application
Dim MonMessage As...