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 :

UserForm récalcitrant ! [XL-365]


Sujet :

Macros et VBA Excel

  1. #1
    Membre confirmé
    Inscrit en
    Décembre 2008
    Messages
    101
    Détails du profil
    Informations forums :
    Inscription : Décembre 2008
    Messages : 101
    Par défaut UserForm récalcitrant !
    Bonjour !
    j'ai un fichier avec 1 feuille et un userform.
    La feuille "HEmpl" reçoit une liste d'enregistrements avec horodatage en colonne A (je ne l'ai pas défini sous forme de tableau).
    La variable DLE a été définie au dessus de option explicit.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Dim L, DLE As Integer
    Option Explicit
    Pour L'userform :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Sub UserForm_Initialize()
    DLE = Sheets("HEmpl").Cells(1, 1).End(xlDown).raws
    Tb01.SetFocus
    End Sub
    Lorsque je lance l'userform j'obtiens un blocage :
    "Erreur d'exécution 438
    Propriété ou méthode non gérée par cet objet."
    Voila pourquoi je suis là ! Je n'arrive pas à trouver le noeud du problème.
    Help ! Help ! Pourriez-vous m'aider SVP ? Je n'avance plus !!
    Merci par avance pour votre aide!

  2. #2
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Citation Envoyé par Alain7751 Voir le message
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DLE = Sheets("HEmpl").Cells(1, 1).End(xlDown).raws
    Quand le VBE ne mets pas l'initiale d'un terme (commande, fonction, objet ou membre) en majuscule, c'est généralement qu'il y a un problème.

  3. #3
    Membre émérite Avatar de Alex020181
    Homme Profil pro
    Prestataire informatique développeur d'application Excel, Access, VBA
    Inscrit en
    Juin 2012
    Messages
    601
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 44
    Localisation : France, Essonne (Île de France)

    Informations professionnelles :
    Activité : Prestataire informatique développeur d'application Excel, Access, VBA

    Informations forums :
    Inscription : Juin 2012
    Messages : 601
    Par défaut
    Citation Envoyé par Menhir Voir le message
    Quand le VBE ne mets pas l'initiale d'un terme (commande, fonction, objet ou membre) en majuscule, c'est généralement qu'il y a un problème.
    DLE = Sheets("HEmpl").Cells(1, 1).End(xlDown).raws
    M'est avis que tu devrais essayer avec "Rows" et non pas "raws".

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DLE = Sheets("HEmpl").Cells(1, 1).End(xlDown).Rows
    Je ne sais pas si cela corrigera ton problème mais au moins "Rows" est reconnu.

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

Discussions similaires

  1. VBA Excel : Appel d'un userform à l'aide d'une variable
    Par pierrot657 dans le forum Macros et VBA Excel
    Réponses: 13
    Dernier message: 01/06/2005, 23h08
  2. Répertoire récalcitrant
    Par Pedro dans le forum Windows XP
    Réponses: 15
    Dernier message: 25/03/2005, 14h06
  3. Update récalcitrant !
    Par Jeannotc dans le forum Bases de données
    Réponses: 10
    Dernier message: 16/06/2004, 18h28
  4. Un "0" récalcitrant
    Par bidson dans le forum XMLRAD
    Réponses: 4
    Dernier message: 20/04/2004, 13h56
  5. [VBA EXCEL] Réduire/Agrandir UserForms
    Par Fench dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 06/11/2003, 16h02

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