Commentaires adaptés aux cellules

Fermé

Guy72 Messages postés 907 Date d'inscription dimanche 18 novembre 2007 Statut Membre Dernière intervention 26 avril 2024 - 13 mars 2023 à 10:25
Guy72 Messages postés 907 Date d'inscription dimanche 18 novembre 2007 Statut Membre Dernière intervention 26 avril 2024 - 13 mars 2023 à 16:51

Bonjour,
J'ai une macro excellente, (qui est de CCM) qui me permet de mettre un message automatiquement à coté d'une cellule.
Avec un extrait de ce code ci-dessous.

With .Cells(Ligne, Col)
                                .AddComment
                                .Comment.Text Text:=Texto
                                .Comment.Shape.OLEFormat.Object.Font.Name = "Arial"
                                .Comment.Shape.OLEFormat.Object.Font.Size = 6
                                .Comment.Shape.OLEFormat.Object.Font.FontStyle = "bold"
                                .Comment.Shape.TextFrame.AutoSize = True
                                .Comment.Shape.Top = .Top
                                .Comment.Shape.Left = .Left
                            End With

Mais au lieu d'avoir la taille automatique, puis-je avoir le message dans la cellule (dimension de la cellule L=90, H=36)
(si c'est possible bien sûr), sans doute à la place de la ligne de code ci-dessous ???

.Comment.Shape.TextFrame.AutoSize = True

Windows / Edge 110.0.1587.69

A voir également:

Clément a partagé le fichier mme bovary. il a écrit des commentaires dans le document. quel est le 2e commentaire ?
Commentaire dans Word : afficher, insérer, supprimer… - Guide
Fichier rar - Guide
Dans le message facebook ci-dessous, clément a commenté une photo publiée par cindy. qui peut voir le commentaire de clément selon les règles de ce réseau social ? ✓ - Forum Logiciels
Dans la table des matières du document à télécharger, le chapitre 6 et ses 2 sections n'apparaissent pas. trouvez l'erreur dans la structure du document et corrigez-la. mettez à jour la table des matières. quel est le mot formé par les lettres en majuscules de la table des matières après sa mise à jour ? - Forum Word
Cette action ne peut pas être réalisée car le fichier est ouvert dans system - Guide

2 réponses

Réponse 1 / 2

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
13 mars 2023 à 11:36

Bonjour,

With .Cells(Ligne, Col)
                                .AddComment
                                .Comment.Text Text:=Texto
                                .Comment.Shape.OLEFormat.Object.Font.Name = "Arial"
                                .Comment.Shape.OLEFormat.Object.Font.Size = 6
                                .Comment.Shape.OLEFormat.Object.Font.FontStyle = "bold"
                                .Comment.Shape.TextFrame.AutoSize = True
                                .Comment.Shape.Top = .Top
                                .Comment.Shape.Left = .Left
                                .Comment.Shape.Height = 36 
                                .Comment.Shape.Width = 90
                            End With

Réponse 2 / 2

Guy72 Messages postés 907 Date d'inscription dimanche 18 novembre 2007 Statut Membre Dernière intervention 26 avril 2024 21
13 mars 2023 à 16:51

Ça fonctionne impeccable !!!
Merci pour la solution.

il y a juste un truc que je ne comprends pas:
La cellule fait (36x90 pixels)
Et finalement pour que ça rentre dans la cellule, il a fallu que je mette (26x68) ??

Discussions similaires

programme qui n'affiche pas le mot secret

Trouver le mot réellement écrit en lettres capitales PIX

comment donner les droits sur fichier partage

Chemin Logo du site de la Cité de l'espace

Comment trouver les fichier cachés ?

Discussions similaires

Newsletters