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 :

Paramétrage de la fonction MID [XL-2010]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    Inscrit en
    Septembre 2010
    Messages
    18
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Val de Marne (Île de France)

    Informations professionnelles :
    Secteur : Service public

    Informations forums :
    Inscription : Septembre 2010
    Messages : 18
    Par défaut Paramétrage de la fonction MID
    Bonjour,
    Je cherche à paramétrer en VBA la fonction STXT d'Excel, où le début de la chaîne est une variable. Voici mon code :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Dim Nb as Integer
    Range("D2").Formula = "=FIND(""/"",R[-1]C[+1])+2"
    Nb = Range("D2").Value
    Range("D2").Formula = "=MID(R[-1]C[+1],Nb,6)"
    Nb est bien déterminé (il a ici pour valeur 36), mais lorsque je l'introduis dans mon code, il n'est pas reconnu. Je pense faire une erreur de syntaxe, mais je ne vois pas laquelle. Pouvez-vous m'aidez ?
    Merci par avance

  2. #2
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    13 166
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 13 166
    Billets dans le blog
    53
    Par défaut
    Bonjour,
    Comme ceci, je pense que cela ira mieux
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Range("D2").Formula = "=MID(R[-1]C[+1]," & Nb & ",6)"
    Philippe Tulliez
    Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)
    Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer sur et si celle-ci est pertinente pensez à voter
    Mes tutoriels : Utilisation de l'assistant « Insertion de fonction », Les filtres avancés ou élaborés dans Excel
    Mon dernier billet : Utilisation de la fonction Dir en VBA pour vérifier l'existence d'un fichier

  3. #3
    Membre averti
    Homme Profil pro
    Inscrit en
    Septembre 2010
    Messages
    18
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Val de Marne (Île de France)

    Informations professionnelles :
    Secteur : Service public

    Informations forums :
    Inscription : Septembre 2010
    Messages : 18
    Par défaut
    Bon sang, mais c'est bien sûr !
    Ca marche ! Et j'ai un peu honte...
    Merci beaucoup Philippe

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Remplacer la fonction Mid()
    Par Herman dans le forum VBA Access
    Réponses: 3
    Dernier message: 13/06/2007, 08h18
  2. Fonction Mid(), référence et Runtime
    Par Herman dans le forum Runtime
    Réponses: 1
    Dernier message: 12/06/2007, 09h53
  3. Erreur : Appel de procedure (Fonction Mid)
    Par l1xnoir dans le forum VB 6 et antérieur
    Réponses: 1
    Dernier message: 08/04/2007, 19h40
  4. HELP : Problème avec la fonction Mid
    Par lawrac dans le forum Access
    Réponses: 1
    Dernier message: 27/12/2006, 17h44
  5. Réponses: 2
    Dernier message: 02/12/2005, 10h53

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