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 :

Info bulle pour celluleS sélectionnéeS


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
    Août 2007
    Messages
    24
    Détails du profil
    Informations personnelles :
    Âge : 49
    Localisation : France

    Informations forums :
    Inscription : Août 2007
    Messages : 24
    Par défaut Info bulle pour celluleS sélectionnéeS
    Bonjour à tous,

    Comment que ca va aujourd'hui? Bon, voila, je souhaiterais savoir si à votre connaissance il est possible (et comment, bien-sur) de faire apparaitre une info bulle qui donnerais à l'utilisateur le nombre de ligne et colonne formant la zone qu'il est en train de selectionner sur une feuille excel, tout ca en VBA.

    Si quelqu'un connait le truc ou aurait une idée, chui preneur

    Merci d'avance

  2. #2
    Membre chevronné
    Profil pro
    Inscrit en
    Octobre 2006
    Messages
    393
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2006
    Messages : 393
    Par défaut
    Euh... Il faut vraiment une info-bulle?
    Car sinon à côté de la barre d'adresse, dans la barre de noms (Zone nom), c'est déjà affiché (Excel 2000)

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Août 2007
    Messages
    24
    Détails du profil
    Informations personnelles :
    Âge : 49
    Localisation : France

    Informations forums :
    Inscription : Août 2007
    Messages : 24
    Par défaut
    slt

    ben disons que ce serait le top mais j'ai bien l'impression que cela est impossible au vu des sites que j'ai vu
    Pour ton idée, cela pourrait me donner une piste de remplacement. effectivement cette info existe deja mais je dois l'exploité après (ex : 1 ligne = 50 cm)
    P-e en créant dans la barre de tache, un controle me donnant le nombre de lignes selectionnée X ma valeur....

    J'avoue que je seche un peu

  4. #4
    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
    bonsoir

    Je n'ai pas bien compris ce que tu tu veux afficher dans l'infobulle mais tu peux utiliser les propriétés des listes de validation et l'evenement SelectionChange de la feuille, pour afficher une infobulle:


    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
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      With Selection.Validation
           .Delete
           .Add Type:=xlValidateInputOnly, AlertStyle:=xlValidAlertStop, _
            Operator:=xlBetween
            .IgnoreBlank = True
            .InCellDropdown = True
            .InputTitle = "Titre"
            .ErrorTitle = ""
            .InputMessage = Selection.Address
            .ErrorMessage = ""
            .ShowInput = True
            .ShowError = True
        End With
     
    End Sub


    bonne soirée
    michel

  5. #5
    Membre averti
    Profil pro
    Inscrit en
    Août 2007
    Messages
    24
    Détails du profil
    Informations personnelles :
    Âge : 49
    Localisation : France

    Informations forums :
    Inscription : Août 2007
    Messages : 24
    Par défaut information visuelle sur dimension de la selection
    Re_bjr à tous,


    Apparement, personne ne connait la solution à mon problème...
    Alors je me permet de vous demander si vous auriez une autre piste pour moi, je vous explique :
    Un utilisateur selectionne à l'aide de sa souris un certain nombre de cellules contigues sur une feuille excel de sorte de former un carré. Chaque cellule correspond à une distance (ex : 50cm)
    Je souhaiterais trouver un moyen pour que l'utilisateur connaisse la dimension de son carré à tout instant par une information visuelle qui se mettrait à jour à chaque changement de dimension de sa selection.
    Au début, j'avais pensé à une info-bulle mais il semblerait que cela ne soit pas possible sur des cellules.
    Ma deuxieme piste serait un champs dans la barre de commande lui donnant les dimension mais je sais pas faire...
    Bref, j'ai un peu besoin d'aide si vous aviez le temps de vous pencher sur mon cas

    Par avance merci

    Janot

  6. #6
    Expert confirmé Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 756
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 51
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    J'ai peut être ta solution

    Dans ce code j'ai utilisé les commentaires de la première cellule sélectionnées pour afficher un message.
    Cette cellule est sauvegardé pour que si tu clic ailleur le commentaire précédent s'efface

    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
    17
    18
    19
     
    Dim saveRange As Range
     
     
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    On Error Resume Next
     
    Dim strRange() As String
     
    saveRange.Comment.Delete
     
    strRange = Split(Target.Address, ":")
    Set saveRange = Range(strRange(0))
     
    saveRange.AddComment
    saveRange.Comment.Visible = True
    saveRange.Comment.Text Text:="Texte a mettre"
     
    End Sub

  7. #7
    Membre averti
    Profil pro
    Inscrit en
    Août 2007
    Messages
    24
    Détails du profil
    Informations personnelles :
    Âge : 49
    Localisation : France

    Informations forums :
    Inscription : Août 2007
    Messages : 24
    Par défaut
    Salut Jfontaine,

    L'idée est interressante mais le problème est que l'utilisateur est obligé de lacher le bouton de la souris, et donc de terminer sa selection pour voir apparaitre le message.
    Et c'est justement ce que je veux éviter pour lui éviter de refaire 36 fois sa selection jusqu'a ce qu'il obtienne la dimension qu'il cherchait

    Si t'arrive a trouver, fais moi signe stp...(et je t'appelerais )
    De mon coté, si je trouve, je ne manquerais pas de partager l'info

    Encore merci

Discussions similaires

  1. Info Bulle pour légender une feuille
    Par caloumaya dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 19/06/2007, 15h07
  2. [MySQL] reprendre les infos d'une bd pour mettre dans une info bulle
    Par luciedoudou dans le forum PHP & Base de données
    Réponses: 3
    Dernier message: 19/01/2007, 13h55
  3. Réponses: 3
    Dernier message: 18/06/2005, 00h31

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