Microsoft 365 Bulle : affichage à droite de la cellule cliquée

Créer une discussion
Répondre

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
Usine à gaz

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,
Je vous souhaite un beau WE 🙂

Je fais appel à nos ténors pour un affichage que je ne sais pas faire.
Est-il possible :
1649494874849.png

Mes tests et recherches sont infructueuses.
Auriez-vous le bon code ?

Je joins un p'tit fichier test,
Et je continue à chercher.
Un grand merci, encore une fois,
Amicalement,
lionel 🙂
 

Pièces jointes

Solution
job75
Bonjour Lionel, le forum,

Oui ce n'est pas très facile, il faut repérer l'adresse de la cellule active :
VB: 
Private Sub Worksheet_SelectionChange(ByVal R As Range)
With Shapes("Bulle narrative : rectangle à coins arrondis 1")
    If Intersect(ActiveCell, Range("a2:a6")) Is Nothing Then .Visible = False: Exit Sub
    .Left = ActiveCell.Offset(, 1).Left
    .Top = ActiveCell.Top
    .Visible = CStr([adresse]) <> ActiveCell.Address Or .Visible = False
    ThisWorkbook.Names.Add "adresse", ActiveCell.Address 'repérage
    Application.EnableEvents = False
    [a1].Select
    Application.EnableEvents = True
End With
End Sub
A+
Trier par date Trier par votes
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Usine à gaz
  • Résolu(e)
XL 2021 Cellule vide : sélectionner et atteindre
2
Réponses
15
Affichages
1 K
Usine à gaz
Usine à gaz
Usine à gaz
  • Résolu(e)
Microsoft 365 Coloration de ma bulle
Réponses
2
Affichages
412
Usine à gaz
Usine à gaz
Usine à gaz
  • Résolu(e)
XL 2021 copier en B7 la valeur de la cellule active (Cells(ActiveCell.Row, 7)) de la feuille "Appels"
Réponses
12
Affichages
560
Usine à gaz
Usine à gaz
Usine à gaz
  • Question Question
XL 2021 Est-il possible d'afficher l'info bulle au passage sur une cellule ?
2 3
Réponses
36
Affichages
3 K
Usine à gaz
Usine à gaz
Usine à gaz
  • Résolu(e)
XL 2021 Est-il possible d'activer ou désactiver un gif en vba ?
2 3
Réponses
39
Affichages
2 K
Dranreb
Dranreb
Usine à gaz
  • Résolu(e)
XL 2021 Sélectionner la 1ère cellule après filtrage
Réponses
2
Affichages
528
Usine à gaz
Usine à gaz
Usine à gaz
  • Résolu(e)
XL 2021 Compter le nombre de cellules qui contiennent la date d'aujourd'hui
2
Réponses
17
Affichages
1 K
job75
job75
Usine à gaz
  • Résolu(e)
XL 2021 Calendrier : à l'affichage ne pas sélectionner de date
2
Réponses
29
Affichages
1 K
Usine à gaz
Usine à gaz
C
  • Question Question
XL 2019 Attribuer un % en fonction de la place d'un ingrédient dans la compo de la formule
Réponses
7
Affichages
506
TooFatBoy
TooFatBoy
G
  • Résolu(e)
XL 2019 Trier par ordre alphabétique de gauche à droite
Réponses
7
Affichages
482
Goffy
G
Usine à gaz
  • Question Question
XL 2021 Formule compter les cellules vides lusqu'à la dernière ligne NON vide
Réponses
10
Affichages
1 K
Usine à gaz
Usine à gaz
Usine à gaz
  • Résolu(e)
XL 2021 Déplacement dans Excel
Réponses
11
Affichages
472
vgendron
vgendron
Usine à gaz
  • Résolu(e)
Microsoft 365 Bulle : affichage - position et format texte
Réponses
8
Affichages
975
Usine à gaz
Usine à gaz
Usine à gaz
  • Résolu(e)
XL 2021 Coller des données d'une page web OUVERTE vers feuille Excel
2 3
Réponses
43
Affichages
3 K
job75
job75
Usine à gaz
  • Question Question
Microsoft 365 InputBox : saisir ou modifier le contenu de la cellule cliquée à l'aide de l'InputBox
4 5 6
Réponses
86
Affichages
6 K
Usine à gaz
Usine à gaz
Usine à gaz
  • Question Question
Microsoft 365 ComboBox : Mettre la 1ère ligne en rouge
Réponses
6
Affichages
833
patricktoulon
patricktoulon
Usine à gaz
  • Question Question
XL 2021 dupliquer une feuille
Réponses
5
Affichages
612
Usine à gaz
Usine à gaz
Usine à gaz
  • Résolu(e)
XL 2021 Mettre en numérique une cellule texte
2
Réponses
26
Affichages
1 K
TooFatBoy
TooFatBoy
cathodique
  • Résolu(e)
XL 2010 Liste filtrée pour combobox à 1 ou x colonne(s) (Titre màj)
5 6 7
Réponses
97
Affichages
8 K
patricktoulon
patricktoulon
Usine à gaz
  • Résolu(e)
Microsoft 365 condition sur texte d'une bulle
Réponses
11
Affichages
729
Usine à gaz
Usine à gaz
Retour