IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Fonction Chr() dans VBA avec Excel 2010


Sujet :

Macros et VBA Excel

  1. #1
    Nouveau Candidat au Club
    Inscrit en
    Juin 2010
    Messages
    2
    Détails du profil
    Informations forums :
    Inscription : Juin 2010
    Messages : 2
    Points : 1
    Points
    1
    Par défaut Fonction Chr() dans VBA avec Excel 2010
    Hello,

    J'ai un programme qui marchait parfaitement sur Excel 2003 Pro mais pas sur Excel 2010 Pro.

    J'ai trouve une premiere raison. Une variable ne peut plus etre declaree comme dictionary mais doit etre declaree comme Scripting.Dictionary.

    J'ai passe plus d'une heure sur le deuxieme probleme mais je ne trouve meme pas l'ebauche d'une solution. J'utilise la fonction Chr dans le cas suivant (J'ai retire les parties du code qui ne correspondaient pas a mon probleme):
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
        Dim TermRInit As Integer
        Dim TermCInit As Integer
        TermRInit = 7
        TermCInit = 4
        Dim cRatioRefCell As String
        cRatioRefCell = Chr(TermCInit + 64) & TermRInit
    J'ai l'erreur de compilation suivante:
    "Compile error:

    Can't find project or library"

    Le probleme vient de la fonction Chr alors qu'elle est bien definie dans Excel 2010 Help... Mieux, si je l'ecris tout en majuscules, elle est reconnue par l'environnement de developpement et reecrite sans majuscules.

    Je ne comprends vraiment pas le probleme. Je dois surement rajouter un librairie mais je ne vois pas laquelle...

    Merci pour votre aide,
    Helo

  2. #2
    Expert éminent
    Avatar de fring
    Homme Profil pro
    Engineering
    Inscrit en
    Février 2008
    Messages
    3 900
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : Belgique

    Informations professionnelles :
    Activité : Engineering

    Informations forums :
    Inscription : Février 2008
    Messages : 3 900
    Points : 7 964
    Points
    7 964
    Par défaut
    Bonsoir,

    A tout hazard...
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Dim TermRInit As Integer
        TermRInit = 7
        Dim cRatioRefCell As String
        cRatioRefCell = Chr(TermCInit + 64) & TermRInit

  3. #3
    Nouveau Candidat au Club
    Inscrit en
    Juin 2010
    Messages
    2
    Détails du profil
    Informations forums :
    Inscription : Juin 2010
    Messages : 2
    Points : 1
    Points
    1
    Par défaut
    Merci pour ton aide. Je n'ai effectivement pas garde suffisamment de lignes de mon code. Le programme fait plusieurs pages et utilise les variables TermCInit et TermRInit. (pour Row et Column).

    Il n'y a en principe pas de probleme de declaration puisque tout marche tres bien sur Excel 2003. Mais la fonction Chr a comme disparue d'Excel 2010. Je me demande s'il ne faut pas que je precise une classe ou quoi que ce soit avant Chr...

    Je me dit que, comme j'ai ajoute "Scripting." devant "dictionary", il faut peut-etre rajouter "laClasseDesFunctionsCommeChr." devant Chr. Mais je n'y arrive pas.

    En tout cas, merci pour ta proposition.

  4. #4
    Expert éminent
    Avatar de fring
    Homme Profil pro
    Engineering
    Inscrit en
    Février 2008
    Messages
    3 900
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : Belgique

    Informations professionnelles :
    Activité : Engineering

    Informations forums :
    Inscription : Février 2008
    Messages : 3 900
    Points : 7 964
    Points
    7 964
    Par défaut
    Désolé mais je ne pourrai pas t'aider d'avantage, je ne possède pas le 2010, je n'ai pas encore fini de râler sur les changement du 2007...

  5. #5
    Membre habitué
    Homme Profil pro
    Inscrit en
    Mai 2007
    Messages
    120
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Mai 2007
    Messages : 120
    Points : 181
    Points
    181
    Par défaut
    Salut le forum

    Test les 4 lignes de code suivantes :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    Sub essai()
    Cells(1, 1) = Chr(34)
    Cells(1, 2) = VBA.Chr(34)
    Cells(1, 3) = Chr$(34)
    Cells(1, 4) = VBA.Chr$(34)
    End Sub
    Mytå_Qc

  6. #6
    Modérateur
    Avatar de AlainTech
    Homme Profil pro
    Consultant informatique
    Inscrit en
    Mai 2005
    Messages
    4 235
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 70
    Localisation : Belgique

    Informations professionnelles :
    Activité : Consultant informatique
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2005
    Messages : 4 235
    Points : 24 327
    Points
    24 327
    Par défaut
    Bonjour,

    Quand les fonctions de base de VBA ne sont plus reconnues, il y a de fortes chances qu'une Référence soit marquée manquante.

    Décoche toutes celles qui sont dans ce cas.

Discussions similaires

  1. Plantage du projet VBA avec Excel 2010 et 2003
    Par Franck_P dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 04/05/2012, 19h34
  2. Fonction SI dans VBA excel
    Par kaboche dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 18/09/2011, 13h50
  3. [SP-2007] Message erreur avec fonction "Modifier dans Microsoft Office Excel"
    Par Xorbane dans le forum SharePoint
    Réponses: 4
    Dernier message: 18/02/2011, 09h43
  4. [XL-2003] Erreur avec la fonction Min dans VBA Excel
    Par Marymimo dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 13/08/2009, 09h08
  5. Réponses: 9
    Dernier message: 23/02/2008, 08h07

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo