Aide sur ajouter commentaires - VBA

F

fvg

XLDnaute Nouveau

• 16 Mai 2008

• #16

Re : Aide sur ajouter commentaires - VBA

c'est la cellule F25, qui doit déclencher un commentaire.
aujourd'hui, je dois déclencher un controle par un bouton qui active une procédure msgbox... je sais que les utilisateurs la plupart du temps zapperont ce bouton...

je réutiliserai par ailleurs la procédure dans d'autres indroits de mon application.

en fait, j'ai compris pourquoi je ne comprenais pas vos suggestions....

Mon problème est bien de détecter une valeur précise dans une cellule précise de la feuille active... et en fonction de la valeur de cette cellule, déclencher un commentaire....
la solution de Pierre Jean ne peut pas fonctionner dans mon cas puisque quelle que soit la cellule saisie ou modifiée, celle ci déclenchera un commentaire unique... or, je veux pouvoir répéter cette procédure sur d'autres cellule, avec d'autres commentaires (en fonction du contexte).....

j'aurais mieux fait de tout de suite fournir mon exemple.... c'est balot non ?




merci par avance.

 

Dernière édition: 16 Mai 2008

Vote positif 0 Vote négatif

G

Guiv

XLDnaute Occasionnel

• 16 Mai 2008

• #17

Re : Aide sur ajouter commentaires - VBA

Bonsoir fvg, le fil,
Quelquechose comme ça??

 

Pièces jointes

• montage#.zip

  23.9 KB · Affichages: 72
• montage#.zip

  23.9 KB · Affichages: 71
• montage#.zip

  23.9 KB · Affichages: 69

Vote positif 0 Vote négatif

cbea

XLDnaute Impliqué

• 16 Mai 2008

• #18

Re : Aide sur ajouter commentaires - VBA

Bonsoir à tous,

Voici une autre solution.

 

Pièces jointes

• montage_v1.zip

  23.7 KB · Affichages: 61

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 16 Mai 2008

• #19

Re : Aide sur ajouter commentaires - VBA

bonsoir a tous

puisqu'elle est faite !!

Voila ma version ( j'evalue F25 par rapport a F23)

nb: c'est une evolution de celle de Guiv

 

Pièces jointes

• montage#.zip

  23.2 KB · Affichages: 59
• montage#.zip

  23.2 KB · Affichages: 110
• montage#.zip

  23.2 KB · Affichages: 68

Vote positif 0 Vote négatif

F

fvg

XLDnaute Nouveau

• 16 Mai 2008

• #20

Re : Aide sur ajouter commentaires - VBA

Guiv à dit:

Bonsoir fvg, le fil,
Quelquechose comme ça??

Cliquez pour agrandir...

C'est exactement ca et en plus ca marche......
J'ai enfin fini par comprendre que target était une instruction évenementielle....

En retravaillant mon fichier, j'ai voulu tenter d'introduire une deuxieme variable...
si le montant des frais et droits (F 25) est inferieur à 1 % du montant de la transaction
alors: commentaire --> frais probablement sous évalués.....
j'ai alors tenté le code suivant:

ElseIf Target.Value < Range("F8").Value * 0.01 Then
Target.Select
Target.AddComment
Target.Comment.Visible = True
Target.Comment.Text Text:= _
""" Le montant des frais a probablement été sous évalué, merci de corriger.""."

évidemement ca ne marche pas....

je voulais savoir également comment procéder si je devais avoir plusieurs commentaires sur plusieurs cellules dans la meme feuille...

je sais que j'en demande beaucoup, mais j'ai beau écumer mes manuels, je ne vois jamais de solutions à mes questions.....

ps; si vous pouviez me conseiller un vrai manuel pour apprendre le vba....

merci par avance...

 

Vote positif 0 Vote négatif

G

Guiv

XLDnaute Occasionnel

• 17 Mai 2008

• #21

Re : Aide sur ajouter commentaires - VBA

Bonjour fvg et tous,

Est-ce que la cellule de réf ne serait pas plutôt E8 (et non F8 où il n'y a rien)??
Parce qu'avec E8, ça marche tout de suite mieux...

(pour les "manuels VBA, je n'ai pas vraiment de conseils. Moi j'ai pris n'importe quoi qui m'a donné des notions de base, après j'apprends beaucoup en pratiquant et en me plantant et en recommençant, ainsi que par recherches sur le net et sur cet Xlent forum bien sûr!!! Mais c'est vrai que ça a ses limites et qu'un peu de théorie plus poussée ne me ferait pas de mal...)

Cordialement,
Guiv

 

Pièces jointes

• montage#V2.zip

  24 KB · Affichages: 43

Vote positif 0 Vote négatif

F

fvg

XLDnaute Nouveau

• 17 Mai 2008

• #22

Re : Aide sur ajouter commentaires - VBA

Guiv à dit:

Bonjour fvg et tous,

Est-ce que la cellule de réf ne serait pas plutôt E8 (et non F8 où il n'y a rien)??
Parce qu'avec E8, ça marche tout de suite mieux...

(pour les "manuels VBA, je n'ai pas vraiment de conseils. Moi j'ai pris n'importe quoi qui m'a donné des notions de base, après j'apprends beaucoup en pratiquant et en me plantant et en recommençant, ainsi que par recherches sur le net et sur cet Xlent forum bien sûr!!! Mais c'est vrai que ça a ses limites et qu'un peu de théorie plus poussée ne me ferait pas de mal...)

Cordialement,
Guiv

Cliquez pour agrandir...

Merci pour votre aide à tous,
je comprends que j'ai encore besoin de beaucoup de pratique.....

Est il possible et si oui comment, sur le meme procédé, introiduire plusieurs commentaires différents sur plusieurs cellules différente en fonction de conditions diffrérentes....

 

Vote positif 0 Vote négatif

G

Guiv

XLDnaute Occasionnel

• 17 Mai 2008

• #23

Re : Aide sur ajouter commentaires - VBA

Re,

Il faut utiliser des instructions conditionnelles (If ou SelectCase..)
Définir à chaque fois dans quelles cellules tu veux que le commentaire apparaisse, puis faire comme dans ton premier exemple : selon les valeurs prises par exemple, ou selon la couleur de la police ou la largeur de la colonne ou l'âge du capitaine... tu donnes ton instruction "AddComment"..etc
Le tout c'est de ne pas s'embrouiller dans les conditions intriquées quand il y en a beaucoup.
Bonne journée,
Guiv

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 17 Mai 2008

• #24

Re : Aide sur ajouter commentaires - VBA

Bonjour à tous

Voici 2 fichiers, un fichier XLA (macro complementaire) à installer, et un fichier exemple, le fichier exemple fourni, ne concerce que les commentaires, la macro fait beaucoup plus m'enfin

dans le fichier exemple, il n'y a aucune macro.

 

Pièces jointes

• Gw_mfc_V7.3.zip

  47 KB · Affichages: 47
• fvg.zip

  6.1 KB · Affichages: 42
• Gw_mfc_V7.3.zip

  47 KB · Affichages: 47
• fvg.zip

  6.1 KB · Affichages: 46
• Gw_mfc_V7.3.zip

  47 KB · Affichages: 59
• fvg.zip

  6.1 KB · Affichages: 45

Vote positif 0 Vote négatif

G

Guiv

XLDnaute Occasionnel

• 18 Mai 2008

• #25

Re : Aide sur ajouter commentaires - VBA

Bonjour,
Je suis allé voir les autres fonctionnalités de la macro complémentaire...
Bravo Wilfried_42!!!
Bonne journée à tous
Guiv

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 18 Mai 2008

• #26

Re : Aide sur ajouter commentaires - VBA

Bonjour,

Code:

Ajoute un commentaire si valeur inférieure à

Private Sub Worksheet_Change(ByVal Target As Range)
 For Each c In Cells.SpecialCells(xlCellTypeAllFormatConditions)
    x = c.FormatConditions(1).Formula1
    If Left(x, 5) = "=Mini" Then
      If c.Value < Val(Mid(x, 6)) Then
        c.ClearComments
        c.AddComment
        c.Comment.Text Text:="Inférieur à :" & Mid(x, 6)
        c.Comment.Shape.TextFrame.AutoSize = True
      Else
        c.ClearComments
      End If
    End If
 Next c
End Sub

JB
Formation Excel VBA JB

 

Pièces jointes

• CommentaireCondition.xls

  39 KB · Affichages: 77

Vote positif 0 Vote négatif

F

fvg

XLDnaute Nouveau

• 18 Mai 2008

• #27

Re : Aide sur ajouter commentaires - VBA

Je Sais A Present Que Je Suis Une Truffe;
J Ai Installe Ta Macro Comp Mais Je Ne La Vois Nulle Part;;;

Quel Est Ce Sortilege ?

 

Vote positif 0 Vote négatif

F

fvg

XLDnaute Nouveau

• 18 Mai 2008

• #28

Re : Aide sur ajouter commentaires - VBA

pourquoi ca ne marche jamais ?

dois je supprimer le premier événément (worksheet _change)?

peut on finalement inclure plusieurs évenements dans la meme feuille... la plupart des exemples ne fonctionnent qu'avec un , quand j'éssaie d'introduire de nouvelles variables sur de nouvelles cellules, ca plante....

 

Vote positif 0 Vote négatif

cbea

XLDnaute Impliqué

• 18 Mai 2008

• #29

Re : Aide sur ajouter commentaires - VBA

Bonsoir fvg et à tous,

Peux-tu nous faire parvenir ton fichier pour que l'on regarde ce que tu as codé ?

Merci

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 19 Mai 2008

• #30

Re : Aide sur ajouter commentaires - VBA

re:

Pour installer une macro complementaire :
Menu Outils / Macros complementaire
dans la fenetre, cliquer le bouton Parcourir, la rechercher, la selectionner et valider
verifier qu'elle est bien dans la liste et la cocher si necessaire (elle doit l'etre automatiquement)
Valider

Voir images d'ecran en fichiers joints

 

Pièces jointes

• vba_macro_comp.JPG

  31.9 KB · Affichages: 91
• macro_comp.JPG

  48.5 KB · Affichages: 78

Vote positif 0 Vote négatif