Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2127 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Dans ACCESS, pb références EXCEL

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Dans ACCESS, pb références EXCEL

n°2125151
Nilorka
Posté le 07-02-2012 à 10:17:06  profilanswer
 

Bonjour,
 
J'ai crée une base ACCESS que je diffuse au format MDE à tous mes collègues. Cette base ACCESS appelle des fonctions EXCEL. Sur certains postes de mes collègues, il y a EXCEL 2000 et non 2007; La référence à EXCEL Object 12.0 ne fonctionne donc pas.  
 
Comme je leur diffuse la base en MDE, ils n'ont pas moyen de changer les références eux même.
 
J'ai cherché pour localiser précisemment le fichier de référence en question mais cela n'a pas aboutit;cela semble plus compliqué que récupérer seulement par exemple le fichier de gestion des calendrier MSCAL.OCX, ce que je faisait jusqu'à présent.
 
Quelqu'un a-il une idée sur le sujet ?
 
Merci beaucoup,

mood
Publicité
Posté le 07-02-2012 à 10:17:06  profilanswer
 

n°2125398
dje69r
Arme de distraction massive
Posté le 08-02-2012 à 14:11:32  profilanswer
 

C'est quoi comme fonctions Excel ?
 
Edit : sinon tu testes la présence de la version d'Excel et en fonction tu créés une référence...  [:le colonel moutarde:5]  

Code :
  1. References.AddFromFile("C:\Program Files\Microsoft Office\OfficeX\EXCEL.EXE" )


X est la version d'Excel que tu veux atteindre


Message édité par dje69r le 08-02-2012 à 14:16:16

---------------
Plus tu pédales moins vite, moins tu avances plus vite — SuperLoustic ! La radio des Loustics !
n°2125499
Nilorka
Posté le 08-02-2012 à 20:46:55  profilanswer
 

L'idée du test et de la création de référence me plait bien !
Je repasserai par là si ça ne résout pas le pb, mais ça devrait  
 
Merci bien.

n°2125533
Nilorka
Posté le 09-02-2012 à 00:03:30  profilanswer
 

Le problème c'est que les fichiers de références n'ont pas le même chemin d'accès en fonction des windows : C:\Program Files... ou C:\Programmes ou C:\Program Files (x86)...

n°2125561
dje69r
Arme de distraction massive
Posté le 09-02-2012 à 09:59:55  profilanswer
 

Tu as plusieurs solutions pour tester la version.
 
La plus simple c'est d'utiliser l'objet Application d'Excel.
 
Je suppose, comme tu n'as pas répondu à ma question, que tu fais un :

Code :
  1. Set ExcelApp = CreateObject("Excel.Application" )


Si ce n'est pas le cas, bah il faudra le faire ;)
 
Ensuite pour récupérer la version, rien de plus simple :

Code :
  1. NumVersion = ExcelApp.Version


 
Et pour le chemin d'acces à Excel :

Code :
  1. CheminAcces = ExcelApp.Path


 
 
Tu peux tester dans un nouveau module ceci :

Code :
  1. Set ExcelApp = CreateObject("Excel.Application" )
  2. NumVersion = ExcelApp.Version
  3. CheminAcces = ExcelApp.Path
  4. MsgBox "La version d'Excel est : " & NumVersion & vbCrLf & vbCrLf & "Chemin d'accès : " & CheminAcces
  5. Set ExcelApp = Nothing


 
 
 


---------------
Plus tu pédales moins vite, moins tu avances plus vite — SuperLoustic ! La radio des Loustics !
n°2125810
Nilorka
Posté le 10-02-2012 à 11:11:26  profilanswer
 

Merci, j'avance petit à petit.  
 
La création de références fonctionne quand elles sont absentes, c'est bon.
 
le problème qui reste est que je n'arrive pas à identifier et supprimer les références manquantes :
 
Le code suivant me renvoie un erreur de chargement de DLL sans que je puisse obtenir le nom de la référence manquante.
 
Dim Ref As Reference
For Each Ref In Application.References
   MsgBox Ref.Name
   If Ref.IsBroken = True Then Application.References.Remove Ref
Next Ref

n°2125825
Nilorka
Posté le 10-02-2012 à 11:45:04  profilanswer
 

Ah et au passage ... j'essaye de trouver la version d'outlook avec la même solution qu'au dessus pour Excel et ça ne fonctionne pas (normal ?)


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Dans ACCESS, pb références EXCEL

 

Sujets relatifs
comparer des lignes sur macro excelA supprimer
[Résolu] Petite aide vba Excelformat heure complet sql ACCESS
Renommer une colonne en SQL ACCESS 2003Excel macro, grille de nombre, changer couleur fond selon choix
créer une boite de dialogue pour rentrer une valeur dans excel[VBA Excel] Problème chemin absolu 2 classeurs - 2 chemins différents
[VBA Excel] concatener nom de champ et variable[Résolu][VBA Access + Excel] références à intégrer
Plus de sujets relatifs à : Dans ACCESS, pb références EXCEL


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR