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 :

remplir label dans userform à partir d'un clic cellule d'un autre classeur


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre à l'essai
    Homme Profil pro
    technicien qualité
    Inscrit en
    Août 2015
    Messages
    6
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : technicien qualité

    Informations forums :
    Inscription : Août 2015
    Messages : 6
    Par défaut remplir label dans userform à partir d'un clic cellule d'un autre classeur
    Bonjour,

    j'aurai besoin de votre aide pour pouvoir remplir un label d'un userform, quand je clic sur une cellule dans un classeur autre que celui où se trouve le userform.

    Plus clairement,

    - j'ai tout un ensemble de modules sur un classeur et un de ces modules ouvre un classeur et mon userform ( le classeur n'est pas toujours le même).
    - je voudrais quand je clic sur une cellule de ce classeur que un label dans mon userform affiche le contenu de la cellule sélectionnée.

    sur le principe ça a pas l'air super compliqué mais je galère....

    j'ai bien pensé à chercher si on pouvait faire quelques du genre :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
     
    UserForm.Label2.Caption = Target.Value
     
    End Sub
    mais malheureusement j'ai rien trouvé de concluant.

    donc si vous avez une petites astuce pas super compliqué pour réaliser ce que je veut je suis preneur.

    merci par avance de votre aide.

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour,
    UserForm ou UserForm1?

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
     
    UserForm.Label2.Caption = Target.Value
     UserForm.show
    End Sub

  3. #3
    Membre à l'essai
    Homme Profil pro
    technicien qualité
    Inscrit en
    Août 2015
    Messages
    6
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : technicien qualité

    Informations forums :
    Inscription : Août 2015
    Messages : 6
    Par défaut
    bonjour,

    ni l'un ni l'autre, mon UserForm à totalement un autre nom la c’était juste pour l'exemple mais à première vu cette fonction ne marche que pour le classeur où le Userform se trouve.

  4. #4
    Invité
    Invité(e)
    Par défaut
    je suis incapable de finir tes phrase!

    UserForm est un clase

    toto.show; MyUserForm.sow???????
    Dernière modification par AlainTech ; 05/09/2015 à 10h42. Motif: Suppression de la citation inutile

  5. #5
    Membre à l'essai
    Homme Profil pro
    technicien qualité
    Inscrit en
    Août 2015
    Messages
    6
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : technicien qualité

    Informations forums :
    Inscription : Août 2015
    Messages : 6
    Par défaut
    Je comprends pas tous la...

    cette fonction peut fonctionner sur plusieurs classeurs ou juste sur le classeur où est créer mon UserForm?

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
     
    UserForm.Label2.Caption = Target.Value
     UserForm.show
    End Sub
    pour tester cette fonction je l'ai mise dans "Thisworkbook" de mon projet, c'est bien la qu'elle est normalement placé?

  6. #6
    Invité
    Invité(e)
    Par défaut
    Bonjour,
    comment s'appel ton UserForm? je veux dire quel nom à ton UserForm?

    Google.Traducteur(how to call your UserForm? I mean what name to your UserForm?)

Discussions similaires

  1. [XL-2007] Label dans Userform non actualisé
    Par magikmed dans le forum Excel
    Réponses: 1
    Dernier message: 29/06/2015, 14h15
  2. Réponses: 6
    Dernier message: 16/06/2011, 12h45
  3. [XL-2007] Entrée la valeur d'une cellule d'un autre classeur dans une variable
    Par Coco_O dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 27/05/2011, 16h25
  4. Réponses: 7
    Dernier message: 23/08/2010, 22h26
  5. Réponses: 5
    Dernier message: 06/04/2007, 14h05

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