Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Commentaires et valeur de cellules

Commentaires et valeur de cellules

4 réponses
Avatar
Christophe
bonsoir et de bonnes fetes a tous et a toutes

exemple : en A1 la lettre "A", de C1 à C.... des nons de film je voudrais si
cela est possible reprendre dans cette liste tous les titres de film
commencent par la lettre "A" et qu'ils soient inserer dans un commentaire en
cellule A1, et que cette meme liste ce remette a jours a chaque fois qu'un
nouveau titre qui commence par un a soit inserer
Merci de votre aide.
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Philippe.R
Bonsoir Christophe,
Ces références chez Frédéric, trouvées à ctte adresse :

http://www.excelabo.net/moteurs/moteurmultisites.php?page=1&mot=commentaire

pourraient te servir de base :

Ajouter et supprimer des commentaires
http://perso.wanadoo.fr/frederic.sigonneau/Comments.htm

Mise en forme de commentaires (apparence, texte)
http://perso.wanadoo.fr/frederic.sigonneau/Comments.htm

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"Christophe" a écrit dans le message de news:bsfo1t$fkf$
bonsoir et de bonnes fetes a tous et a toutes

exemple : en A1 la lettre "A", de C1 à C.... des nons de film je voudrais si
cela est possible reprendre dans cette liste tous les titres de film
commencent par la lettre "A" et qu'ils soient inserer dans un commentaire en
cellule A1, et que cette meme liste ce remette a jours a chaque fois qu'un
nouveau titre qui commence par un a soit inserer
Merci de votre aide.





Avatar
Christophe
Bonsoir Philippe
Rien ne correspond a ma demande :o((
Merci tout de meme de ton aide.

"Philippe.R" a écrit dans le message de
news:
Bonsoir Christophe,
Ces références chez Frédéric, trouvées à ctte adresse :


http://www.excelabo.net/moteurs/moteurmultisites.php?page=1&mot=commentaire


pourraient te servir de base :

Ajouter et supprimer des commentaires
http://perso.wanadoo.fr/frederic.sigonneau/Comments.htm

Mise en forme de commentaires (apparence, texte)
http://perso.wanadoo.fr/frederic.sigonneau/Comments.htm

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"Christophe" a écrit dans le message de
news:bsfo1t$fkf$

bonsoir et de bonnes fetes a tous et a toutes

exemple : en A1 la lettre "A", de C1 à C.... des nons de film je
voudrais si


cela est possible reprendre dans cette liste tous les titres de film
commencent par la lettre "A" et qu'ils soient inserer dans un
commentaire en


cellule A1, et que cette meme liste ce remette a jours a chaque fois
qu'un


nouveau titre qui commence par un a soit inserer
Merci de votre aide.









Avatar
AV
Ajoute d'abord un commentaire vide en A1 puis...

Dans le module de la feuille :

Private Sub Worksheet_Change(ByVal zz As Range)
If zz.Column <> 3 Then Exit Sub
If Left(zz, 1) = "A" Then
With [A1]
x = .Comment.Text
.Comment.Text Text:=x & vbLf & zz.Value
.Comment.Shape.TextFrame.AutoSize = True
End With
End If
End Sub

AV
Avatar
Christophe
Bonsoir AV
Merci de ton aide cela fonctionne impect ;o))
De bonne fêtes à toi et toute ta famille
encore merci.


"AV" a écrit dans le message de
news:e$$
Ajoute d'abord un commentaire vide en A1 puis...

Dans le module de la feuille :

Private Sub Worksheet_Change(ByVal zz As Range)
If zz.Column <> 3 Then Exit Sub
If Left(zz, 1) = "A" Then
With [A1]
x = .Comment.Text
.Comment.Text Text:=x & vbLf & zz.Value
.Comment.Shape.TextFrame.AutoSize = True
End With
End If
End Sub

AV