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 :

Prendre une cellule en paramètre en demandant à l'utilisateur de la sélectionner [XL-2010]


Sujet :

Macros et VBA Excel

  1. #1
    Membre confirmé
    Inscrit en
    Mai 2009
    Messages
    57
    Détails du profil
    Informations forums :
    Inscription : Mai 2009
    Messages : 57
    Par défaut Prendre une cellule en paramètre en demandant à l'utilisateur de la sélectionner
    Bonjour,

    Il me semble qu'il est possible de prendre en paramètre une cellule que l'utilisateur sélectionnerait lui même suite à un message.

    Je pense que ça doit être par la fonction Input à priori (??), mais je ne parviens pas à trouver comment faire.

    Connaissez vous la solution?

    Merci d'avance pour votre aide

    ----EDIT:-----
    entre temps j'ai retrouvé une macro qui faisait cela.
    Voici le code:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Set Cellule = Application.InputBox("Sélectionnez dans le tableau le paramètre sur lequel porte l'étude", Type:=8)
    Par contre savez vous à quoi correspond le "type = 8" dans ce code?

  2. #2
    Expert confirmé
    Avatar de fring
    Homme Profil pro
    Engineering
    Inscrit en
    Février 2008
    Messages
    3 900
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 62
    Localisation : Belgique

    Informations professionnelles :
    Activité : Engineering

    Informations forums :
    Inscription : Février 2008
    Messages : 3 900
    Par défaut
    Bonjour,

    Sélectionne InputBox dans ton code, ensuite -->
    Tu auras l'explication sur les différents types

  3. #3
    Membre chevronné
    Profil pro
    Inscrit en
    Décembre 2008
    Messages
    389
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2008
    Messages : 389
    Par défaut
    Bonjour,

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    Sub test2()
    Dim laSelection As Range
     
        On Error Resume Next
        Application.DisplayAlerts = False
        Set laSelection = Application.InputBox(msg, titre, , , , , , 8)
        Application.DisplayAlerts = True
     
        If laSelection Is Nothing Then
            MsgBox "Vous avez cliqué sur ""Annuler"""
            Exit Sub
        End If
     
        MsgBox "Vous avez sélectionné la plage : " & laSelection.Address
     
    End Sub
    F1 sur InputBox devrait fournir les informations nécessaires

    JP

  4. #4
    Membre confirmé
    Inscrit en
    Mai 2009
    Messages
    57
    Détails du profil
    Informations forums :
    Inscription : Mai 2009
    Messages : 57
    Par défaut
    Merci, je ne connaissais pas cette fonction

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

Discussions similaires

  1. [E-03] comment utiliser une donnée que l'on demande à l'utilisateur ?
    Par Emily2711 dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 23/02/2009, 19h41
  2. Valeur d'une cellule en paramètres
    Par donabut dans le forum Langage SQL
    Réponses: 2
    Dernier message: 09/12/2008, 11h51
  3. Prendre la valeur dans une cellule d'un formulaire
    Par benjiprog dans le forum VBA Access
    Réponses: 13
    Dernier message: 18/07/2007, 16h23
  4. Réponses: 7
    Dernier message: 08/03/2007, 11h08
  5. [VBA-Excel] - Demander à l'utilisateur de choisir une cellule
    Par MrYoYo dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 14/02/2007, 11h54

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