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 :

comment faire pour que mon userform m'affiche la dernière cellule non vide [XL-2007]


Sujet :

Macros et VBA Excel

  1. #1
    Candidat au Club
    Homme Profil pro
    Inscrit en
    Avril 2012
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Avril 2012
    Messages : 5
    Points : 3
    Points
    3
    Par défaut comment faire pour que mon userform m'affiche la dernière cellule non vide
    Bonsoir, j'ai vraiment du mal avec le vba.
    mon problème et que je souhaiterais que mon userform qui me sert à remplir mon tableau, me mette directement sur la prochaine cellule à remplir dès que je l'ouvre et je ne sais pas comment m'y prendre ni par quoi commencer, je galère vraiment s'il vous plaît.
    je vous remercie d'avance.

  2. #2
    Expert éminent Avatar de casefayere
    Homme Profil pro
    RETRAITE
    Inscrit en
    Décembre 2006
    Messages
    5 138
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 70
    Localisation : France, Ardennes (Champagne Ardenne)

    Informations professionnelles :
    Activité : RETRAITE
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Décembre 2006
    Messages : 5 138
    Points : 9 548
    Points
    9 548
    Par défaut
    Bonsoir,
    Si tu cherches en colonne A, par exemple :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Dim dl as long 'déclaration d'une variable
    With sheets("Feul1")'à remplacer par le nom de ta feuille
       dl = .Range("A" & .Rows.Count).End(Xlup).Row + 1
       MsgBox dl 'pour tester
    End With

  3. #3
    Candidat au Club
    Homme Profil pro
    Inscrit en
    Avril 2012
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Avril 2012
    Messages : 5
    Points : 3
    Points
    3
    Par défaut
    Merci pour ton aide, mais j'ai résolu mon problème voilà ce qu'il suffisait de faire
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ComboBox2.ListIndex = Int(WorksheetFunction.CountA(Range("C2:N22")) / 21)
    dans "UserForm_Initialize".

  4. #4
    Expert éminent sénior
    Avatar de kiki29
    Homme Profil pro
    ex Observeur CGG / Analyste prog.
    Inscrit en
    Juin 2006
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : ex Observeur CGG / Analyste prog.

    Informations forums :
    Inscription : Juin 2006
    Messages : 6 132
    Points : 11 274
    Points
    11 274
    Par défaut
    Sakut, à titre documentaire voir ici

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

Discussions similaires

  1. comment faire pour que mon parseur XML n'échappe pas les carctères tels que ">" par exemple ?
    Par _LittleFlea_ dans le forum Format d'échange (XML, JSON...)
    Réponses: 4
    Dernier message: 16/10/2009, 16h25
  2. Comment faire pour que mon formulaire soir exécuté quand je tape Entrée
    Par pierrot10 dans le forum Balisage (X)HTML et validation W3C
    Réponses: 11
    Dernier message: 17/06/2009, 23h04
  3. Réponses: 2
    Dernier message: 22/04/2009, 20h47
  4. Comment faire pour que mon image devienne un lien
    Par pierrot10 dans le forum Général JavaScript
    Réponses: 38
    Dernier message: 25/06/2007, 20h49
  5. Réponses: 3
    Dernier message: 24/04/2007, 19h45

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