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 :

Problème de récupération de lettre de colonne avec variable [XL-2010]


Sujet :

Macros et VBA Excel

  1. #1
    Candidat au Club
    Homme Profil pro
    Auditeur
    Inscrit en
    Février 2013
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Gabon

    Informations professionnelles :
    Activité : Auditeur
    Secteur : High Tech - Opérateur de télécommunications

    Informations forums :
    Inscription : Février 2013
    Messages : 2
    Points : 3
    Points
    3
    Par défaut Problème de récupération de lettre de colonne avec variable
    bonjour,

    je suis débutant en vba excel,j'ai un fichier excel avec des numéros de colonne j'aimerais connaitre comment utiliser une variable qui recupère le numéro de colonne pour m'afficher la lettre de la colonne. le cas ci dessous marche mais à la place du 32 j'aimerais mettre une variable:

    Code qui marche avec numéro de colonne
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    MsgBox Split(Columns(32).Address(ColumnAbsolute:=False), ":")(1)
    j'ai essayé de cette façon mais ça ne marche pas:

    Code ne marchant pas avec Variable:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Dim A As String
     
    A = Cells(2, 1)
     
    Cells(1, 5) = Split(Columns(A).Address(ColumnAbsolute:=False), ":")(1)
    merci de bien vouloir m'aider.

  2. #2
    Membre expert
    Homme Profil pro
    Retraité
    Inscrit en
    Avril 2011
    Messages
    1 858
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : Avril 2011
    Messages : 1 858
    Points : 3 974
    Points
    3 974
    Par défaut
    Bonjour,

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Dim A As Integer
        A = Cells(2, 1).Value
        Cells(1, 5) = Split(Columns(A).Address(, 0), ":")(1)
    Cordialement.

  3. #3
    Candidat au Club
    Homme Profil pro
    Auditeur
    Inscrit en
    Février 2013
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Gabon

    Informations professionnelles :
    Activité : Auditeur
    Secteur : High Tech - Opérateur de télécommunications

    Informations forums :
    Inscription : Février 2013
    Messages : 2
    Points : 3
    Points
    3
    Par défaut ça marche
    Merci,

    ça marche!

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

Discussions similaires

  1. Réponses: 1
    Dernier message: 01/01/2013, 10h24
  2. [WSUS] Problème de récupération de poste avec les stratégies.
    Par GarsDuCalvados dans le forum Windows Serveur
    Réponses: 2
    Dernier message: 19/08/2008, 12h56
  3. Réponses: 2
    Dernier message: 21/04/2008, 10h29
  4. Réponses: 2
    Dernier message: 15/05/2007, 17h13
  5. Réponses: 6
    Dernier message: 07/07/2006, 18h27

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