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 :

[VBA-E] Récupérer le numéro de ligne où se trouve un bouton


Sujet :

Macros et VBA Excel

  1. #1
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Juin 2003
    Messages
    60
    Détails du profil
    Informations personnelles :
    Âge : 46
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations forums :
    Inscription : Juin 2003
    Messages : 60
    Points : 38
    Points
    38
    Par défaut [VBA-E] Récupérer le numéro de ligne où se trouve un bouton
    Bonjour,

    Je suis sous excel.
    Je souhaite créer 1 bouton par ligne dans la même colonne.
    L'idée c'est que lorsque je clique sur le bouton d'une ligne, 1 mail est envoyé avec les infos de la ligne où se trouve le bouton.

    Pour le mail pas de PB.

    Par contre, pour récupérer en paramètre le numéro de ligne où se trouve le bouton, je sèche !

    Je ne souhaite pas créer 1 à 1, 40 boutons avec des noms differents, l'idée ce serait d'avoir tous les mêmes boutons qui pointent vers la même function, seule différence ce fameux paramètre de ligne !

    merci d'avance
    Freiya
    (j'ai cherché dans la faq mais j'ai pas trouvé, si cela est expliqué quelque part, veuillez me donner le lien)

  2. #2
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Juin 2003
    Messages
    60
    Détails du profil
    Informations personnelles :
    Âge : 46
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations forums :
    Inscription : Juin 2003
    Messages : 60
    Points : 38
    Points
    38
    Par défaut
    merci je vais essayer de voir comment coder ton idée.

    on peut pas faire un truc du style

    ChaqueBouton_Click()

    Tant que (j'ai quelque chose dans ma colonne X) parcour de chaque ligne
    SI le top de mon bouton est proche du top de ma cellule
    ALORS numLigne= num de la cellule en cours (je sort de la boucle)
    SINON je passe à la suivante

    appel de maFunction(numLigne)

    end


    Malheureusement j'ai vraiment pas l'habitude de coder en VBA.
    Il y aurait-il moyen de m'aider à traduire ce pseudo algo en langage VBA ???

    merci d'avance

  3. #3
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Juin 2003
    Messages
    60
    Détails du profil
    Informations personnelles :
    Âge : 46
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations forums :
    Inscription : Juin 2003
    Messages : 60
    Points : 38
    Points
    38
    Par défaut
    oui je suis interressée c'est quoi ??

    (j'avais pensé aux boutons option mais ...)

  4. #4
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Juin 2003
    Messages
    60
    Détails du profil
    Informations personnelles :
    Âge : 46
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations forums :
    Inscription : Juin 2003
    Messages : 60
    Points : 38
    Points
    38
    Par défaut
    Excellent merci

    Bon j'ai regardé les 2 soluces

    Ok -> l'idée des boutons c'était pourri ;-) mais parecque je ne connaissais pas la soluce 2.

    La soluce 2 : OK j'ai testé, juste 1 question, là ta function MaMacroQuiVaBien se lance quelque soit la cellule où l'on clique (partout)

    comment faire pour qu'elle ne se lance que l'orsque je clique dans une cellule de la colonne A ou 1 par exemple.


  5. #5
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Juin 2003
    Messages
    60
    Détails du profil
    Informations personnelles :
    Âge : 46
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations forums :
    Inscription : Juin 2003
    Messages : 60
    Points : 38
    Points
    38
    Par défaut
    Exact mes neuronnes sont un peu à l'arrêt aujourd'hui et j'ai bien profité de ta gentillesse

    Merci encore, j'le ferai plus !

    (j'suis plus à l'aise en php quand même ...)
    A+ aussi

  6. #6
    Nouveau Candidat au Club
    Inscrit en
    Septembre 2007
    Messages
    1
    Détails du profil
    Informations forums :
    Inscription : Septembre 2007
    Messages : 1
    Points : 1
    Points
    1
    Par défaut Reponse de cette discussion
    Est il possible de recuperer les reponses envoyees a Freiya. J'ai exactement le meme probleme.

    Merci d'avance ...

  7. #7
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 543
    Points
    15 543
    Par défaut
    Freiya, il serait effectivement sympa pour les autres de donner la solution que t'a donné l'inconnu par mp sur le forum.
    taboulet, si "l'inconnu" ne t'a pas répondu par mp, pose ta question sur le forum, on te répondra
    Dans le cas contraire, personne n'aura la solution et cette discussion sera une discussion perdue pour la recherche

  8. #8
    Modérateur
    Avatar de AlainTech
    Homme Profil pro
    Consultant informatique
    Inscrit en
    Mai 2005
    Messages
    4 235
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 70
    Localisation : Belgique

    Informations professionnelles :
    Activité : Consultant informatique
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2005
    Messages : 4 235
    Points : 24 327
    Points
    24 327
    Par défaut
    Après 2 ans, je doute que Freiya réponde encore...
    N'oubliez pas de cliquer sur quand vous avez obtenu ou trouvé vous-même la réponse à votre question.
    Si vous trouvez seul, pensez à poster votre solution. Elle peut servir à d'autres!
    Pensez aussi à voter pour les réponses qui vous ont aidés.
    ------------
    Je dois beaucoup de mes connaissances à mes erreurs!

  9. #9
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 543
    Points
    15 543
    Par défaut
    Eh ! Il était encore là le 15/06/2007, Freiya... Tu penses qu'il a oublié la réponse qu'il a reçu en 2005 ?

    (salut Alain)

  10. #10
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Juin 2003
    Messages
    60
    Détails du profil
    Informations personnelles :
    Âge : 46
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations forums :
    Inscription : Juin 2003
    Messages : 60
    Points : 38
    Points
    38
    Par défaut Revival !
    Bonjour à Tous,

    Désolée je ne code plus très souvent et cela faisait un moment que je n'étais pas passée par là.

    C'est la 2ième personne qui me pose la question et encore une fois désolée de ne pouvoir donner une réponse car en fin de compte j'avais opté pour une autre solution.
    A l'époque je n'avais pas vu que les réponses que l'on m'avait donnés étaient en MP ? Il y a t-il un moyen que je puisse visualiser ces Messages afin de vous les transmettre ?

    j'ai retrouvé ce vieux bout de code ... hum, si cela peut aider.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
     
    Dim NoColonne, NoLigne
     
        NoColonne = 13 'numéro de colonne où l'on veut le contrôle
        NoLigne = ActiveCell.Row
        If NoColonne = ActiveCell.Column Then
            Mail_Inform (NoLigne)
        End If
    End Sub
    Plutôt que de créer un bouton, j'ai pris cette soluce.
    Lorsque l'on clique dans une des cellules de la colonne spécifiée cela active ma fonction Mail_Inform (NoLigne) qui envoie un mail avec les données se trouvant sur la ligne passée en paramètre

    Bonne journée
    Freiya

  11. #11
    Candidat au Club
    Profil pro
    Inscrit en
    Mai 2008
    Messages
    3
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2008
    Messages : 3
    Points : 3
    Points
    3
    Par défaut
    Bonjour,
    Toujours utile de partager !

    Cette astuce m'a bien aidé
    ...

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

Discussions similaires

  1. Réponses: 11
    Dernier message: 12/09/2014, 15h02
  2. Réponses: 2
    Dernier message: 17/06/2010, 16h03
  3. Réponses: 2
    Dernier message: 05/10/2004, 22h43

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