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]Target pr cell fusionnée/Worksheet_BeforeDoubleClick


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    39
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Janvier 2006
    Messages : 39
    Par défaut [VBA-E]Target pr cell fusionnée/Worksheet_BeforeDoubleClick
    (Re)Bonjour à tous !

    Lors du double-click sur une cellule, je récupère le Name de celle-ci et j'affiche des informations en fonction du Name.

    Sur une cellule normale, tout fonctionne très bien mais lorsque je double-clique sur une cellule fusionnée, j'ai l'impression que le Target ne donne aucune valeur.

    Voici le bout de code très simple mis en cause :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
     
    Private Sub Worksheet_BeforeDoubleClick([b]ByVal Target As Range[/b], Cancel As Boolean)
     
    Dim sSql, sName As String
     
       On Error Resume Next
     
       sName = Target.Name.Name
     
       Cancel = True
     
       On Error GoTo 0
     
    End Sub
    Je n'ai collé que ce qui était nécessaire et j'ai mis en gras là où je pense que ca foire.
    J'en suis même sur car avec le step-by-step je vois pas que rien ne passe dans Target quand je double click sur une cellule fusionnée.

    Que faire ?

    Merci d'avance

    Edit: apparemment les balises [b] ne passent pas dans du code, je les laisse quand même pour indiquer où ca foire !

  2. #2
    Expert confirmé
    Avatar de bidou
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Mai 2002
    Messages
    3 055
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Transports

    Informations forums :
    Inscription : Mai 2002
    Messages : 3 055
    Par défaut
    si target renvoie quelque chose, mais l'appel Target.Name n'est pas valide sur une plage fusionné.
    il faut lire avec la forme
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Target.Cells(1).Name.Name

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    39
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Janvier 2006
    Messages : 39
    Par défaut
    Citation Envoyé par bidou
    si target renvoie quelque chose, mais l'appel Target.Name n'est pas valide sur une plage fusionné.
    il faut lire avec la forme
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Target.Cells(1).Name.Name




    Merci beaucoup

  4. #4
    Membre averti
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    39
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Janvier 2006
    Messages : 39
    Par défaut
    En passant, est-il possible de créer un lien hypertexte dans une msgbox ?
    Ce lien redigerait vers une autre msgbox

  5. #5
    Xan
    Xan est déconnecté
    Membre averti
    Profil pro
    Inscrit en
    Avril 2006
    Messages
    45
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2006
    Messages : 45
    Par défaut
    Je ne pense pas que ce soit possible. A ma connaissance, les seules interactions possibles avec les MsgBox sont les boutons fournis.

    Ceci étant, mes connaissances sont peu fournies, aussi, il vaut mieux attendre les réponses de personnes plus qualifiées que moi ^^

  6. #6
    Membre Expert Avatar de Megaxel
    Profil pro
    Inscrit en
    Mai 2003
    Messages
    1 187
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2003
    Messages : 1 187
    Par défaut
    Je suis d'accord avec toi, Xan.
    Mais il est possible de substituer un msgbox à un formulaire créé par toi, et auquel tu peux donner les possibilités que tu cherches.

  7. #7
    Expert confirmé

    Homme Profil pro
    Inscrit en
    Août 2005
    Messages
    3 317
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2005
    Messages : 3 317
    Par défaut
    bonjour à tous

    tu peux tester

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Dim Reponse As String
    Reponse = MsgBox("Voulez vous activer le lien ?", vbYesNo)
    If Reponse = vbYes Then ThisWorkbook.FollowHyperlink "http://<a href="http://www.developpez.com"," target="_blank">www.developpez.com",</a> , True


    bonne journée
    michel

  8. #8
    Membre averti
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    39
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Janvier 2006
    Messages : 39
    Par défaut
    Je vais devoir faire un formulaire alors car ce que je cherche, c'est :

    Dans ma db, j'ai la liste des cellules nommées de mon programme avec l'aide et la formule correspondant.

    Si dans l'aide, un nom de cellule apparait, j'aimerais mettre un lien hypertexte vers l'aide de ce nom.

    Par exemple:

    Noms de cellules : Matricule, Age.

    Je double click sur Matricule : "Le matricule dépend de l'âge de la personne à son arrivée"

    Là, je veux un lien sur âge qui redirige vers le même formulaire qu'affiché pour Matricule mais évidemment, avec un contenu différent.

Discussions similaires

  1. [VBA-E] Compter les cellules fusionnées
    Par Korleone dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 18/08/2017, 16h09
  2. [VBA-E] Problème avec Cells.Clear
    Par cwain dans le forum Macros et VBA Excel
    Réponses: 17
    Dernier message: 19/03/2007, 12h00
  3. [VBA-E] utilisation de cells
    Par flamel dans le forum Macros et VBA Excel
    Réponses: 15
    Dernier message: 23/12/2006, 10h49
  4. [VBA-E]Travail sur cellules fusionnées
    Par AUPEDUO dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 28/09/2006, 11h35
  5. [VBA-Excel] Plagen avec Cells
    Par Damsou dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 13/01/2005, 10h49

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