Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 [Résolu] Afficher une image en inscrivant la première lettre d'un nom

Lone-wolf

XLDnaute Barbatruc
Bonjour le Forum

Après multi tentatives en prenant des exemples de Jacques Boisgontier, je me retourne vers vous pour résoudre mon problème. En effet, j'aimerais afficher une image lors de l'inscription de la première lettre d'une adresse email (ou nom de la personne), et là, impossible. l'image s'affiche si je clique sur la cellule du dessous.

Le fichier s'utilise de cette façon:

On choisi un nom dans la liste de la feuille "Formulaire", les données sont affichées. Ensuite, on clique sur le bouton "Outlook" et on affiche la feuille "Envois Outlook". Dans la cellule "Envoyer à :", on commence à écrire l'adresse email, et c'est ici que l'image devrait s'afficher.
 

Pièces jointes

  • Gestion des contacts.zip
    139.4 KB · Affichages: 44
Trier par date Trier par votes

job75

XLDnaute Barbatruc
Bonjour Lone-wolf,

Tu devrais savoir que quand le curseur est dans une cellule (mode édition) aucune macro ne peut s'exécuter.

Les 2 images s'affichent/se masquent uniquement quand on valide/efface la cellule C4.

A+
 
Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc
Re,

Le survol d'une cellule ne crée aucun évènement susceptible de déclencher une macro.

Par contre il permet d'afficher un commentaire et celui-ci peut contenir le texte désiré.

Bonne nuit.
 
Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc
Bonjour Job , le Forum

J'ai fini par trouvé la solution grâce à un fichier de Jacques Boigontier où il propose de mettre un contrôle label sur la cellule. J'aimerais maintenant faire un retour à la ligne sans agrandir la cellule (si possible de le faire bienentendu), après avoir inserer les 5 premières adresses emails. C'est vrai que maintenant il y en a que 5 , mais c'est au cas où je rallonge la liste.
 

Pièces jointes

  • Gestion des contacts.zip
    151.3 KB · Affichages: 43
Dernière édition:
Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc
Re job

Problème résolu, voici la solution(à adapter)

VB: 
Dim deb As Byte, cel As range
deb = InStr(1, cel, ";")
       If deb = 1 Then _
          cel = Left(cel, deb) & vbLf & Right(cel, Len(cel) - deb)
     ActiveSheet.Rows(6).Height = 13.5
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

S
  • Question
Microsoft 365 Macro pour Copier une feuille Excel en tant qu'image dans outlook
Réponses
3
Affichages
1 K
fanch55
  • Résolu(e)
XL 2010 Afficher dans une cellule d'un onglet XYZ la valeur d'une cellule d'un onglet portant le nom du mois en cours
Réponses
2
Affichages
988
PatFr38
N
  • Résolu(e)
XL 2016 Compléter cellule une fois la macro réalisée
Réponses
7
Affichages
775
Phil69970
L
  • Question
Problème pour afficher une image liée à un Combobox (Liste déroulante) dans un formulaire
Réponses
4
Affichages
1 K
Legendre
L
  • Question
Autres Excel 2007: Comment afficher l'image d'un article se trouvant dans une cel d'une feuil A dans cel d'une feuil B en saisissant le N° de l'article
Réponses
2
Affichages
831
kkamadou
B
  • Résolu(e)
XL 2013 Insérer une image dans une cellule, l'ajuster à la taille de la cellule et l'enregistrer avec le classeur
Réponses
1
Affichages
2 K
Lolote83
L
A
  • Question
XL 2016 VBA Envoi d'un email avec une image dans le corps du message
Réponses
4
Affichages
13 K
vivi14
V
S
  • Question
XL 2019 Insérer une image en fonction de valeur cellule mais sur plusieurs lignes
Réponses
11
Affichages
4 K
job75
H
  • Question
XL 2010 Afficher une image avec une condition : si oui -> afficher si non -> pas afficher
Réponses
6
Affichages
2 K
harchi
H
A
  • Question
Macro - centrer une image importé dans une cellule
Réponses
0
Affichages
2 K
Anarhim
A
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…