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 :

renvoyez les references d une cellule


Sujet :

Macros et VBA Excel

  1. #1
    Membre à l'essai
    Profil pro
    Inscrit en
    Septembre 2006
    Messages
    39
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2006
    Messages : 39
    Points : 18
    Points
    18
    Par défaut renvoyez les references d une cellule
    Bonjour a tous

    je voulais savoir comment vous faites pour ne renvoyer que les reference d une plage de cellule

    dans une boucle j ai la ligne de code (fausse) suivante :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    feuil2.Cells(i,2) = Feuil1.Range(Cells(j, 3), Cells(j+3, 6))
    au fait je voudrais qu apparaissent en feuil2.Cells(i, 2) les coordonnées de la plage (donc ici, en supposant que j = 1)
    feuil1!C1:F4

    Merci, et bonnes fetes a tous

  2. #2
    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
    Je n'ai pas bien compris ce que tu cherches à faire.
    Si le but est de copier le contenu du range, essaye:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    feuil2.Cells(i,2) = Range(Feuil1.Cells(j, 3), Feuil1.Cells(j+3, 6))
    N'oubliez pas de cliquer sur quand vous avez obtenu ou trouvé vous-même la réponse à votre question.
    Si vous trouvez seul, pensez à poster votre solution. Elle peut servir à d'autres!
    Pensez aussi à voter pour les réponses qui vous ont aidés.
    ------------
    Je dois beaucoup de mes connaissances à mes erreurs!

  3. #3
    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
    Une piste pour afficher la référence:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    feuil2.Cells(i, 2) = Range(feuil1.Cells(j, 3), feuil1.Cells(j + 3, 6)).Address
    N'oubliez pas de cliquer sur quand vous avez obtenu ou trouvé vous-même la réponse à votre question.
    Si vous trouvez seul, pensez à poster votre solution. Elle peut servir à d'autres!
    Pensez aussi à voter pour les réponses qui vous ont aidés.
    ------------
    Je dois beaucoup de mes connaissances à mes erreurs!

  4. #4
    Membre à l'essai
    Profil pro
    Inscrit en
    Septembre 2006
    Messages
    39
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2006
    Messages : 39
    Points : 18
    Points
    18
    Par défaut
    excuse mon manque de clarté

    au fait je veux faire apparaitre que les coordonnées des cellules
    exemple sur ce tableau a 2 colonne :

    Paris--------feuil1!C1:F4
    Lyon--------feuil1!C5:F8
    Marseille-----feuil1!C9:F12


    si je fais
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    feuil2.Cells(i,2) = Range(Feuil1.Cells(j, 3), Feuil1.Cells(j+3, 6))
    j aurais le contenus mais pas les coordonnées

    je cherche a obtenir le meme genre de resultat que lorsque en passant par les plage de cellules nommées, tu colles les listes

    J espere que je suis plus claire.

  5. #5
    Membre à l'essai
    Profil pro
    Inscrit en
    Septembre 2006
    Messages
    39
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2006
    Messages : 39
    Points : 18
    Points
    18
    Par défaut
    oups !

    j avais pas vu ta reponse

    c est exactement ca

    Merci Alain
    et bonne année

  6. #6
    Responsable
    Office & Excel


    Homme Profil pro
    Formateur et développeur chez EXCELLEZ.net
    Inscrit en
    Novembre 2003
    Messages
    19 122
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 57
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur et développeur chez EXCELLEZ.net
    Secteur : Enseignement

    Informations forums :
    Inscription : Novembre 2003
    Messages : 19 122
    Points : 55 921
    Points
    55 921
    Billets dans le blog
    131
    Par défaut
    Bonjour

    Il me semble que Alain t'a donné la solution.

    Si tu veux, dans une colonne, avoir le contenu de la cellule, et à côté avoir son adresse avec le nom de l'onglet, tu peux utiliser ceci:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
    feuil2.Cells(i,1) = Range(Feuil1.Cells(j, 3), Feuil1.Cells(j+3, 6))
    feuil2.Cells(i,2) = feuil1.name & "!" & Range(Feuil1.Cells(j, 3), Feuil1.Cells(j+3, 6)).address
    Ok?
    "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
    ---------------
    Mes billets de blog sur DVP
    Mes remarques et critiques sont purement techniques. Ne les prenez jamais pour des attaques personnelles...
    Pensez à utiliser les tableaux structurés. Ils vous simplifieront la vie, tant en Excel qu'en VBA ==> mon tuto
    Le VBA ne palliera jamais une mauvaise conception de classeur ou un manque de connaissances des outils natifs d'Excel...
    Ce ne sont pas des bonnes pratiques parce que ce sont les miennes, ce sont les miennes parce que ce sont des bonnes pratiques
    VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
    ---------------

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

Discussions similaires

  1. extraire uniquement les chiffres d'une cellule
    Par delamarque dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 07/08/2017, 18h25
  2. Forcer les majuscules dans une cellule d'un Datagrid
    Par Jean_dick15 dans le forum VB.NET
    Réponses: 7
    Dernier message: 24/01/2007, 21h14
  3. ne veut pas d'espaces entre les images dans une cellule
    Par cortex024 dans le forum Mise en page CSS
    Réponses: 6
    Dernier message: 07/12/2006, 15h30
  4. [POI]recuperer et modifier les données d'une cellule
    Par corbier32 dans le forum Documents
    Réponses: 5
    Dernier message: 04/05/2006, 10h41
  5. faire disparaitre les contours d'une cellule de tableau
    Par moonia dans le forum Balisage (X)HTML et validation W3C
    Réponses: 2
    Dernier message: 06/04/2006, 12h27

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