Discussion :

[a.pujol]

Bonjour a tous,

J'ai développé une application ACCESS 2016.

Je souhaite récupérer des données dans un fichier EXCEL (format xlsx uniquement pas d'autre format possible) qui est sur une adresse http et qui est mis à jour au fil de l'eau.

Il n'est pas possible de faire un lien entre un fichier xlsx et une table dans access et je n'ai pas forcément trouvé la meilleure solution pour cela.

Ma solution,

Sur timer j'ouvre le fichier excel sur le serveur http puis je l'enregistre sous vers ma nouvelle destination.
je récupère ensuite les données depuis ce fichier destination (cela fonctionne correctement)

je n'ai pas résolu deux problèmes:

- Supprimer le message pour écraser le fichier destination existant.
- Des instances Excel restent ouvertes (constaté dans le gestionnaire des tâches) malgré avoir libéré les objets après chaque copie du fichier excel.

Si quelqu'un peut m'aider..

merci par avance

[marot_r]

Bonjour.

- Supprimer le message pour écraser le fichier destination existant.

Ca c'est une question Excel ou tu peux supprimer le fichier avec Access avant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
dim CheminNomFichier as string
'Ici du code pour assigner CheminNomFicher
 
if dir(CheminNomFichier)<>"" then
   kill CheminNomFichier 
end if

- Des instances Excel restent ouvertes (constaté dans le gestionnaire des tâches) malgré avoir libéré les objets après chaque copie du fichier excel.

J'ai remaque que pour que la liberation se fasse toujours, il faut que l'objet application Excel soit visible.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objExcel.Visible=True: objExcel.Quit: set objExcel=nothing

Je n'en vois pas la raison mais depuis des annees que je fais cela je n'ai pas eu de probleme.

A+

[a.pujol]

merci Marot-R

concernant le premier message, il ne s'agit pas d'excel.

c'est l'utilisation de la fonction 'saveas'.

Lorsqu'on enregistre pour la deuxième fois un fichier avec le même nom, un message s'affiche qui demande si l'on veux écraser le fichier existant. C'est ce message que je veux supprimer puisque ma fonction de copie du fichier excel doit être masquée pour l'utilisateur, et qu'il bloque la suite de ma fonction.

Pour la deuxième question je vais tester.. merci

[marot_r]

Bonjour.

Je pense que le saveas est fait par l'application Excel que tu instancies pour manipuler ton fichier donc c'est un message d'Excel.
Il faut donner a Excel l'ordre de supprimer ce message d'alerte (et je ne me souviens plus de l'instruction).

Si ce n'est pas cela alors la suppression du fichier par Access devrait suffire.

A+

[tee_grandbois]

bonjour marot_r et a.pujol,

Il faut donner a Excel l'ordre de supprimer ce message d'alerte (et je ne me souviens plus de l'instruction)

il s'agit de l'instruction: XlObj.DisplayAlerts = False
XlObj étant l'instance d'Excel créée au préalable

[marot_r]

Merci Tee_grandsbois.

Et ne pas oublier de mettre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

XlObj.DisplayAlerts = True

juste apres pour retablir les alertes.

A+

[tee_grandbois]

juste apres pour retablir les alerte

pas nécessairement, cela concerne l'instance, ce n'est pas une option générale de l'application.
Bonne soirée

[marot_r]

Bonjour tee_grandbois et merci de la precision.

Perso, meme dans une instances, j'aime avoir mes alertes actives autant que possible.

A+

[tee_grandbois]

salut marot_r

Perso, meme dans une instances, j'aime avoir mes alertes actives autant que possible

justement, elle sont actives par défaut, donc pas la peine de les activer pour chaque instance. En général, on utilise plutôt la commande pour ne pas les avoir.

[marot_r]

Oui, mais une fois que tu les as desactivees pour une instance, elles restent desactivees, non ?

A+

[tee_grandbois]

oui c'est vrai, tant qu'elle n'est pas fermée mais puisque elle est activée quand tu l'ouvres, pourquoi la désactiver, sauf si c'est ce que tu souhaites ?

La solution de désactivation était pour a.pujol, toi tu n'en as pas besoin puisque tu préfères qu'elle soit active ...

[a.pujol]

Merci à tous pour les réponses.

J'ai testé.

1 / Je n'ai plus le message pour écraser le fichier existant - c'est OK

2/ J'ai toujours après l'enregistrement du fichier l'instance excel qui reste ouverte dans les processus d'arrière plan.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objExcel.Visible=True:

ne résout pas le problème.

Si quelqu'un a une solution merci par avance

[marot_r]

Bonjour.

As-tu bien la sequence d'instructions :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objExcel.Visible=True: objExcel.Quit: set objExcel=nothing

L'as-tu execute pas a pas pour valider ?

A+

[a.pujol]

Bonjour,

En cherchant sur des discussion, j'ai trouvé cette solution qui fonctionne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Shell ("taskkill /F /IM Excel.exe")

L'instance d'excel se ferme bien. Ce point est donc résolu

Par contre pour le point 1 copie de fichier

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

oApp.DisplayAlerts = False

supprime le message pour écraser ou pas le fichier existant.
Cependant : une fenêtre avec le message ' Enregistrement en cours' avec bouton annuler s'affiche.

J'aurais souhaité que la copie du fichier excel soit transparente pour l'utilisateur et surtout qu'il ne puisse pas annuler l'opération la suite de ma fonction dépend de cette copie.

Ce message peut-il être supprimé?

[tee_grandbois]

bizarre ce message ... est-ce un gros fichier ?
dans ce cas, essaie avec App.visible = False

[marot_r]

Bonjour.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Shell ("taskkill /F /IM Excel.exe")

Verifie que cela ne ferme pas toutes les instances d'Excel ouvertes.
Si ton utilisateur travaille dans un autre Excel, il risque de ne pas t'aimer.

A+

[tee_grandbois]

Merci à tous pour les réponses.

J'ai testé.

1 / Je n'ai plus le message pour écraser le fichier existant - c'est OK

2/ J'ai toujours après l'enregistrement du fichier l'instance excel qui reste ouverte dans les processus d'arrière plan.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

objExcel.Visible=True:

ne résout pas le problème.

Si quelqu'un a une solution merci par avance

as-tu bien lu ce que t'a écrit marot_r ? c'est cette instruction : objExcel.Quit qui ferme l'instance

[a.pujol]

bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Shell ("taskkill /F /IM Excel.exe")

Cette instruction ferme effectivement toutes les instances excel qui sont ouvertes. Pas génial...

Par contre j'ai fait je pense tous les tests possibles, oui j'ai bien utilisé l'instruction objExcel.Quit mais l'instance excel reste ouverte dans les processus en arrière plan.

Je ne trouve pas la solution...

Merci a vous