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 :

[VBA-E] Récupérer la derniere cellule d'un range


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé Avatar de ashurai
    Profil pro
    Inscrit en
    Juillet 2004
    Messages
    144
    Détails du profil
    Informations personnelles :
    Âge : 44
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations forums :
    Inscription : Juillet 2004
    Messages : 144
    Par défaut [VBA-E] Récupérer la derniere cellule d'un range
    Bonjour à tous,

    Je sais que ca parrait trés bête, mais je m'arrache les cheveux la dessus, et comme je commence à plus en avoir, je fais appel a vous...

    Alors voila je souhaite récupérer les coordonée de le dernière cellule d'un range.

    Quand mon range a plus de 1 colonne, pas de problème, quand il en a 1, ca va pas...

    Voila ce que j'utilise :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
    intColLastCell = rngRange.End(xlToRight).Column
    intRowLastCell = rngRange.End(xlDown).row
    Pour la colonne c'est bon, mais pour la ligne, j'ai des mauvaise valeurs dans le cas ou j'ai plus d'une collone dans le range..

    Je comprend rien..

    Merci d'avance.

  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 : 71
    Localisation : Belgique

    Informations professionnelles :
    Activité : Consultant informatique
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2005
    Messages : 4 235
    Par défaut
    Si tu cherches la dernière utilisée de la feuille,
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Cells.SpecialCells (xlLastCell)
    fonctionne très bien.
    Il n'y a qu'à en demander le .Row ou .Column si besoin.
    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
    Membre confirmé Avatar de ashurai
    Profil pro
    Inscrit en
    Juillet 2004
    Messages
    144
    Détails du profil
    Informations personnelles :
    Âge : 44
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations forums :
    Inscription : Juillet 2004
    Messages : 144
    Par défaut
    Non, justement, j'ai essayé avec ca, mais j'ai besoin de récupérer la derniere cellule d'un range particulier compris n'importe ou dans la feuille, pas la dernière cellule de la feuille.

  4. #4
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
        DernièreColonne = ActiveCell.End(xlToRight).Column
    Tu peux remplacer Activecell par la cellule

    A+

  5. #5
    Membre confirmé Avatar de ashurai
    Profil pro
    Inscrit en
    Juillet 2004
    Messages
    144
    Détails du profil
    Informations personnelles :
    Âge : 44
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations forums :
    Inscription : Juillet 2004
    Messages : 144
    Par défaut
    Je n'ai pas un problème sur la dernière colonne, mais sur la dernière ligne du range...
    Je sais, je suis ch....

    Et avec le xldown, il y a des décalages avec ce que j'attend.

  6. #6
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Si tu peux avoir des cellules vides dans ta ligne ou ta colonne, utilise plutôt

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
        DernièreColonne = ActiveSheet.Range("IV1").End(xlToLeft).Column
        DernièreLigne = Range("A65535").End(xlUp).Row
    A+

  7. #7
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Hello illight,
    Tu préfères montrer tes bêtises à tout le monde ? Soit :

    Code illight : Sélectionner tout - Visualiser dans une fenêtre à part
    DernièreColonne = range("A65535").End(xlup).row 'ou column

    Je voulais juste t'épargner ça
    Tu juges

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

Discussions similaires

  1. [VBA-E]coordonnées de la derniere cellule marqué sur excel
    Par amelhog dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 10/02/2006, 19h39
  2. [VBA]comptage de lignes en fonction du contenu des cellules
    Par calimero91 dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 22/12/2005, 11h38
  3. Réponses: 2
    Dernier message: 05/10/2004, 22h43
  4. [VBA-E] recuperer le texte d un commentaire de cellule excel
    Par Verbal-Quint dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 15/07/2004, 10h27

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