Donc, j'ai une table: tblCommissions qui contient N° (numéroAuto) DateAchat (Date/heure) - magasin (texte) - Articles (Texte) - PrixUnit (euro) Qté (numérique) - TotArticle (calculé: PrixUnit * Qté) L'autre table tblArticlesEtPrix Articles (texte) - PrixUnit(euro) J'aimerais copier les articles et leur PrixUnit du formulaire frmCommissions basé sur la tablepar Guy Falesse - Access
Salut Jean, Merci pour ta réponse. Ne te tracasse pas, je vais chercher une autre voie. Genre pourquoi faire simple lorsqu'on peut faire compliqué.:< @+ Guy FALESSEpar Guy Falesse - Access
Salut Jean, merci pour ta réponse. Je pense avoir écrit une bêtise. Enfin... J'ai une table: tblCommissions elle contient: N° (clé) DateAchat: date - Magasin - Articles - PrixUnit (euro) - Qté (numérique) TotArticles (PrixUnit)*Qté (euro) Le champ (liste déroulante) article est basé sur la table tblArticlesEtPrixUnit ainsi que le champ (liste déroulante) PrixUnit Le cpar Guy Falesse - Access
Liaison d'une colonne (la 2ème) d'une table à 2 colonnes, sachant que la 2ème est du type numérique (euro) Je n'y arrive pas, on me rejette tout le temps Merci d'avance Guy FALESSEpar Guy Falesse - Access
Salut DenisS, Merci pour ta réponse. Là, je vais regarder à cela, mais pas de suite, j'ai encore du boulot à terminer. Je vais encore jeter un œil dans le bouquin d'Hervé, l'essentiel devrait s'y trouver. Bon W-E Guy FALESSEpar Guy Falesse - Access
Bonjour, J'ai trouvé (merci le bouquin d'Hervé) une manière de faire en utilisant les outils d'Access. Dans formulaire, on clique sur le champ "dateAchat" (pour le sélectionner) ensuite, on clique sur le bouton Filtre situé sur la barre du haut, on a alors une liste de données qui s'ouvre, on clique sur filtres de date, on a un box qu demande choisir une date et onpar Guy Falesse - Access
DenisS écrivait: ------------------------------------------------------- > En cliquant sur la petite flèche, à la droite de > la colonne ? Salut DenisS, Merci pour ta réponse, mais je me suis mal exprimé: En fait, j'ai un formulaire qui contient un champ article et un champ dateAchat, je voudrais pouvoir trier les articles en fonction de la date affichée, j'aurais auspar Guy Falesse - Access
Bonjour, Je recherche la possibilité de trier un formulaire selon un champ date Je n'arrive plus à le faire :-( D'avance mercipar Guy Falesse - Access
Salut Hervé, Finalement, on début de la fonction, j'ai une autre fonction qui copie la date du jour dans une table consultation. Ainsi, lorsqu'on revient dans la date du jour, le chemin a comme date, la date de consultation qui elle, contient la date du jour, on n'a plus de problème. Il suffit ensuite de changer la date système via la feuille timeData.cpl et le tours est joué.par Guy Falesse - Visual Basic
Salut Hervé, J'ai ce module, mais je n'y comprends rien, étonnant non? Donc, il faudrait utiliser cette fonction avec Langage: Visual Basicspan class="st0">"rundll32.exe""shell32.dll,Control_RunDLL timedate.cpl,,2"par Guy Falesse - Visual Basic
Salut Hervé, En fait, ce que je voudrais, donc, c'est pouvoir changer la date avant que ne s'exécute le reste de la fonction. Est-ce qu'il y aurait la possibilité de centrer cette fenêtre de TimeDate .cpl, ainsi le msgbox sera caché ou bien alors, afficher le msgbox à gauche de l'écran, il serai aussi caché. Tout ça, parce que je peux pas utiliser la fonction date, misèrepar Guy Falesse - Visual Basic
Salut Hervé, OK, je l'ai :-) Voici ma fonction, tu comprendras certainement mieux ce qu'il se passe, sans vouloir te forcer la main. En fait, je suis obligé de mettre la ligne:MsgBox ("Cliquer sur OK après le changement de date ") & NewDate sinon, la fonction pour changer la date n'a pas le temps d'être enregistrée et je charge la mauvaise année. Seulemepar Guy Falesse - Visual Basic
Salut Hervé, J'ai parcouru les 41 pages du grenier, mais, je n'ai pas trouvé ta fonction shellExec. Où se cache-t-elle? Merci,par Guy Falesse - Visual Basic
Salut Hervé, J'ai une autre problème: MsgBox "La date système a été changée," & vbLf & _ "Vous devez donc la changer," & vbLf & _ "à l'aide du logiciel prévu.", vbCritical + vbOKOnly, "Défaut date système" NewDate = Shell("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl"par Guy Falesse - Visual Basic
Bonjour, J'ai pu contourner le problème en faisant ceci: NewDate = Shell("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl") MsgBox ("") & NewDate Donc, j'ai supprimé tout ce qu'il y avait derrière Timedate.cpl Par contre, la boîte à message m'affiche le chiffre 7312. Que cela veut-il dire? D'avancer mercipar Guy Falesse - Visual Basic
Bonjour, J'ai la commande ci-dessous qui ne fonctionne qu' à "moitié" Private Sub Commande16_Click() Dim NewDate NewDate = Shell("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,1", vbNormalFocus) End Sub En fait, la fenêtre se met de suite en icône et je n'ai pas le temps de paramétrer la nouvelle date système. Lorsque cette commandepar Guy Falesse - Visual Basic
Salut Hervé, Oui, c'est bien plus facile ainsi Bon dimanche.par Guy Falesse - Visual Basic
Salut Hervé, Merci pour ta réponse :-) C'est déjà une bonne piste. Mais finalement, j'ai laissé tombé et j'ai lié la table facturation qui m'a donné facturation1 comme nom ce qui m'avait amené à tester si cette table existait pour pouvoir l'effacer ensuite.par Guy Falesse - Visual Basic
Salut Hervé, Merci pour ta réponse C'est si facile quand on lit la réponse. Bon dimanche.par Guy Falesse - Visual Basic
Bonjour Hervé, J'ai téléchargé ta fonction: Public Function TableExist(strTable As String) As Boolean Mais, je ne sais pas m'en servir. Par exemple, je voudrais savoir si la table facturation existe, ou non. D'avance merci. Guy FALESSEpar Guy Falesse - Visual Basic
Bonjour, Je ne m'y ferai jamais. Erreur de compilations dans: Private Sub Commande10_Click() Dim monSQL As String monSQL = "SELECT VellaTables2009.facturation IN '"C:\Svella\VellaTables2009.mdb"' DoCmd.OpenForm "frmFacturationAutreAnnée" Forms!frmFacturationAutreAnnée.RecordSource = monSQL End Sub Qu'aurais-je dû encorepar Guy Falesse - Visual Basic
Bonjour, J'ai refais le SQL en faisant attention aux virgules à la fin des lignes, comme: monSQL = "SELECT tblfacturesToutesAnnées.NCL,tblfacturesToutesAnnées.Nfact_an,tblfacturesToutesAnnées.DateFact," _ & "tblfacturesToutesAnnées.TF,tblfacturesToutesAnnées.Nom,tblfacturesToutesAnnées.Prénom,tblfacturesToutesAnnées.Localité," _ & &qpar Guy Falesse - Visual Basic
Bonjour, J'ai cette erreur dans la fonction ci-dessous et bien sûr, je ne comprends pas. Peut-on me donner un coupe de main pour corriger cette erreur. Merci d'avance. chCritères = InputBox("Tapez la ou les première(s)" & vbLf _ & "lettre(s) du nom à retrouver.", "Recherche par nom") & "*" If chpar Guy Falesse - Visual Basic
Salut Hervé, Merci pour ta réponse. Le champ se trouve dans la base de données qui contient la table Facturations et qui me permet d'avoir l'année, si bien compris ta question.par Guy Falesse - Visual Basic
Bonjour, Suite à mon précédent message concernant les n° de facture, voici la fonction...qui fonctionne: Private Sub Commande13_Click() Dim rst As Recordset, maBD As Database, Lannée As String Lannée = DatePart("yyyy", ) MsgBox "" & Lannée Set maBD = CurrentDb Set rst = maBD.OpenRecordset("Facturation", dbOpenDynaset) With rstpar Guy Falesse - Visual Basic
Bonjour, J'ai presque résolu le problème de recherche dans toutes les années d'un nom ainsi que ses factures. Pour cela, je devrai ajouter un nouveau champ, lettre ou numérique incluant le chiffre de l'année afin d'éviter les doublons, genre 210/2006 ou autre façon. Cela devrait se faire automatiquement pour tous les enregistrements, c'est là que je sais pas commentpar Guy Falesse - Visual Basic
salut Hervé, J'ai commencé cette base en 1996. À la demande de Salvatore, j'ai commencé par créer une gestion de clients, ensuite on en ait venu à différentes factures, se femme s'occupait avec Excel de la comptabilité interne, ensuite sont venus se greffer la gestion des stocks, les ventilations etc.,etc. On travaillait comme il travaillait sur papier, donc, les factures étaipar Guy Falesse - Visual Basic
Salut Hervé, L'erreur 3346 le nbre de valeurs de la requête etc. était provoquée par une erreur d'écriture, j'ai le champ qui s'appelle Nom dans la table adresses et NomClient dans la table tblToutesAnnées. Je t'ai fait perdre ton temps pour rien, enfin, moi, j'ai encore appris plein de trucs. De toute manière, mon truc ne marche pas. Tu me parlais de lier lespar Guy Falesse - Visual Basic