Discussion :

[Deustalos]

Hello,

Je vous explique mon probléme.

Je travaille sur une base access qui modifit un fichier excel.
Seulement sur certain poste informatique de ma boite les références VBA MSExcelobject ne sont pas installé.
La question est simple j'aimerai si possible bien entendu, trier un fichier excel par la premiere colone par ordre croissant sans utiliser les fonction contenu dans la référence manquante (ici Object Excel).

Voila mon code complet et je pense que c'est ce fammeu ".end(xldown) qui pose probléme.

Code :

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

1
2
3
PlanningXls.Range(("A:Q"), PlanningXls.Range("A:Q").end(xldown)).Sort Key1:=PlanningXls.Range("A2"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal

Merci par avance de votre aide, je ne suis pourtant pas persuadé qu'il est possible de se passer de la référence Excel.

Alex

[Invité]

Bonjour

Que veux-tu dire par référence non installée ? Si Excel n'est pas installé sur le poste c'est normal que cela ne fonctionne pas.

Si Excel est installé comment fais-tu l'appel à la bibliothèque d'Excel ? Si tu ne la coches pas, fais-tu un CreateObjet ?

Si oui, xldown étant une constante, tu dois la déclarer ou lui donner son numéro (tu le trouves dans l'explorateur d'objet de l'éditeur VBA d'Excel).

Voici quelques pistes à explorer, il y en a probablement d'autres.

Philippe

[Deustalos]

Merci de ta réponse,

Je me suis un peu renseigné de mon coté et je ne comprend pas pourquoi : sur un post informatique avec excel il ne trouve pas la référence vba Microsoft Excel 11.0 Object Library.

J'éspére ne pas avoir à la chercher mannuellement sur chaque poste informatique ou je dois installer mon programme.

Merci de ton aide

Alexis

[Psychopathe]

Peut-être que c'est une version différente de Excel 11. A ce moment là, il faut utiliser un code qui trouve la version d'Excel installée, qui supprime la référence si elle est manquante, et qui ajoute la référence existante.

[Deustalos]

Je pensai que le changement de référence ce faisait en automatique en tout cas sur les versions suivantes. (Sur un poste avec Excel 2007) Il met en automatique la version 12. Sinon merci pour la piste je vais essayer de trouver le code correspondant.

Alex

[hocine]

salut,
sur le poste ou se pose le problème, vous avez 2 possibilités, il ne la trouve pas ou elle n'est pas activée.
pour le second cas, ouvre l'éditeur vba/outils/référence cochez la référence manquante Microsoft Excel 11.0 Object Library
et si vous voulez créer votre propre procédure ou fonction
vous n'avez qu'a faire une boucle while qui va s'arrêter lorsque le contenue de la cellule et vide "" et le compteur s'arrêtera avec.
Bonne chance.
Merci.

[Deustalos]

Merci à tous,

Le but de cette manipe était justement que l'installation de la base sur un post ne nécésite pas de modifications/paramétrages. (pour des utilisateurs non expériementé)

J'ai au final convaincu mon service informatique de reprendre le bébé et donc de procéder à l'installation sur chaque poste informatique. Je n'ai donc plus de probléme sur ce sujet.

Merci à tous de votre aide.

A bientot pour de nouvelles aventures