Version imprimable
Bonjour Phil RobCitation:
Envoyé par Phil Rob
J'ai testé ton fichier c'est top
Mais maintenant je dois l'adapter à mon projet.
Tu travail avec une datagrid mais est-ce que cela fonctionne aussi avec une listview.
Est-ce que l'on doit mettre le code dans le formulaire ou il y a la datagrid ? ou je peux juste utiliser un bouton dans un menu qui appelle la fonction d'export.
Bonne journée
Bonjour,
Regarde bien, pour ce qui concerne l'exportation vers XLS (c'était la question), seul le DataTable est utilisé, je ne m'occupe pas des composants qui servent à présenter les données.
Je te propose de mettre les données à exporter dans un DataTable et puis de reprendre mes quelques codes d'exportation.
Bonne journée
Re-bonjour Phil Rob
J'ai réussi à intégrer ton code dans mon projet et cela fonctionne.
Mais je pensais que ce serait plus rapide
Par contre dans ma DB access j'ai une macro qui exporte vers excel et cela se fait très vite est-ce par hasard on peut exécuter cette macro à partir du projet vb net.
Bonne journée
En SQL, on peut exécuter des "procédures stockées" dans la DB. Mais je ne sais pas si Access permet les procédures stockées°;
Par rapport à une macro, vois ce qui se fait pour lancer une macro écrite dans XLS :
Peut-être que la même démarche est possible à partir d'un application Access : ACCAPP = New Access.ApplicationCode:
2
3
4
5
6
7
8
9
10
A tester ... :)
Il est effectivement possible de faire ± la même chose pour lancer une macro Access que pour une XLS.
Mais il faut s'attendre à quelques difficultés ...
Celles-ci ne me passionnent pas et alors là, je te laisse le soin des recherches à partir de "Run Macro Access en VB.net".
Pièce jointe 583850
Pièce jointe 583851
Bon amusement,
Phil Rob
tu as plus de chance que moi, car avec le même code que toi cela ne fonctionne pas.
Tu as mis quoi dans les références.
Je continue mes recherches
Bonne soirée
Si tu n'as pas d'erreur de compilation, ce n'est pas une question de référence (dis-moi quoi à ce sujet).
Mais j'ai aussi eu des difficultés à exécuter : tel que programmé là, il faut qu'il n'y ait aucun processus déjà actif sur cette DB. Pour vérifier ce cas, ton programme devrait fonctionner après le redémarrage de l'ordi (perso, j'utilise un killer de process égarés car ça arrive souvent lorsqu'on fait des tests).
Si tu ne vois pas de solution dans ce message, envoie un extrait de la DB avec la macro de test.
Suite ... après vérif. :D
J'ai effectivement la référence Microsoft.Office.Interop.Access ajoutée à la solution. Cela se voit déjà sur l'illustration de l'autre jour où je te montrais la référence pour XLS. Vois celle pour Access juste au-dessus. Pas de compialtion sans cette référence ajoutée.
Pièce jointe 583879
A part cela, j'ai écrit mes codes de ce matin dans la procédure FTestDB_Load() du projet de test que je t'ai envoyé avec les codes d’exportation vers XLS et je n'ai rien changer d'autre dans les codes de ce projet :
Par ailleurs, c'est vrai que l'exécution de la macro produit une erreur s'il subsiste un processus Access sur cette DB (par exemple parce qu'elle ouverte par Access, ou bien parce que j'ai stoppé le programme en cours de travail sur la DB, sans clôturer correctement la connexion). Je suppose qu'une meilleure maîtrise des macros Access devrait permettre d'exécuter cette macro même quand la DB est ouverte par ailleurs (on peut le faire DANS Access).Code:
2
3
4
5
6
7
8Private Sub FTestDB_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Dim ACCApp As New Access.Application ACCApp.OpenCurrentDatabase("D:\Tmp\TestAccesDBSimpleConMostrar\MonStock2013.accdb", True) ACCApp.DoCmd.RunMacro("MaMacro", 2) ACCApp.CloseCurrentDatabase() ACCApp = Nothing End Sub
C'est pourquoi, quand je soupçonne ce genre de problème, je supprime tous les processus encore actifs, en Word, ou en XLS, ou en Access. Illustration après interruption du programme après l'ouverture de la DB et avant sa fermeture :
Pièce jointe 583880
Bonne soirée ... :)
Bonjour Phil Rob
Encore en tout grand merci pour tout le temps que tu as passé pour m'aider.
Mais je vais abandonner l'idée d'exporter ma DB vers Excel, en fait la solution était devant mes yeux.
Je t'explique un peu mon projet :
d'un coté j'ai un fichier excel "Listing fiche technique" dans le quel je gère un listing de suivi de fiche technique ce fichier est en liaison avec un autre fichier excel qui me sert de tampon pour alimenté mon fichier avec différent modèle de matériel.
De l'autre coté, j'ai mon projet VB qui le sert de bibliothèque pour gérer les différent matériels et je voulais exporter la DB vers le fichier tampon qui réalimente mon fichier "listing fiche technique".
Donc la solution est toute simple dans mon fichier excel "Listing fiche technique" je n'ai qu'a créer une liaison vers mon fichier access et le tour est joué.
Encore merci
Bonne journée
Merci pour le suivi ...
Très bonne journée,
:D
Bonjour Phil Rob
Je reviens vers toi, car j'ai encore une question concernant ma comboxbox.
Tout fonctionne nickel garce à toi, mais j'ai ajouté un formulaire pour remplir les valeurs que la comboxbox doit aller chercher et ce formulaire je l'appelle depuis mon premier formulaire.
Mais la comboxbox ne se met pas a jour avec les nouvelles valeurs je sis obliger de fermer mon premier formulaire et le ré ouvrir.
Aurais-tu une idée comment je dois faire le refresh du combobox a partir d'un autre formulaire.
Merci
Bonne journée
Bonjour
La ComboBox doit être remplie à partir du 1er Form, et puis seulement tu ouvres le 2eme Form.l
S'il y a encore un problème, envoie-moi ces codes là.
À tantôt..
En fait j'ai créé un deuxième formulaire pour pouvoir ajouter plus facilement des valeurs dans le combobox car les valeurs du combobox vienne d'une autre table que la table principale.
Je sais pas si c'est claire comme explication.
Mon premier formulaire est alimenté par la table principale, dans ce premier formulaire j'ai le combobox qui est alimenté par la deuxième table.
Je comprends que c'est à partir du 1er Form que tu charges tes tables en mémoires. Si c'est bien ainsi, les données nécessaire à ton 2ème Form existe dans le 1er. Alors, tu peux alimenter LeForm.SaCombo.Add ...
Désolé si j'ai mal compris, alors dis-moi :
Les données du Combo du Form2 viennent de la DB ?
Si oui, la requête de chargement est dans Form1 ou dans Form2 ?
T'inquiète, on va y arriver .... :D
Dans le formulaire 1 je charge les données de la table "T_Listing" et le combobox charge de la table "T_Gamme", mon formulaire 2 charge la table "T_Gamme"Citation:
Envoyé par Phil Rob
Fomr2 charge T_Gamme et tu veux remplir le Combo avec les T_Gamme correspondant à une info de Form1 ?
Note qu'il me semble qu'on avait déjà travailler sur ce Combo des T_Gamme ... (cf. messages du 11/11 vers 11h.)
Oui on en avait discuté, et cette partie fonctionne super.
en fait quand je veux ajouter des valeurs dans mon combobox pour avoir plus de choix, je le fait via un autre formulaire dédié a l'ajout d'information dans le combobox.
Donc si j'ai besoin d'une info en plus je dois le savoir avant de remplir mon formulaire principale, cela ne me pose aucun problème.
Mais je me disais que se serait bien qu'en cour de remplissage de mon formulaire principale, je pouvais avoir la possibilité d'ajouter d'autre valeur dans le combobox.
Je te met un petit screen shoot
Pièce jointe 584853
Je vois 3 Form et tu veux en cours de remplissage de Form1, pendant que tu sélectionnes les données dan Form2, ouvrir Form3 pour ajouter des "Gamme" de dernière minute au Combo des Gamme de Form2 ?
S'il en est ainsi, c'est à partir de Form3 que tu ajoutes au Combo Gamme de Form2 et ce dernier ne se met pas à jour ?
Je vois dans Form3 quelque chose comme Form2.ComboGamme.Add( ...). Essaie de d'écrire un Form2.ComboGamme.Refresh tout de suite après.
Attention, si le ComboGamme de Form2 est lié à un DataTable par ComboGamme.DataSource = LeDataTable, ce n'est pas dans le Combo qu'il faut ajouter un "Gamme" de dernière minute, mais bien dans le DataTable et la mise à jour du ComboGamme devrait être immédiate.
...
Oui c'est ça en dernière minute j'ouvre le form 3 pour ajouter dans le form2
J'essaie cela ce soir et te tien au courant
Merci
J'ai l'impression que rien ne passe du form 3 vers le 2
si dans le 2 je test avec un bouton et le code suivant :TboxGAMME.Items.Add("Test") il inscrit bien
Si je fait la même chose dans le form 3 : FORM2.TboxGAMME.Items.Add("Test") alors il n'inscrit rien
