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 :

La fin de données d'une feuille Excel


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de aelmalki
    Inscrit en
    Mars 2009
    Messages
    250
    Détails du profil
    Informations forums :
    Inscription : Mars 2009
    Messages : 250
    Par défaut La fin de données d'une feuille Excel
    Bonjour,

    Je voudrais savoir si il y'a une fonction qui permet de savoir la ligne de fin de données d'une feuille Excel.

    Merci beaucoup pour vos réponse.

  2. #2
    Membre habitué
    Profil pro
    Inscrit en
    Décembre 2009
    Messages
    15
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2009
    Messages : 15
    Par défaut
    Bonjour

    Oui il y en a mm plusieurs.

    Au fait, une fonction dans une feuille, ou une Instruction dans une macro?

    je suppose dans une macro, donc:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Range("B65000").End(xlUp).Row
    donne le rang de la dernière cellule non-vide de la col B (la colonne C peut être plus longue, par exple)

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ActiveCell.SpecialCells(xlLastCell).Row
    donne le rang de l'archi-dernière cellule de la feuille ayant été remplie (mais qui peut être vide au moment de l'action...)

    autre?

  3. #3
    Expert éminent Avatar de mercatog
    Homme Profil pro
    Inscrit en
    Juillet 2008
    Messages
    9 435
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Autre

    Informations forums :
    Inscription : Juillet 2008
    Messages : 9 435
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    LastLig=cells(rows.count,1).end(xlup).row
    dernière ligne non vide de la colonne 1

  4. #4
    Membre Expert Avatar de laetitia
    Profil pro
    Inscrit en
    Décembre 2002
    Messages
    1 281
    Détails du profil
    Informations personnelles :
    Âge : 35
    Localisation : France

    Informations forums :
    Inscription : Décembre 2002
    Messages : 1 281
    Par défaut
    bonjour aelmalki Klotz l 'ami mercatog le forum quelques exemples interesant qui fonctionne sur excel 2007 & anterieur

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Sub es()
    MsgBox Cells.Find("*", , , , , xlPrevious).Row 'derniere ligne non vide
    MsgBox Cells.Find("*", , , , , xlPrevious).Row + 1 'premiere ligne  vide
    MsgBox Cells.Find("*", , , , , xlPrevious).Column 'derniere colonne non vide
    MsgBox Cells.Find("*", , , , , xlPrevious).Column + 1 'premiere colonne  vide
    End Sub

  5. #5
    Membre éclairé Avatar de aelmalki
    Inscrit en
    Mars 2009
    Messages
    250
    Détails du profil
    Informations forums :
    Inscription : Mars 2009
    Messages : 250
    Par défaut
    Merci beaucoup pour votre participation.

    Bon courage.

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

Discussions similaires

  1. Importer des données d'une feuille Excel vers TABLE
    Par souminet dans le forum Bases de données
    Réponses: 1
    Dernier message: 07/11/2006, 09h10
  2. Réponses: 2
    Dernier message: 16/10/2006, 11h24
  3. Importer les données d'une feuille EXCEL
    Par codial dans le forum Bases de données
    Réponses: 4
    Dernier message: 05/02/2006, 09h07
  4. Réponses: 3
    Dernier message: 16/02/2005, 15h39
  5. [CR]Importer des données d'une feuille excel
    Par rolan dans le forum SAP Crystal Reports
    Réponses: 3
    Dernier message: 17/12/2004, 22h32

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